Надо в методе главной формы прописать каждый элемент вот так:
Код:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Элемент1_формы2.Free;
Элемент2_формы2.Free;
...
ЭлементN_формы2.Free;
Form2.Free;
Элемент1_главнойформы.Free;
Элемент2_главнойформы2.Free;
...
ЭлементN_главнойформы2.Free;
Form1.Free;
end;
Хотя не думаю, что это выгрузит прогу из памяти...
Кстати, каким образом твоя прога вырубается?