Многооконные документы

← →
AlexAvz (2003-04-18 16:53) [0]

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

← →
Intell © (2003-04-18 18:38) [1]

Ты сделай так
if form3.visible=false then
form3.show;

Если форма уже видна, тогда процедура не происходит.

← →
nikkie © (2003-04-18 18:40) [2]

>Intell
смешно. а что будет если форма уже видна? show вторую форму создаст?

← →
Intell © (2003-04-18 19:38) [3]

Дык Visible сделай если смешно

← →
NikB (2003-04-19 00:43) [4]

A u vseh etih formah raznie type? Navernoe (ili ne ponial).
Mojno sledit sozdana li MDIChild takogo Type, kotoroia nado sozdavat ocherednego urovnia.

← →
AlexAvz (2003-04-19 15:42) [5]

А как проследить создана ли MDIChild takogo Type набросай примерно если не сложно

>AlexAvz
>Как это сделать правильно, а то уменя первая запускаемая дочерняя форма не дублируется, а вторая дублируется
Сделай так же, как и с первой. Ты хоть описал бы как делаешь или код свой привел бы, сразу бы подсказали.

← →
AlexAvz (2003-04-19 17:35) [7]

Ты хоть описал бы как делаешь или код свой привел бы, сразу бы подсказали.

При нажатии на 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 дублируется вот в этом впринципе и проблема

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