Hallo Zusammen
Ich habe Mühe ein Stringgrid in meiner App zu zeichnen.
Mein Ansatz war: Erstelle ein Stringgrid mit leeren Zellen
Dann fülle die erste Spalte mit Werten aus einer Listbox.
Aber es hapert schon beim Anfang.
Das Programm compiliert brav was ich programmiert habe, aber wenn ich das Befüllen anklicke kommt immer der Fehler : "Spaltenindex, Zahl, ausserhalb des gültigen Bereichs"
meine Codeschnipsel soweit:
Delphi-Quellcode:
procedure TFProbenbearbeitung.FormActivate(Sender: TObject);
begin
Stringgrid2.RowCount := 2;
Stringgrid2.ColumnIndex := 4;
end;
Obigen Code habe ich so aus einem Anderen Beitrag angepasst (von oncreate zu onActivate)
im "onExit"-Event der Listbox wird dieser Code ausgeführt:
Delphi-Quellcode:
begin
if Listbox1.ListItems[i].IsSelected then begin
Stringgrid2.Cells[0, selI] := Listbox1.ListItems[i].Text;
selI := selI +1;
Stringgrid2.RowCount := Stringgrid2.RowCount +1 ;
end;
end;
Ausserdem ist mir aufgefallen, dass bei fmx stringgrid das stringgrid.colcount anders heisst. (stringgrid.columncount) aber das funktioniert nicht so wie im normalen
VCL-Stringgrid
Wieso?
Was mach ich falsch?
Gruss Sephraina