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

नीचे

मुझे वास्तव में जरूरत है इसी तरह की शाखाएँ खोजें


Катя   (2001-12-20 08:27) [0]

कड़े में, मैं हालत से तार का चयन करता हूं और उन्हें टेबल से हटाने की आवश्यकता होती है-यह कैसे करना है? मैंने सभी मदद का इस्तेमाल किया, बहुत सारे कार्य हैं, लेकिन उनमें से कोई भी वास्तव में काम नहीं करता है ... या मैं सुबह में ब्रेक लगाऊंगा: ..-(



gek   (2001-12-20 08:41) [1]

खैर, ग्रिड से विरासत ले लो और वहाँ कार्यों को स्थानांतरित करें

प्रक्रिया रोवमेड (फ्रॉमइंडेक्स, टायंडेक्स: लॉन्गिंट); ओवरराइड;
प्रक्रिया ColumnMoved (FromIndex, ToIndex: Longint); ओवरराइड;
प्रक्रिया सम्मिलित करें (ToIndex: LongInt);
प्रक्रिया DeleteRow (DIndex: LongInt);

सार्वजनिक रूप से

ग्रिड में वे निजी हैं



MBo   (2001-12-20 08:47) [2]

प्रक्रिया TForm1.Button2 क्लिक करें (प्रेषक: TObject);
var i, j: पूर्णांक;
शुरू करना
StringGrid1 के साथ करते हैं
i: = RowCount-1 डाउन 0 करते हैं
यदि (आपकी स्थिति) तो शुरू करें
शुरू करना
पंक्तियाँ [i]। साफ़;
अगर मैं <राउकाउंट- 1 तो
j के लिए: = मैं रोवाउंट करने के लिए - 2 Rows [j] करता हूं। असाइन करें (Rows [j + 1])
RowCount: = RowCount - 1;
अंत;
अंत;
अंत;



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

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

ऊपर





मेमोरी: 0.54 एमबी
समय: 0.021 c
6-22293
Dark_Dan
2001-10-02 18:09
2002.01.08
सॉकेट मरना होगा !!!!!!!


3-21984
श्री एंड्रयू
2001-12-05 20:39
2002.01.08
डेटा अपडेट


1-22044
Eduard
2001-12-10 10:09
2002.01.08
ढांचा


1-22048
- == यूरका == -
2001-12-18 18:50
2002.01.08
ज्ञापन के साथ समस्या


14-22372
froz
2001-11-08 16:25
2002.01.08
अत्यावश्यक!





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