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

नीचे

मुझे बताएं कि 2 मॉड्यूल से 1 मॉड्यूल में टेक्स्ट कैसे आउटपुट करें। इसी तरह की शाखाएँ खोजें


ossa   (2003-08-18 08:41) [0]

उदाहरण के लिए:
// 2 मॉड्यूल
प्रक्रिया Str1 (Str2: स्ट्रिंग);
// 1 मॉड्यूल Str2, यानी में दिखाया जाना चाहिए
Unit1.Label1.Caption: = Str2; // यहां त्रुटि
...
अंत;

// Module1
// यहाँ एक लेबल के साथ एक फॉर्म है
प्रक्रिया TFormUnit.Button1Click (प्रेषक: Tobject);
शुरू करना
Unit1.Str1 ("ठीक है!");
अंत;



Palladin   (2003-08-18 08:43) [1]

+ F1 का उपयोग करता है



Anatoly Podgoretsky   (2003-08-18 08:52) [2]

क्या कोई गलती है या आपके पास कोई अनुमान है।



ossa   (2003-08-18 08:57) [3]

हां, यह घोषित नहीं है, हालांकि यह 1 मॉड्यूल से जुड़ा है
Unit1.Label1.Caption: = Str2; // सामान्य तौर पर यह सही है;



Palladin   (2003-08-18 09:00) [4]

में इंटरफ़ेस अनुभाग की घोषणा की?



Zacho   (2003-08-18 09:02) [5]


> ossa (18.08.03 08: 57)

Unit1 में एक Label1 चर है? यह मुझे लगता है कि Label1 अभी भी एक फॉर्म फील्ड है, एक वैरिएबल नहीं है, और आपको Unit1.Form1.Label1.Caption: = Str2 जैसे कुछ चाहिए



Palladin   (2003-08-18 09:06) [6]

Unit1.Form1.Label1.Caption: = Str2;



Anatoly Podgoretsky   (2003-08-18 09:07) [7]

यह सही ढंग से लिखा गया है, लेकिन फिर से घोषित करना हमारे लिए एक रहस्य है। तुम्हारी इच्छा नहीं है विस्तृत जानकारी प्रदान करें - अनुभाग / उपयोग।
दोनों फ़ाइलों में शामिल वस्तुओं की घोषणाओं सहित।



Skier   (2003-08-18 09:09) [8]

मॉड्यूल_नाम_ स्थान_अतिक्रमण_फॉर्म .ormUnit.Label1.Caption: = Str2;



ossa   (2003-08-18 09:13) [9]

नहीं, कार्यान्वयन में घोषित, क्योंकि मैं 1 मॉड्यूल से चर का उपयोग करता हूं, अर्थात। इंटरफ़ेस में 1 मॉड्यूल की घोषणा करते समय, इस चर के साथ काम करने में त्रुटियां, विशेष रूप से
इकाई Unit2;
इंटरफेस
जीत का उपयोग करता है ... आदि।
implemenation
Unit1 का उपयोग करता है;
प्रक्रिया proc1 ();
// यहाँ मैं 1 मॉड्यूल से एक चर का उपयोग करता हूं
अंत;
प्रक्रिया Str1 (Str2: स्ट्रिंग);
शुरू करना
// यहाँ मैं 1 मॉड्यूल को आउटपुट भेजता हूं
Unit1.Label1.Caption: = Str2; // यहां त्रुटि
...
अंत;



ossa   (2003-08-18 09:20) [10]

धन्यवाद पैलाडिन, अनातोली पॉडगोरेट्स्की, स्कीयर, ज़चो
मॉड्यूल_नाम_ स्थान_अतिक्रमण_फॉर्म .ormUnit.Label1.Caption: = Str2;
Unit1.Form1.Label1.Caption: = Str2;

यहाँ यह था, बस जरूरत है! धन्यवाद!



Anatoly Podgoretsky   (2003-08-18 09:22) [11]

इसलिए आपके पास लेबलएक्सएमयूएमएक्स नाम की एक वस्तु नहीं है, एक बड़ा संदेह है कि यह जो भी रूप का सदस्य है।
हालाँकि, आपसे एक विज्ञापन क्यों नहीं लिया गया था?



ossa   (2003-08-18 09:29) [12]

अनातोली पॉडगोरेट्स्की © (18.08.03 09: 22) [11]
इसलिए आपके पास लेबलएक्सएमयूएमएक्स नाम की एक वस्तु नहीं है, एक बड़ा संदेह है कि यह जो भी रूप का सदस्य है।
हालाँकि, आपसे एक विज्ञापन क्यों नहीं लिया गया था?

