Das sollte funktionieren..
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var i: integer;
begin
for i:=0 to ComponentCount-1 do
if Components[i] is TPanel then (Components[i] as TPanel).ParentBackground:=false;
end;
Viele Grüße
Horst