Hallöchen,
ich bin neu in dieser Forum und hoffe, dass mir jemand helfen kann.
ich möchte eine Liste mit Panels realisieren. auf Knopfdruck werden weitere Panels mit Einträgen hinzugefügt.
Innerhalb der Panels ist ein Button durch den das Panel wieder gelöscht werden soll. Das funktioniert aber nicht,
wahrscheinlich die OnClick-Ereignisbehandlung, die beim Drücken auf den Button ausgelöst wird natürlich beim Destroy des
übergeordneten Panels auch gelöscht wird. Ich bekomme immer einen Abstraktion-Fehler.
Hier die "Lösch--Methode"
Delphi-Quellcode:
procedure xxx.DelClick (Sender:TObject);
var
XPanel : TPanel;
XBitBtn : TBitBtn;
x : Integer;
Found : Boolean;
begin
x := 0;
found := false;
repeat
XPanel := Liste[x];
XBitBtn:= sender as TBitBtn;
if XBitBtn.Parent = XPanel then
Begin
Found := True;
Liste.delete(x);
XPanel.destroy;
end;
inc(x);
until (x = (Liste.Count)) or Found;
end;
Vieleicht hat ja jemand eine Idee.
Dirk