Einzelnen Beitrag anzeigen

omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Listenindex überschreitet das Maximum (-1) unter Win2000

  Alt 8. Feb 2006, 22:52
Hallo _SolidSnake_,

programmiere sicher.
Das bedeutet in diesem Fall, greife nicht einfach auf ComboBox_Benutzer.ItemIndex zu und übergebe diesen Wert an Object[] sondern prüfe vorher, ob der Wert überhaupt gültig ist.

Also...
Delphi-Quellcode:
if ComboBox_Benutzer.ItemIndex >= 0 then begin
  id := Integer(ComboBox_Benutzer.Items.Objects[ComboBox_Benutzer.ItemIndex]);
  query := PChar('SELECT passwort FROM mitarbeiter WHERE id=' + IntToStr(id));
end;
MfG
Thorsten
  Mit Zitat antworten Zitat