हां, ऐसी कोई वस्तु नहीं है, मैंने इसमें वर्णित किया है
यूनिट प्रो;
इंटरफेस
का उपयोग करता है
विंडोज, संदेश, SysUtils, कक्षाएं, ग्राफिक्स, नियंत्रण, प्रपत्र, संवाद,
StdCtrls;
टाइप
TFormUnit = वर्ग (TForm)
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
Edit5: TEdit;
Button1: TButton;
Label1: TLAB;
Label2: TLAB;
Label3: TLAB;
Label4: TLAB;
Label5: TLAB;
Edit6: TEdit;
Label6: TLAB;
Label7: TLAB;
Label8: TLAB;
Label9: TLAB;
प्रक्रिया Edit1Change (प्रेषक: TObject);
प्रक्रिया Edit4Change (प्रेषक: TObject);
प्रक्रिया Edit5Change (प्रेषक: TObject);
प्रक्रिया Edit6Change (प्रेषक: TObject);
प्रक्रिया Edit3Change (प्रेषक: TObject);
प्रक्रिया Edit2Change (प्रेषक: TObject);
प्रक्रिया Button1Click (प्रेषक: Tobject);
निजी
{निजी घोषणाएँ}
सार्वजनिक
{सार्वजनिक घोषणाएँ}
अंत;

था
फॉर्म यूनीट: TFormUnit;
मस्का, मस्कैड, मास्कगूड, स्ट्रैडियल, स्ट्रैबड, स्ट्रीडियल: स्ट्रिंग;

कार्यान्वयन
UnitFile का उपयोग करता है;
{$ R * .DFM}

मेरे पास एक प्रश्न है, वे किसी अन्य मॉड्यूल से विस्तार से वर्णन नहीं कर सकते हैं, आपने प्रश्न कैसे देखा (यानी अन्य विकल्प, और इससे पहले क्या होना चाहिए)



Anatoly Podgoretsky   (2003-08-18 09:37) [13]

प्रारूप सरल है मॉड्यूल। सदस्य .... सदस्य
सरलीकृत - बाईं ओर बाईं ओर गिरा दिया जाता है



ossa   (2003-08-18 09:48) [14]

यानी ताकि उपयोग न हो
Unit1.Form1.Label1.Caption: = Str2;
और उदाहरण के लिए उपयोग करें
Label1.Caption: = Str2;

मुझे (किसी प्रकार की वस्तु) या क्या बनाने की आवश्यकता है ...
ईमानदारी से, मुझे समझ नहीं आ रहा है? (यदि मैं एक चर का उपयोग करता हूं जिसे चर खंड में वर्णित किया गया है (यानी, इसका एक उदाहरण बनाएं), तो Unit1.Form1 की आवश्यकता नहीं है, और अगर यह TYPE खंड में वर्णित है (अर्थात केवल वर्णन करें ऑब्जेक्ट), तो आपको Unit1.Form1.Label1.Caption चाहिए: = Str2 (या फिर मैं इसे कैसे एक्सेस कर सकता हूं?)।



Bel   (2003-08-18 10:44) [15]

आप केवल इकाई नाम को छोड़ सकते हैं, यह केवल तभी आवश्यक है जब आपके पास दो इकाइयों (चर नाम, उदाहरण के लिए) में दो समान पहचानकर्ता हों। उदाहरण के लिए, Unit1 और Unit2 इकाइयों में, समान नाम वाले प्रपत्रों का वर्णन किया गया है: Form1: TForm1। फिर आपको यह स्पष्ट रूप से इंगित करने की आवश्यकता है कि आप किस रूप से एक्सेस कर रहे हैं: Unit1.Form1 या Unit2.Form1।



पन्ने: 1 पूरी शाखा

मंच: "मुख्य";
वर्तमान संग्रह: 2003.09.01;
डाउनलोड करें: [xml.tar.bz2];

ऊपर





मेमोरी: 0.6 एमबी
समय: 0.087 c
4-1728
आईआरक्यू
2003-06-27 11:26
2003.09.01
उपकरण पट्टी


14-1581
Ketmar
2003-08-13 21:04
2003.09.01
वर्र्क्स को शानदार संदेश। मैंने लगभग बीयर पी ली ...


1-1368
Franzy
2003-08-17 15:03
2003.09.01
स्पिंचिट के साथ गड़बड़।


3-1348
ED
2003-08-06 11:26
2003.09.01
चयन क्वेरी में, आप एक ही प्रकार के कई फ़ील्ड रख सकते हैं


3-1275
डेनिस टकाचोव
2003-08-11 11:59
2003.09.01
ट्रिगर बनाने में समस्या





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