вторая форма запускалась первой а уже с нее запускать первую форму, где основная программа

[Chudo4258]

Создал в Делфи программу. Затем создал в ней еще одну форму, и теперь хочу чтобы эта вторая форма запускалась первой а уже с нее запускать первую форму, где основная программа. Как поменять запуск форм???

[Google2010]

project - options - forms - дальше разберешься))

[RUSt88]

это прописываешь в проектном файле (*.dpr)
соответственно, frm_Main - главная форма, frm_New - второстепенная

  frm_New.Show;

далее

procedure Tfrm_New.FormShow(Sender: TObject);
begin
    frm_Main.Enabled:= false;   // не показываем пока главную форму
end;

procedure Tfrm_New.FormClose(Sender: TObject; var Action: TCloseAction);
begin
    frm_Main.Show;
    frm_Main.Enabled:= true; // при закрытии показываем главное окно,
    Action:= caFree;
end;

далее в главной форме

procedure Tfrm_Main.FormCreate(Sender: TObject);
begin
    Application.ShowMainForm:= false;
end;

[Chudo4258]

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

это прописываешь в проектном файле (*.dpr)
соответственно, frm_Main - главная форма, frm_New - второстепенная

  Application.CreateForm(Tfrm_Main, frm_Main);
  Application.CreateForm(Tfrm_New, frm_New);
  frm_New.Show;

далее

procedure Tfrm_New.FormShow(Sender: TObject);
begin
// всё обнуляем
    Edit1.Text:= '';
    Edit2.Text:= '';
    frm_New.ActiveControl:= edit1;   // активный контрол
    BitBtn1.Enabled:= false;
    frm_Main.Enabled:= false;   // не показываем пока главную форму
end;

procedure Tfrm_New.FormClose(Sender: TObject; var Action: TCloseAction);
begin
    frm_Main.Show;
    frm_Main.Enabled:= true; // при закрытии показываем главное окно,
    Action:= caFree;
end;

далее в главной форме

procedure Tfrm_Main.FormCreate(Sender: TObject);
begin
    Application.ShowMainForm:= false;  // сначала показываем не главную форму, а окно сведений
    Screen.Cursors[1]:= LoadCursor(HInstance, 'CURSOR_1');   // загрузка курсора из ресурса
    {for i:= 0 to ComponentCount - 1 do begin             // перебор всех компонентов на форме
        if Components[i] is TmyButton then                // если компонент - TmyButton то
            TmyButton(Components[i]).Cursor:= 1;          // устанавливаем для него курсор
    end; }
    NewGame;     // см. выше
end;

Ой-ой-ой, это что-то совсем страшное....
Я сделал вот так: project - options - forms

[RUSt88]

я подправил. И че там страшного было?

[Vladya]

RUSt88 ничего там страшного нет, просто проще будет поменять местами формы в списке