Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.05.01;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 набросай примерно если не сложно


 
nikkie   (2003-04-19 16:03) [6]

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



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

Форум: "Основная";
Текущий архив: 2003.05.01;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.012 c
14-758
Kotka
2003-04-14 16:52
2003.05.01
Service Pack


1-613
Anatoly P
2003-04-14 20:46
2003.05.01
RichEdit


1-517
mixamixa
2003-04-20 20:24
2003.05.01
Как вставить картинку в ячейку StringGrid-a?


1-533
АлеКо
2003-04-21 09:04
2003.05.01
Работа с TMemo


3-387
AleksandrKu
2003-04-14 17:03
2003.05.01
FastReport 2.41 как из дизайнера в runtime менять значения в БД?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский