А не проще ли так
Для
Form1 меняешь
FormStyle на
fsMDIForm
создаешь еще одну форму
Form2 меняешь значение
FormStyle на
fsMDIChild
Потом нажимаем
Shift+Ctrl+F11 на вкладке
Forms выбираем наш
Form2 и нажимаем на кнопку
">"
перебрасываем нашу форму со списка
Auto-create forms на
Available forms(что бы оно автоматически не создавалось вовремя запуска приложения)
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
TForm2.Create(Self);
end;
Вот и всё!