Roman Go
Пусть есть TForm1 = class(TForm) и TForm2 = class(TForm) и Form2 должна быть на Form1.
Form1 создается как обычно, естественно, ДО Form2.
В TForm2 пишешь такие вещи:
Код:
procedure TForm2.CreateParams (var Params: TCreateParams);override;
begin
inherited;
Params.WndParent:=Form1.Handle;
end;
