![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Jpeg->StringGrid
M@XIDROM © (2002-02-03 15:43:00)Как в стринггрид запихать картинку?
drpass (2002-02-05 10:34:00) [1]В юните (логично!) JPEG (см. клавиша F1)
RUS1 (2002-02-05 10:22:00) [2]А в каком юните находится класс tjpegimage?
MBo (2002-02-05 07:56:00) [3]procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
var jp:tjpegimage;
begin
if (acol=1) and (arow=1) then begin
jp:=Tjpegimage.Create;
jp.LoadFromFile("e:\5.jpg");
StringGrid1.ColWidths[1]:=jp.Width;
StringGrid1.RowHeights[1]:=jp.height;
StringGrid1.Canvas.Draw(rect.Left,rect.Top, jp);
jp.Free;
end;
end;
ZEE (2002-02-05 02:26:00) [4]Точно TCanvas, но не в StringGrid, а в DrawGrid.
M@XIDROM (2002-02-04 22:00:00) [5]Не мужик, так не пойдет!
nil (2002-02-03 20:53:00) [6]TCanvas знаешь, да? Вот на нем и рисуй.