Главная страница
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.009 c
14-12873
darkkonung
2003-04-14 15:42
2003.05.05
Поддержка двух интерфейсов (английского и русского)


1-12767
exo
2003-04-22 04:52
2003.05.05
button


3-12674
Tornado
2003-04-15 12:55
2003.05.05
Имена таблиц


4-12961
Виталик
2003-02-28 11:43
2003.05.05
CreateWindow в DLL


1-12807
Spartak
2003-04-22 15:50
2003.05.05
Как проверить существование файла ?