Hallo,
du rufst dein ClearStringGrid nicht auf ? warum ?
Deine Implementierung war übrigens falsch.
Grid.Cells[Col,Row], nicht umgekehrt.
Ausserdem würde ich das ClearStringGrid erst NACH dem Grid.RowCount machen.
Das normale StringGrid von Delphi hat nen "Bug" eh Feature,
das dazu führt, dass wenn RowCount verkleinert und wieder vergrössert wird,
der originale Inhalt wieder drinsteht.
Ausserdem würde ich mal andere Variablen-Namen benutzen.
Bsp.
Delphi-Quellcode:
var
iCurRow: Integer;
iRec: Integer;
begin
iCurRow:= 0;
for iRec:= 0
to db.RowCount - 1
do
begin
StringGrid1.Cells[0, iCurRow] :=
db.Results[iRec][0];
Inc(iCurRow);
Next;
end;
end;
Das hat übrigens den Vorteil, dass man auch ohne grossen Rumhampeln
die Überschrift reinpackewn kann.
Grid.RowCount:=
db.RowCount+1;
iCurRow:= 1;
Übrigens würde ich das Form1. eh weglassen.
Heiko