Hallo zusammen
Ich hab ein Problem mit einer ComboBox und das nur unter Windows 2000 ... ich hab nach vielen Versuchen den Fehler auf eine Zeile einschränken können, aber komm leider nicht weiter, geschweige den Fehler beseitigt
Die ComboBox wird wie folgt gefüllt ...
Delphi-Quellcode:
for i := 0 to mysql_num_rows(_myRes)-1 do
begin
_myRow := mysql_fetch_row(_myRes);
id := _myRow[0]; // Mitarbeiter-ID
benutzer := _myRow[2] + ',' + _myRow[1]; // Nachname, Vorname
ComboBox_Benutzer.Items.AddObject(benutzer,TOBject(StrToInt(id)));
end;
Und an folgender Stelle soll festgestellt werden welcher Mitarbeiter in der Liste ausgewählt wurde und die ID für eine
SQL-Abfrage genutzt werden.
Delphi-Quellcode:
id := Integer(ComboBox_Benutzer.Items.Objects[ComboBox_Benutzer.ItemIndex]);
// Problemzeile !!!
query := PChar('
SELECT passwort FROM mitarbeiter WHERE id=' + IntToStr(id));
Unter Windows Xp funktioniert das auch alles ganz klasse, nur unter Windows 2000 bekomme ich den Fehler "Listenindex überschreitet das Maximum (-1)".
Ersetze ich diese Zeile und setze id := 1 dann kann ich mich zum Beispiel mit dem Passwort des ersten Mitarbeiters ohne Probleme einloggen. Es muss also irgendwie in dieser Zeile stecken.
Wenn jemand schonmal ein ähnliches Problem hatte oder einen Rat weiss, wäre ich dankbar.
Gruß
Micha