![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Всем здравствуйте. Необходимо получить матрицу изображения желательно в формате Excel, где каждая ячейка содержит код цвета пикселя (по RGB). Соответственно, размер матрицы - ширина на длина картинки в пикселях. Только вот длина картинки будет, конечно, больше, чем число столбцов в листе Excel (по-моему их там 256). Так что не знаю как получится с Excel. Или таблица всё-равно откроется, хоть столбцов будет сколько угодно? Полученную матрицу нужно сохранить в файл если получится, то ".xls", если нет, то хотя бы в ".txt". В Делфи первый день программирую, языка вообще не знаю, до этого прогел на 1с. Поэтому напишите, пожалуйста, подробный код. Заранее благодарю!
|
|
#2
|
||||
|
||||
|
Открыв новый проект бросьте на форму кнопку и задайте имя нужного рисунка
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
Line: pByteArray;
i, j: integer;
s : string;
sl : TStrings;
bmp : TBitmap;
begin
sl := TStringList.Create;
bmp:= TBitmap.Create;
bmp.LoadFromFile('Some.bmp');
for i := 0 to bmp.Height - 1 do
begin
s:= '';
j:= 0;
Line:= bmp.ScanLine[i];
while j <= bmp.Width * 3 do
begin
s:= s +
'R:' + IntToStr(Line[j]) +
' G:' + IntToStr(Line[j+1]) +
' B:' +IntToStr(Line[j+2]) + '; ';
inc(j, 3);
end;
sl.Add(s);
end;
sl.SaveToFile('Some.txt');
sl.Free;
bmp.Free;
end; |
|
#3
|
|||
|
|||
|
размер листа 1 048 576 строк и 16 384 столбца
|
|
#4
|
|||
|
|||
|
А что с ЭТИМ собираетесь делать? Особенно с форматом txt?
|
|
#5
|
|||
|
|||
|
А дальше я буду передавать в 1с для разгадки капчи, работая с таблицами значений. Знаю, что рациональней было бы всё сделать в делфи, но я проглю в 1с.
|
|
#6
|
|||
|
|||
|
Все это работает только для формата bmp. А как быть с другими форматами файлов (например, jpeg, png, gif)? Щас буду юзать как конвертировать изображение в формат bmp, или есть лучше предложения?
|
|
#7
|
||||
|
||||
|
GDI+ работает с bmp, jpg, gif, png
|
|
#8
|
|||
|
|||
|
GDI+ это что: другой язык программирования, или какая-то компонента для делфи?
|
|
#9
|
||||
|
||||
|
google легко выдает ответ на этот вопрос.
GDI+: графика нового поколения GDI+ — графическое ядро нового поколения по идее от него нужно одно: умение загружать любую графику не разбираясь программисту что за формат. проще говоря нажал кнопку и программа готова) |
|
#10
|
|||
|
|||
|
Всем спасибо за помощь в этой теме! Буду писать новые...
|