Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.270 Beiträge
 
Delphi 10.4 Sydney
 
#4

Re: Angemeldeten Usernamen nicht löschen ...

  Alt 9. Mär 2007, 13: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
  Mit Zitat antworten Zitat