Вывод данных BMP файла на форму

[Vasya]

Здравствуйте, помогите пожалуйста с таким вопросом. Нужно организовать вывод на форму изображения BMP файла. С чтением заголовка я вроде б то разобрался, но как еще считать данные из файла?
вот процедура чтения заголовка:


procedure ReadBMPheader(header:bmhptr;filenam e:string);
var
bmpfile:file;
hfile:file;
begin
assign(bmpfile,filename);
reset(bmpfile,1);
blockread(bmpfile,header^,sizeof(he ader^));
close(bmpfile);
Form1.Edit1.Text:=IntTostr(header^. f.Typf);
Form1.Edit2.Text:=IntToStr(header^. f.Size);
Form1.Edit3.Text:=IntToStr(header^. f.Res1);
Form1.Edit4.Text:=IntToStr(header^. f.Res2);
Form1.Edit5.Text:=inttostr(header^. f.OfBm);
end;

[zetrix]

Э... А canvas.draw не подойдёт?

[Alar]

http://www.programmersclub.ru/lab - очень хороший раздел.

[Vasya]

http://www.programmersclub.ru/lab - очень хороший раздел.

раздел хороший спору нет, только ответа я там не нашел
вот начал писать процедуру:
procedure ReadBmp (head:bmhptr;filename:string);
var
f:file;
buf: array of longint;
i:longint;
begin
assign(f,filename);
reset (f,1);
while not eof (f) do
seek(f,SizeOf(head^.f.OfBm));
inc (i);
BlockRead (f,buf,1);
...... как осуществить вывод в этом случае?
CloseFile (f);
end;
как можно здесь вывести массив buf на форму?

[Alar]

Vasya, там есть программа, пазл. вот она в тему.

[Vasya]

Vasya, там есть программа, пазл. вот она в тему.

пазл это название программы? что то не нашел такую

[Alar]

http://www.programmersclub.ru/labplay

Собери картинку

Вот как можно один и тот же код использовать в разных программах, если вы уже видели игру пятнашки, то, скачав этот Delphi исходник, вы убедитесь, что исходники идентичны. Картинка храниться в отдельном файле, средствами Delphi разбивается на 16 частей, и в хаотичном порядке раскладывается по ячейкам.
Скачать (42 кб)

[Vasya]

так и не разобрался

[zetrix]

так я не понимаю тебе надо на саму форму вывести рисунок (отобразить/нарисовать) так?
Тогда используем canvas.Draw();
синтаксис в хелпе есть.

[Vasya]

так я не понимаю тебе надо на саму форму вывести рисунок (отобразить/нарисовать) так?
Тогда используем canvas.Draw();
синтаксис в хелпе есть.

Да Zetrix нужно вывести на форму. Но нужно вывести на форму не используя стандартные методы вывода BMP, то есть организовать самому полностью вывод файла. При использовании canvas.Draw() я так понял нужно использовать TBitmap (который знает структуру BMP файла).