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

नीचे

शीघ्र nachset TLIST इसी तरह की शाखाएँ खोजें


Dreamer   (2001-12-17 14:17) [0]

एक सरणी है, जिसके लिए मैं मान निर्दिष्ट करता हूं और तुरंत इसे एक सूची में डाल देता हूं, फिर मुझे सरणी के मापदंडों को बदलने की आवश्यकता है और तदनुसार इसलिए कि tlist उन्हें भी देखता है, मैं एक एल्गोरिथ्म लाता हूं जिसमें सूची अपडेट नहीं देखती है :(



था
Form1: TForm1;
k: पूर्णांक;
मवाद: पूर्णांक की सरणी;
एन: पूर्णांक;
सूचीपत्र: सूची;
ukazpusk: PDouble;
जी: विस्तारित;


कार्यान्वयन

{$ R * .dfm}

प्रक्रिया TForm1.Button1 क्लिक करें (प्रेषक: TObject);
था
k: पूर्णांक;
शुरू करना
ListPUSK: = Tlist.Create;
n: = 4;
सेटलॉग्र्थ (PUSK, N);
k: = 0 से N-1 करते हैं
शुरू करना
pusk [k]: = k + 1;
न्यू (ukazPUSK);
ukazpusk ^: = pusk [k];
ListPUSK.Add (ukazPUSK);
अंत;

k: = 0 से N-1 करते हैं
शुरू करना
pusk [k]: = 8;
अंत;


k: = 0 से N-1 करते हैं
शुरू करना
ukazpusk: = LISTPUSK [k];
अगर ukazPUSK ^ = 8 तो
g: = ukazPUSK ^ -2;
अंत;

अंत;



MBo   (2001-12-17 14:24) [1]

पहले आप कॉपी शीट पॉइंटर्स में सरणी मानों की प्रतियां,
कहीं और स्थित है!

मुझे लगता है कि आपकी समस्या को बहुत आसान हल किया जाना चाहिए, और सबसे अधिक संभावना है कि आपको एक सरणी की आवश्यकता नहीं होगी। मूल समस्या बताइए।



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

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

ऊपर





मेमोरी: 0.54 एमबी
समय: 0.02 c
3-21974
dup
2001-12-06 10:30
2002.01.08
TQRExpr


6-22309
गाढ़ा
2001-10-10 19:02
2002.01.08
पासपोर्ट के बिना एक नेटवर्क कार्ड है, जिसे सील किया गया है!


14-22360
RUS
2001-11-07 19:16
2002.01.08
इंटरनेट एक्सप्लोरर


1-22015
शिकारी
2001-12-17 13:17
2002.01.08
चित्र प्रिंटर के लिए


6-22296
Kolyan
2001-10-11 12:49
2002.01.08
TSocket!





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