Hola choclito1.
Fijate si este ejemplo se asemeja a lo que buscas:
Código Delphi
[-]
procedure TForm1.Panel1Click(Sender: TObject);
var
F: TForm;
begin
F:= TForm.Create(Self);
F.Parent:= Panel1;
F.Color := clMoneyGreen;
F.ManualDock(Panel1, nil, alNone);
F.Width := Panel1.Width - 30;
F.Height:= Panel1.Height - 30;
F.Left := (Panel1.Width - F.Width) div 2;
F.Top := (Panel1.Height - F.Height) div 2;
F.Show;
end;
Salida:
Saludos