Jpeg->StringGrid

← →
M@XIDROM (2002-02-03 15:43) [0]

Как в стринггрид запихать картинку?

← →
nil © (2002-02-03 20:53) [1]

TCanvas знаешь, да? Вот на нем и рисуй.

← →
M@XIDROM (2002-02-04 22:00) [2]

Не мужик, так не пойдет!

← →
ZEE © (2002-02-05 02:26) [3]

Точно TCanvas, но не в StringGrid, а в DrawGrid.

← →
MBo © (2002-02-05 07:56) [4]

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;

← →
RUS1 (2002-02-05 10:22) [5]

А в каком юните находится класс tjpegimage?

В юните (логично!) JPEG (см. клавиша F1)

Jpeg->StringGrid Найти похожие ветки