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

नीचे

कैसे जांचें कि फॉर्म मारा गया है? इसी तरह की शाखाएँ खोजें


Ivan_A   (2002-03-20 16:30) [0]

फॉर्म उपलब्ध है।
अगर InForm = nil तो ... (निकाल दिया गया)
InForm: = TInForm। Create (सेल्फ);
कोशिश
InForm.ShowModal;
आखिरकार
InForm.Free;
अंत;

यदि InForm = nil तो ... (काम नहीं करता है)



Fellomena   (2002-03-20 16:34) [1]

और अगर InForm = nil तो ... और काम नहीं करना चाहिए, क्योंकि InForm में अभी भी प्रपत्र के लिए एक सूचक है।
कार्य करें:
आखिरकार
InForm.Free;
InForm: = nil;
अंत;



serg   (2002-03-20 17:14) [2]

प्रपत्र उपलब्धता के लिए जाँच करें:
1। यदि असाइन किया गया (TheForm) और (TOBject) (TheForm) तो TForm है
यह एक मौजूदा रूप है।

2। I: = 0 से लेकर Screen.FormCount-1 तक
अगर Screen.Forms [I] = TheForm तो शुरू होता है
रूप मौजूद है।
तोड़;
समाप्त



Вячеслав   (2002-03-20 18:18) [3]

ज़्नक्सक्स सर्ग
असाइन किया गया फ़ंक्शन केवल शून्य के लिए जाँच करता है, और यह हमेशा काम नहीं करता है।
यह काम करता है यदि आप उसे जारी करते हैं जैसा कि फेलोमेना ने लिखा था।



oomneeq   (2002-03-20 18:46) [4]

> 2। I: = 0 से लेकर Screen.FormCount-1 तक
> यदि स्क्रीन। पोर्स [I] = TheForm तो शुरू करें
> फॉर्म मौजूद है।
> विराम;
> अंत
अच्छा तरीका है, विचार के लिए धन्यवाद।
मुख्य बात यह है कि ड्रम पॉइंटर की अस्वच्छता असाइन किए गए इन सभी आश्चर्यों को प्रभावित नहीं करती है




Mikhail   (2002-03-20 18:49) [5]

प्रक्रिया FreeAndNil (var Obj);

विवरण

FreeAndNil का उपयोग यह सुनिश्चित करने के लिए करें कि आपके द्वारा संदर्भित ऑब्जेक्ट को मुक्त करने के बाद एक चर शून्य है। किसी भी चर को पास करें जो ओब्ज पैरामीटर के रूप में एक ऑब्जेक्ट का प्रतिनिधित्व करता है।



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

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

ऊपर









मेमोरी: 0.56 एमबी
समय: 0.021 c
1-158
Maxie
2002-03-22 11:20
2002.04.01
सेट के साथ शोर्टस्ट्रिंग कैसे संयोजित करें?


14-296
एनएलओ
2002-02-19 13:08
2002.04.01
समीकरण समाधान


1-87
Alexandr_H
2002-03-20 18:56
2002.04.01
FileStream में एक साधारण स्ट्रिंग कैसे दर्ज करें?


7-335
Filat
2001-12-19 15:45
2002.04.01
एक डिजिटल वाल्टमीटर - ASM से डेल्फी तक एक प्रोग्राम को कैसे रीमेक या एम्बेड किया जाए।


1-148
Kull
2002-03-19 11:16
2002.04.01
मुझे टीसीआईआरएडिट जैसे घटक को खोजने में मदद करें।





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