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

Вниз

FormStyle   Найти похожие ветки 

 
first_may ©   (2006-10-11 10:43) [0]

Добрый день!

В общих словах, хотелось бы сделать возможность менять стиль форм от MDI к Normal и обратно по некоторому флажку. Для главной формы написал вот такой код и все нормально проходит:

  if ClassForm=0
    then FormMain.FormStyle:=fsMDIForm
    else  FormMain.FormStyle:=fsNormal;

Но если напишу для дочернего окна

  if ClassForm=0
   then FormFounder.FormStyle:=fsMDIChild
   else FormMain.FormStyle:=fsNormal;

то возникает ошибка: "Cannot create form. No MDI forms are currently active".

Можно ли реализовать пободную вещь.


 
stone ©   (2006-10-11 11:01) [1]

чтобы создать MDIChild, нужно чтобы основная форма была MDIform


 
first_may ©   (2006-10-11 11:20) [2]

это понятно, вот так что ли:

  if ClassForm=0 then
  begin
   FormMain.FormStyle:=fsMDIForm;
   FormFounder.FormStyle:=fsMDIChild;
  end else
  begin
   FormMain.FormStyle:=fsNormal;
   FormFounder.FormStyle:=fsNormal;
  end;

но все равно ошибка...


 
Плохиш ©   (2006-10-11 11:36) [3]


> first_may ©   (11.10.06 11:20) [2]

Справку по FormStyle читать не пробовал, особенно предупреждения?


 
first_may ©   (2006-10-11 11:52) [4]

если честно, то не пробовал....


 
first_may ©   (2006-10-11 12:39) [5]

ТО Плохиш

не подскажите в чем дело?


 
Плохиш ©   (2006-10-11 12:52) [6]

Как сказано в предупреждении, менять FormStyle в процессе работы формы нельзя. Поэтому все манипуляции с этим свойством надо проводить в конструкторе.


 
MsGuns ©   (2006-10-11 13:43) [7]

>Плохиш ©   (11.10.06 12:52) [6]
>Поэтому все манипуляции с этим свойством надо проводить в конструкторе.

Когда-то пробовал. Муторное это дело. Даже Тексейра с Шевченко не помогли,- глючила ;)))

PS.
>ИШ
На голубой носок хоть заработал ???



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

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

Наверх




Память: 0.48 MB
Время: 0.051 c
6-1149542592
CShooter
2006-06-06 01:23
2006.10.29
NMpop31.GetMailMessage(NMpop31.MailCount) выдает ERangeError


15-1160038958
worldmen
2006-10-05 13:02
2006.10.29
Подобрать Switch.


2-1160628993
Serg_e
2006-10-12 08:56
2006.10.29
Как заставить работать tab MDIChild-форме?


3-1157020616
blackraven
2006-08-31 14:36
2006.10.29
Не могу удалить DBF


11-1137157074
-=Mike=-
2006-01-13 15:57
2006.10.29
Вопрос по отображению окна