Форум: "Основная";
Текущий архив: 2002.10.21;
Скачать: [xml.tar.bz2];
Внизновая форма без модуля? Найти похожие ветки
← →
Sidorovich (2002-10-10 01:02) [0]нужно создать новую форму только без нового модуля ... те используя основной .... можно так?
и как?
← →
AL2002 (2002-10-10 01:09) [1]public
frmCurrent : TForm;
procedure ShowForm (aOwner : TPanel);
procedure CloseForm;
end;
procedure TfrmMain.ShowForm (aOwner : TPanel);
begin
frmCurrent.Parent := aOwner;
frmCurrent.Show;
end;
procedure TfrmMain.CloseForm;
begin
frmCurrent.Close;
end;
procedure TfrmMain.aNewForm(Sender: TObject);
begin
frmCurrent := TForm1.Create(Self);
ShowForm (pnlWork);
end;
procedure TfrmMain.aClose(Sender: TObject);
begin
CloseForm;
end;
← →
Anatoly Podgoretsky (2002-10-10 01:28) [2]НельзяЮ каждая форма должна быть в отдельном модуле, чисто динамическое создание это отдельная песня.
← →
Rouse_ (2002-10-10 01:49) [3]> Anatoly Podgoretsky © (10.10.02 01:28)
Зачем же в отдельном модуле? Если имеется Unit то можно 2 формы в одном юните положить и никакого динамического создания
Желаю успехов
← →
А почему (2002-10-10 03:15) [4]есть такая уверенность, что автору нужны две разные формы? Может он спрашивает только о том как создать еще один экземпляр некоей формы?
← →
Rouse_ (2002-10-10 03:18) [5]К сожалению автор пока молчит :(
Желаю успехов
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.10.21;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c