Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
Delphi 10.4 Sydney
|
Re: Angemeldeten Usernamen nicht löschen ...
9. Mär 2007, 14:41
Hallo,
das ist die Stelle ?
sieht aber unverdächtig aus, abgesehen vom Format darüber.
Hast du das mal debuggt ?
Mach mal deinen Code etwas schöner.
Das with Listbox ist hier nicht so schön.
Du lädst Items[ItemIndex] mehrfach.
Nimm eine lokale Variable dafür.
Das lässt sich dann besser Debuggen.
msg setzt du zu früh.
Das Status:= Aktiv wird zweimal gesetzt
Der Code prüft nicht, ob ItemIndex-1 (kein Eintrag in der Listbox markiert) ist.
Heiko
Heiko
|