Delphi-Quellcode:
procedure Tf_hauptform.Button2Click(Sender: TObject);
var i : integer;
temp : tcomponent;
begin
for i:=objectlist.Count -1 downto 0 do
begin
Temp:=Components[i];
if Temp is TJVCaptionPanel then
Temp.Free;
end;
FreeAndNil(objectlist);
end;
Eine andere Variante.
Trotzdem kann ich die Panels nicht wieder neu erzeugen.
Vielleicht kann mit jemand einen Beispielcode liefern der mir da weiter helfen kann.
Gruß