Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.19;
Скачать: CL | DM;

Вниз

Cannot make a visible window modal.   Найти похожие ветки 

 
Viktor   (2003-05-05 18:55) [0]

Привет мастерам!
Не могу понять где ошибка

procedure TFrmModel.N1Click(Sender: TObject);
begin
with TFrmCreateStandartModel.Create(Self) do
begin
Caption := "Добавление стандартной модели";
try
if ShowModal = mrOk then
begin
.............
end;
finally
Free;
end;
end;
end;

Спасибо за ранее.


 
Anatoly Podgoretsky ©   (2003-05-05 19:00) [1]

Visible := FALSE;


 
Viktor   (2003-05-06 00:10) [2]

>Anatoly Podgoretsky
Visible := True;

Дело в том что она вначале была
FormStyle := fsMDIChild

вызывал так:
if not Assigned(FrmCreateStandartModel) then
Application.CreateForm(TFrmCreateStandartModel, FrmCreateStandartModel);
FrmCreateStandartModel.Show;

а теперь хочу чтобы она перекрывала другие окна,
пока не нажмут Ок или Отмена


 
VID ©   (2003-05-06 01:41) [3]

ну... SetWindowPos можно использовать


 
ultrasuper_asd   (2003-05-06 02:11) [4]

прямо в инспекторе обьектов поставь форме Visible = FALSE
и всё будет тип-топ...



 
Viktor   (2003-05-06 03:23) [5]

Спасибо.
На это не обращал внимания.
Может объяснит мне кто-нибудь - почему.


 
Zacho ©   (2003-05-06 06:48) [6]


> Viktor (06.05.03 03:23)

А чего объяснять ? Если ты делаешь FormStyle := fsMDIChild то Visible сразу становится true. При присвоении FormStyle := fsNormal значение Visible не изменяется. Поэтому при попытке ShowModal получаешь заслуженное "Cannot make a visible window modal"



Страницы: 1 вся ветка

Текущий архив: 2003.05.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.018 c
1-59733
SiJack
2003-05-06 08:30
2003.05.19
Как получить из делфи список всех листов в документе Excel ?


14-59864
Slavik
2003-04-29 01:12
2003.05.19
Transfer of application from Delphi 5 to Delphi 7


14-59943
Ламка
2003-04-30 10:18
2003.05.19
Error install EhLib ?!


14-59882
MalkoLinge
2003-04-29 11:49
2003.05.19
Львов и конкурс ?


14-59914
Сергей Резников
2003-04-28 16:52
2003.05.19
Скины