Простой пример использования TDrawGrid

[bookkc]

Нужен простой пример использования TDrawGrid. Ну к примеру что бы я писал в Edit1 какой то текст и табличка заполнялась.

[ImmortalAlexSan]

Насколько я знаю, то на TDrawGrid можно размещать только непосредственно изображения, и к TEdit она никакого отношения не имеет, единственное, что если через Tedit путь к файлу указать, но ведь можно сделать это с помощью OpenPictureDialog. Вот код, который вам нужен:

procedure TForm1.Button1Click(Sender: TObject);
Var BM:TBitmap;
begin
if OpenPictureDialog1.Execute then
begin
BM:=TBitmap.Create;
BM.LoadFromFile(OpenPictureDialog1.FileName);
DrawGrid1.Canvas.CopyRect(DrawGrid1.CellRect(1, 1),
  BM.Canvas, Rect(0, 0, BM.Height, BM.Width));
BM.Free;
end;
end;

Так же прилагаю исходник: