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

Вниз

Многооконные документы   Найти похожие ветки 

 
AlexAvz   (2003-04-22 16:40) [0]

Вопрос на засыпку. Помогите разобраться:
В многооконном документе с главной формы запускается дочерняя форма в единственном экземпляре (т.е. она при повторном вызове не дублируется ), а с нее должна запукаться еще одна форма дочерняя и так же в единственном экземпляре. Как это сделать правильно, а то уменя первая запускаемая дочерняя форма не дублируется, а вторая дублируется

При нажатии на BUTTON1 на главной форме

procedure TfmGL.SpeedButton1Click(Sender: TObject);
var i:integer;
begin
fmSprVal:=nil;
i:=0;
while(i<MdichildCount) and (MdiChild=nil)do begin
if mdiChildren[i] is TfmSprVal
then begin
fmSprVal:=TfmSprVal(MDiChildren[i]);
fmSprVal.Show;
end;
inc[i];
end;
if fmSprVal=nil
then begin
fmSprVal:=TfmSprVal.Create(Application);
end;

end;

Запускается дочерняя форма (в единственном экземпляре)fmSprVal
При нажатии на BUTTON2 , на форме fmSprVal должна запускаться форма (fsMDIChild)- пусть FORM3 в эдинственном экземпляре
есл использовать выше приведенный код для FORM3 то FORM3 дублируется вот в этом впринципе и проблема


 
ZmeiGorin ©   (2003-04-22 17:07) [1]

Никак не могу понять, чем не устраивает просто глобальная (или почти глобальная переменная)


 
AlexAvz   (2003-04-22 17:25) [2]

"Никак не могу понять, чем не устраивает просто глобальная (или почти глобальная переменная)" в каком смысле?
Подробнее если можно



 
AlexSV ©   (2003-04-22 18:23) [3]

Все созданые дочерние окна регистрируються в главном окне.
Значит и искать свою форму надо в Application.MainForm.MDiChildren



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

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

Наверх




Память: 0.47 MB
Время: 0.011 c
14-12901
Zheka
2003-04-17 17:45
2003.05.05
Удалённое администрирование


3-12631
Avreliy
2003-04-15 21:02
2003.05.05
Отмена Post!


14-12897
asafr
2003-04-16 11:16
2003.05.05
Интересно. А почему таким успехом пользуются темы о религии?


1-12798
Weare
2003-04-22 12:49
2003.05.05
Работа с QuickRep


3-12614
Ron Wilson
2003-04-15 14:08
2003.05.05
обращение к ячейке TDBGrid