[buf069]

Здрасте!
У меня такой вопрос(сильно не издевайтесь)
Как открыть новую форму с помошью кнопки

[4kusNick]

Код:

procedure Form1.Button3Click(Sender);
begin
  SomeForm.Create;
  SomeForm.ShowModal;
  SomeForm.Free;
end;

[buf069]

Форму2 надо открыть из меню формы1 через
procedure TForm1.N3Click(Sender: TObject);

[4kusNick]

Код:

procedure TForm1.N3Click(Sender: TObject);
begin
  //Form2.Create; // эту и нижнюю строку нужно раскомментировать, 
                        // если форма 2 у вас исключена из списка 
                        // автоматически создаваемых форм (в настройках 
                        // проекта)
  Form2.ShowModal;
  //Form2.Free;
end;

[Aristarh Dark]

Неправда Ваша!

Сообщение от 4kusNick

Код:

procedure TForm1.N3Click(Sender: TObject);
begin
  //Form2.Create; // эту и нижнюю строку нужно раскомментировать, 
                        // если форма 2 у вас исключена из списка 
                        // автоматически создаваемых форм (в настройках 
                        // проекта)
  //ТАК НЕЛЬЗЯ!!!! Нужно так:
  //Form2:=TForm2.Create(nil); //или ...TForm2.Create(self); это по желанию

  Form2.ShowModal;
  //Form2.Free;
end;

[4kusNick]

Виноват
Писал из головы, а голова была занята другими вещами под завязку.