Hallo Leute!
Bin dabei eine kleine Datenbank zu schreiben. Man soll Datensätze per Dialog hinzufügen und bearbeiten können. Beim Bearbeiten will ich, dass er die Datensätze mit Nummer und Name in eine Combobox schmeißt und die dann zur Auswahl stellt hierzu gibt es folgenden kleinen
Code:
procedure TForm3.FormCreate(Sender: TObject);
var i: integer;
begin
with form1.StringGrid1 do
begin
for i:=1 to RowCount-1 do
begin
combobox1.Items.add(Cells[0,i]+' - '+cells[1,i]);
end;
combobox1.ItemIndex:=0;
end;
end;
Das Problem dabei ist, dass er aus irgendeinem unerfindlichen Grund die Einträge in der StringGrid nicht erkennt obwohl sie vorhanden sind. D.h. im Klartext: starte ich das Programm erzeuge ein Paar Einträge und Klicke dann auf Bearbeiten, so erscheint in der ComboBox nur
[leer] - [leer]
Was soll das? Kann mir das bitte mal jemand erklären oder hab ich in meinem Übermut einfach nur was übersehen?
KeeN
die angst eines windows anwenders: das system könnte den tag ohne absturz überstehen
linux - where do you want to go today? und: linux: für alle mit einem iq über 98