![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
form
Ибрагим © (2006-04-14 19:06:00)открываю форм2,но при нажатии на форм1,форм два остаетсья сзади,а как сделать так чтобы пока не закроешь форм2,к перфой форме доступа не было?
фопрос дурацкий,но без этого фигово,подскажите
elfebet (2006-04-14 20:02:00) [1]procedure TForm1.FormShow(Sender: TObject);
begin
Form1.Enabled:=false;
end;
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Form1.Enabled:=true;
end;
Virgo_Style (2006-04-14 19:41:00) [2].ShowModal
kester (2006-04-14 19:22:00) [3]
procedure TForm2.FormCreate(Sender: TObject);
begin
form2.FormStyle:=fsStayOnTop;
end;
ну или в Object Inspector со свойством "FormStyle" у формы поиграйся. Ну и естественно, Enabled тоже тебе помощник, если тебе надо вообще отключить действия с формой.