[Hamidam]

Здравствуйте,помогите пожалуйста объединить 2 программы в 1. Я попытался прописать ее:

Код:

program Project2;


  Forms,
  Unit1 in 'Unit1.pas' {Form3},
    main in 'main.pas' {form1},
  Unit2 in 'Unit2.pas' {Form2};



{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm3, Form3);
   Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.Run;
end.

Main- это 2 программа,но при попытке запустить выдает ошибкуБезымянный.jpg. Если убрать Application.CreateForm(TForm1, Form1); то программа запускается,но перестает работать кнопка перехода между формами.

[NumLock]

сделай Build проекту.

[Hamidam]

Ну сделать я его сделал,но ошибку все равно выдает эту

[NumLock]

ну так надо было исправить ее сначала)

[Hamidam]

спасибо за помощь), методом высокоинтеллектуального тыка все заработало

[angvelem]

Сообщение от Hamidam

спасибо за помощь), методом высокоинтеллектуального тыка все заработало

Конечно, нужно было всего-лишь исправить dfm ручками. Сделать так называемый Downgrade.