Stinggrid mit Grid.OnDrawCell ausgeben Problem mit drucken

[BrunoT]

Hi,

warum über TextOut? ist

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
Var
i,j:integer;
begin
for i:=0 To StringGrid1.ColCount-1 do
for j:=0 to StringGrid1.RowCount-1 do
  StringGrid1.Cells[i,j]:='Hallo DuDa';
end;

dir zu langsam?

Wo merkst du dir die Werte? Die mit Textout ausgegebenen Werte sind jetzt nur noch Bildpunkte.

mfg

BrunoT