Как сделать при нажатии кнопки новое окно

[quarty]

Как сделать чтоб при нажатии кнопки создается новое окно?
Хочу заметить не становиться видимым, а создается новое окно.

[mihali4]

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2:=TForm2.Create(Application);
Form2.ShowModal;
Form2.Free;
end;

[quarty]

так как оно узнает параметры Form2? его же нету, получится оно создаст окно с неизвестными параметрами, это только подойдет если форма уже есть.

[artemavd]

quarty, строчка

Form2:=TForm2.Create(Application);

означает то, что будет создана новая, которая не была создана в процессе написания программы, форма, Form2 и будет показана как основная. О чем и говорит строчка

Form2.ShowModal;

А затем она удаляется и освобождается память. О чем говорит строчка:

Form2.Free;

[Нур]

А как ты хотел создать окно указывая там 20 или 30 параметров? Не глупо ли? Параметры устанавливаются автоматически, просто если надо будет что то особенное то поменяешь после создания

[quarty]

artemavd,
но оно не создает окно

13:39

все разобрался, сделал так
procedure TForm1.Button1Click(Sender: TObject);
var a:TForm;
begin
a:=TForm.Create(Application);
a.Show;
end;

У нас принято оформлять код специальным тэгом - при помощи кнопочки "#".
Только...
И не значком #.
И не РНР-кодом.
И не значком цитаты.
И не собственными "ручками".
Рекомендую. Помимо общих правил форума есть и дополнения к ним в каждом разделе...
Модератор

У нас принято пользоваться кнопочкой "Правка", дабы не плодить посты подряд, друг за другом.
Читаем правила. Рекомендую. Помимо общих правил форума есть и дополнения к ним в каждом разделе...
Уважайте форумчан, и они ответят вам взаимностью...
Модератор

[Sanprof]

приведите несколько параметров которые должна знать новая форма. Или мы здесь все не понимаем о каких параметрах вы говорите???

[quarty]

ну я прото написал как создается форма, а параметры уже наверно
присваивать значения a
a:=Caption('Programm');
Наверно так

[Sanprof]

не так, а вот так

procedure TForm1.Button1Click(Sender: TObject);
var 
  a:TForm;
begin
  a:=TForm.Create(Application);
  a.left := 100;
  a.top := 100;
  a.Caption := 'Programm';
  //и так далее можно прописывать любые параметры, которые есть у класса TForm
  a.ShowModal;
  a.Free; //иначе будет утечка памяти
end;

[quarty]

Sanprof,
угу спасибо большое