[Aleca]

proba de esta forma

Código Delphi [-]
...
procedure TForm1.SpeedButton1Click(Sender: TObject);
var
  tForm2: TForm4;
begin
  tForm2 := TForm4.Create(nil);
  tForm2.Parent := Panel1;
  tForm2.Height := 100;
  tForm2.Width := 120;
  tForm2.Top := 0;
  tForm2.Left := 0;
  tForm2.Show;
end;

form4 tiene un panel al cual le cambio el color en el oncreate de form4.
Saludos