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

नीचे

कॉल विधि इसी तरह की शाखाएँ खोजें


anbezr   (2003-04-19 13:23) [0]

हाय!
मेरे पास कई घटक हैं, विभिन्न वर्गों के वंशज हैं (TGpaphicControl, TCutomControl)। वे सभी एक Init विधि है।
फॉर्म को नियंत्रित करते समय पुनर्निर्माण कैसे करें।
i: = 0 से ControlCount - 1 करते हैं
शुरू करना
अगर (शर्त संतुष्ट) तो
शुरू करना
नियंत्रण [i] .Init;
अंत;
अंत;
मैंने इसे आजमाया, लेकिन यह कारगर नहीं हुआ
MyControl = class (TControl) टाइप करें
सार्वजनिक
प्रक्रिया Init;
अंत;
...
(नियंत्रण [i] TMyControl के रूप में)
कहते हैं कि प्रकारों को बदलना संभव नहीं था।
धन्यवाद



anbezr   (2003-04-19 14:30) [1]

मुझे डेल्फी बहुत पसंद है
InitMethod: = FindField (नियंत्रण [i], MODBUS_DEVICE_SIGN);
अगर (InitMethod.Code <> nil) और (InitMethod.Data <> nil) तो
शुरू करना
TMethod (InitProc)। कोड: = InitMethod। कोड;
TMethod (InitProc)। डेटा: = InitMethod.Data;
InitProc (DevList);



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

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

ऊपर





मेमोरी: 0.54 एमबी
समय: 0.019 c
6-662
nikb
2003-03-05 01:07
2003.05.01
ClientSocket को ServerSocket से कनेक्ट करें


1-543
tv
2003-04-21 10:58
2003.05.01
ट्री व्यू और यूनिकोड


1-553
Masha
2003-04-21 13:05
2003.05.01
खींचें और छोड़ें


14-783
Tytus
2003-04-15 17:55
2003.05.01
घटक देखें।


3-377
xmrz
2003-04-14 18:00
2003.05.01
IB, FB या Yaffil?





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