घर
Top.Mail.Ru Yandeks.Metrika
मंच: "मुख्य";
वर्तमान संग्रह: 2003.05.05;
डाउनलोड करें: [xml.tar.bz2];

नीचे

मल्टी-विंडो दस्तावेज़ इसी तरह की शाखाएँ खोजें


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

बैकफिलिंग का सवाल। कृपया मेरी मदद करें:
मल्टी-विंडो डॉक्यूमेंट में, चाइल्ड फॉर्म को मुख्य फॉर्म से सिंगल कॉपी में लॉन्च किया जाता है (यानी, जब इसे दोबारा बुलाया जाता है तो इसे डुप्लिकेट नहीं किया जाता है), और बच्चे के दूसरे फॉर्म को उसमें से और एक ही कॉपी में दफन किया जाना चाहिए। इसे सही तरीके से कैसे करें, अन्यथा पहले लॉन्च किए गए चाइल्ड फॉर्म को डुप्लिकेट नहीं किया जाता है, और दूसरा डुप्लिकेट किया जाता है

जब आप मुख्य फॉर्म पर BUTTON1 पर क्लिक करेंगे

प्रक्रिया TfmGL.SpeedButton1Click (प्रेषक: TObject);
var i: पूर्णांक;
शुरू करना
fmSprVal: = nil;
i: = 0;
जबकि (i <MdichildCount) और (MdiChild = nil) शुरू होते हैं
अगर mdiChildren [i] TfmSprVal है
तब शुरू करें
fmSprVal: = TfmSprVal (MDiChildren [i]);
fmSprVal.Show;
अंत;
inc [i];
अंत;
अगर fmSprVal = नील
तब शुरू करें
fmSprVal: = TfmSprVal.Create (एप्लिकेशन);
अंत;

अंत;

बच्चे का फॉर्म लॉन्च किया गया है (एक कॉपी में) fmSprVal
जब आप BUTTON2 पर क्लिक करते हैं, तो फॉर्म (fsMDIChild) को fmSprVal फॉर्म पर लॉन्च किया जाना चाहिए - 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;
डाउनलोड करें: [xml.tar.bz2];

ऊपर





मेमोरी: 0.55 एमबी
समय: 0.019 c
1-12819
sapsi
2003-04-21 15:37
2003.05.05
KOI-8 एन्कोडिंग


1-12775
Lighnam
2003-04-21 10:27
2003.05.05
खुले संवाद में 1 फ़िल्टर स्ट्रिंग में कई एक्सटेंशन


14-12919
lipskiy
2003-04-17 00:19
2003.05.05
32-बिट WinXP शैली आइकन


6-12852
व्याचेस्लाव
2003-03-11 21:32
2003.05.05
नेटवर्क के साथ काम करें


1-12733
neodiX
2003-04-21 02:28
2003.05.05
OpenDesktop (Winlogon, 0, FALSE, MAXIMUM_ALLOWED)





अफ्रीकी अल्बानियन अरबी भाषा अर्मेनियाई आज़रबाइजानी बस्क बेलारूसी बल्गेरियाई कैटलन सरलीकृत चीनी) चीनी पारंपरिक) क्रोएशियाई चेक डेनिश डच अंग्रेज़ी एस्तोनियावासी फिलिपिनो फिनिश फ्रेंच
गैलिशियन् जॉर्जियाई जर्मन यूनानी हाईटियन यहूदी हिंदी हंगरी आइसलैंड का इन्डोनेशियाई आयरिश इतालवी जापानी कोरियाई लात्वीयावासी लिथुआनियाई मेसीडोनियन मलायी मोलतिज़ नार्वेजियन
फ़ारसी पोलिश पुर्तगाली रोमानियाई रूसी सर्बियाई स्लोवाक स्लोवेनियाई स्पेनिश स्वाहिली स्वीडिश थाई तुर्की यूक्रेनी उर्दू वियतनामी वेल्श यहूदी बंगाली बोस्नियाई
सिबुआनो एस्पेरांतो गुजराती हौसा हमोंग ईग्बो जावानीस कन्नड़ खमेर लाओ लैटिन माओरी मराठी मंगोलियन नेपाली पंजाबी सोमाली तामिल तेलुगु योरूबा
ज़ुलु
Английский Французский Немецкий Итальянский Португальский Русский Испанский