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

नीचे

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


saha   (2003-04-18 17:52) [0]

नमस्कार। यहाँ हाल ही में मैंने फिक में संकेत के साथ काम करने का एक उदाहरण पाया
उद्भव}
इफ़ h <> nil H.ReleaseHandle; {यदि किसी के पास पहले से ही संकेत था, तो उसे भुगतान करें}
H: = THintWindow.Create (विंडो-मालिक संकेत);
H.ActivateHint (H.CalcHintRect (...), "hint hint nint");
....
{अनुपयोगी :) - टाइमर पर लटकना आवश्यक हो सकता है, जो होगा हर नए संकेत के साथ}
इफ़ h <> nil H.ReleaseHandle;
सब कुछ ठीक निकला, वर्तमान संकेत स्क्रीन के ऊपरी बाएँ कोने में दिखाई देता है, यदि आप HintHandle.PaintTo (RXDBGrid1.Canvas, 10,20) लागू करते हैं; फिर सब कुछ ठीक है संकेत आवश्यक प्रतीत होता है, लेकिन ऊपरी बाएं कोने में दिखाई देने वाला भी दिखाई देता है। कैसे एक प्रकट करने के लिए?
यहाँ कोड है:
यदि HintHandle = nil तब HintHandle: = THintWindow.Create (RXDBGrid1);
HintString: = HintString + कुंजी;
HintHandle.PaintTo (RXDBGrid1.Canvas, 10,20);
HintHandle.ActivateHint (HintHandle.CalcHintRect (लंबाई (hintString) * * 10, hintString, sss), HintString);



Skier   (2003-04-18 18:00) [1]

मदद नहीं करेगा?

यदि HintHandle = nil तब HintHandle: = THintWindow.Create () आवेदन);
HintString: = HintString + कुंजी;
HintHandle.ActivateHint (HintHandle.CalcHintRect (लंबाई (hintString) * * 10, hintString, sss), HintString);



saha   (2003-04-18 18:08) [2]

नहींं, इसके अलावा, संकेत जो हर समय की आवश्यकता होती है वह एक वर्ण के पीछे होता है (यह सब मेरे पास RxDBGrid1KeyPress प्रक्रिया में है)



Skier   (2003-04-18 18:11) [3]

> साहा
शायद यह संकेत के लिए आयत की गणना के बारे में है;
यह स्क्रीन निर्देशांक में होना चाहिए ... देखो ...



saha   (2003-04-18 18:47) [4]

और देखने के लिए क्या है?
किसी अन्य पंक्ति, वास्तविक स्ट्रिंग, और एक पॉइंटर को लपेटे बिना अधिकतम लंबाई का उपयोग नहीं किया जाता है (जैसा कि सहायता में लिखा गया है
नोट: CalcHintRect AData पैरामीटर को अनदेखा करता है। वंशज वर्ग संबंधित संकेत डेटा का उपयोग करने के लिए इस पद्धति को ओवरराइड कर सकते हैं।)



NickBat   (2003-04-18 19:00) [5]

प्रक्रिया TFormMain.MyHintShow;
शुरू करना
MyHintHide;
संकेतवादक: = सत्य;
MyHint: = THintWindow.Create (स्व);
MyHint.Color: = clMyHint;
MyHint.ActivateHint (MyRct, "TRA-LA-LA");
अंत;
अंत;

प्रक्रिया TFormMain.MyHintHide;
शुरू करना
अगर hintexists
तब शुरू करें
संकेतवाद: = गलत;
MyHint.ReleaseHandle;
MyHint.Free;
अंत;
अंत;



Skier   (2003-04-18 19:01) [6]

मैं कहता हूं स्क्रीन निर्देशांक

आपको केंद्र में "के बारे में" संकेत मिलेगा,
(कोड गूंगा है, लेकिन दृश्य ...):
प्रक्रिया TForm1.Button1 क्लिक करें (प्रेषक: TObject); वर हिंटस्ट्रिंग: स्ट्रिंग; शुरू करना यदि HintHandle = nil तब HintHandle: = THintWindow.Create (अनुप्रयोग); हिंटस्ट्रिंग: = "हैलो, दुनिया!"; HintHandle.ActivateHint (Rect (स्क्रीन .id div 2) स्क्रीन। Hight div 2, स्क्रीन। Div 2 + 50, स्क्रीन। Hight div 2 + 15) , हिंटस्ट्रिंग); अंत;



saha   (2003-04-18 19:20) [7]

स्पष्ट है।
लेकिन क्या CalcHintRect फ़ंक्शन केवल ऊपरी बाएं कोने में संकेत देता है?
फिर THintWindow.Create (टाइप करें TComponent) क्यों? मैंने सोचा
यह एक विशिष्ट घटक से जुड़ा एक संकेत बनाता है, और पहले से ही इसके सापेक्ष नृत्य करता है। लेकिन आपके शब्दों को देखते हुए ऐसा नहीं है, लेकिन यह अफ़सोस की बात है कि आपको यह संकेत देना होगा कि संकेत कहाँ पर भेजना है।



Skier   (2003-04-18 19:27) [8]

> साहा

> मैंने सोचा
> यह एक विशिष्ट घटक से जुड़ा एक संकेत बनाता है,
> और पहले से ही उसके बारे में आगे नृत्य।

हाँ - tethered, सिर्फ "tethered घटक" से मतलब है?



saha   (2003-04-18 19:33) [9]

> हाँ-टेथर्ड, बस "टेदर्ड कंपोनेंट" से मतलब है?

खैर, जो बनाने में घोषित किया जाता है



Skier   (2003-04-18 19:36) [10]

> साहा
मैं आपको सलाह दूंगा ध्यान से के बारे में पढ़ें मालिक घटक और इसके जनक (या इसके कंटेनर) और अंतर को समझें, तो सभी पुटासिन गायब हो जाएंगे
"सफेद सेब के पेड़ों से धुआं ..." :)



saha   (2003-04-18 19:45) [11]

ठीक है.
खैर, संयोग से, फिर एक छोटा सा सवाल।
उदाहरण के लिए, फॉर्म के ऊपरी बाएं किनारे के निर्देशांक को कैसे जानें?



Skier   (2003-04-18 19:45) [12]

TForm.Left और TForm.Top देखें



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

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

ऊपर





मेमोरी: 0.58 एमबी
समय: 0.024 c
3-433
Filat
2003-04-10 20:31
2003.05.01
फायरबर्ड बेस - DBGrid?


1-630
माउस
2003-04-18 17:25
2003.05.01
अपने गैर-विज़ुअल घटक से प्रपत्र गुण कैसे बदलें


1-599
मेथोडियास
2003-04-15 20:39
2003.05.01
संरेखण स्ट्रिंग ^ I क्या है?


1-528
Kair
2003-04-19 23:14
2003.05.01
ListBox.Item


3-372
धुंधला
2003-04-11 10:30
2003.05.01
DBCtrlGrid + DBText





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