So, habe das Problem gelöst! Ich nehme jetzt nicht das onClick-Event, sondern SelectItem!
Delphi-Quellcode:
procedure TForm_UserAnlegen.ListView1SelectItem(Sender: TObject;
Item: TListItem; Selected: Boolean);
begin
if Selected
then begin
Edit2.Text:=Item.Caption;
if StrToInt(Item.SubItems[0]) = 0
then CheckBox2.Checked:=False
else CheckBox2.Checked:=True;
end;
end;
...manchmal sieht man den Wald vor lauter Bäumen nicht...
MfG
schuetze09