Form1.PageControl Inhalt nicht sichtbar

[Minz]

Ich mache tatsächlich was mit Form1.show.

Da stelle ich jedoch blos die Startwerte und Inhalte der einzelnen
elemente ein, z.B. sowas:
panel2.Color:=ColorDialog1.Color;
panel3.Color:=ColorDialog2.Color;


Der Code ist ziemlich groß, ich weiß net, welches davon jetzt von
Belang ist.

ich habe 2 tab-sheets in meiner PageControl
procedure TForm1.PageControl1Change(Sender: TObject);
begin
if pagecontrol1.tabindex=1 then begin
if eingeklingt=false then begin
form2.visible:=true;
form1.Visible:=false;
end;
end;
end;


Form2:
procedure TForm2.Button1Click(Sender: TObject);
begin
form2.Visible:=false;
form1.PageControl1.TabIndex:=0;
form1.Visible:=true;
application.processMessages;
end;


Wie mach ich denn diese grauen Kästen, wo der Code drin steht?

Minz