Главная страница
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.01 c
1-59757
крон
2003-05-06 12:03
2003.05.19
Есть ли у Canvas такая функция определения вхождения в окружность


1-59689
volodya_
2003-05-07 15:52
2003.05.19
Размеры и расположение компонент


3-59574
MVVD
2003-04-25 11:19
2003.05.19
Построение баланса


1-59651
zloy_dima
2003-05-07 10:15
2003.05.19
Stringgrid


4-59989
biocron
2003-03-18 12:49
2003.05.19
Отключить дисковод так что бы не было ошибки