Danke
Das hab ich auch vorher gesucht.
Gefunden habe ich das
hier
Daraus habe ich dann folgendes gemacht:
Delphi-Quellcode:
procedure TFrmAdrSearchFound.FormClose(Sender: TObject;
var Action: TCloseAction);
var I:integer;
begin
for I := 0 to FrmAdrSearchFound.ControlCount-1 do
(FrmAdrSearchFound.Controls[I]).Free;
end;
Dann kommt raus:
Listenindex überschreitet das Maximum (1)
PS: Ihr antwortet ja schneller als die Polizei erlaubt