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

नीचे

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


dmk ©   (2015-09-11 04:26) [0]

हैलो! यदि आप TValueListEditor में TCheckBox को चाइल्ड कंट्रोल के रूप में रखते हैं, तो TCheckBox के संदेश प्राप्त नहीं होते हैं। सिर्फ OnClick पर हैंडलर लगाने से काम नहीं चलता। TCheckBox से एक वारिस बनाया गया। सवाल बेशक हल हो गया है, लेकिन शायद एक सरल तरीका है?

यहाँ कोड है:
इकाई FM_test_02; इंटरफेस का उपयोग करता है Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.Grids, Vcl.ValEdit; प्रकार TDmCheckBox = वर्ग (TCheckBox) निजी फॉनक्लिक: TNotifyEvent; प्रक्रिया WMLButtonUp (var संदेश: TWMLButtonUp); संदेश WM_LBUTTONUP; प्रॉपर्टी ऑनक्लिक: TNotifyEvent read FOnClick लिखना फॉनक्लिक; जनता समाप्त; प्रकार TForm1 = वर्ग (TForm) ValueListEditor1: TValueListEditor; प्रक्रिया फॉर्मशो (प्रेषक: Tobject); प्रक्रिया चेकबॉक्सक्लिक करें (प्रेषक: TObject); निजी {निजी घोषणाएँ} जनता {सार्वजनिक घोषणाएँ} समाप्त; वर फॉर्म 1: TForm1; FCheckBox: TDmCheckBox; कार्यान्वयन {$ R * .dfm} प्रक्रिया TDmCheckBox.WMLButtonUp (var संदेश: TWMLButtonUp); शुरू विरासत में मिला; यदि असाइन किया गया (फ़िनक्लिक) तो फ़ोकक्लिक (स्व); समाप्त; प्रक्रिया TForm1.CheckBoxClick (प्रेषक: TObject); शुरू FCheckBox.Checked: = FCheckBox.Checked नहीं; समाप्त; प्रक्रिया TForm1.FormShow (प्रेषक: Tobject); शुरू FCheckBox: = TDmCheckBox.Create (nil); FCheckBox.Parent: = ValueListEditor1; FCheckBox.OnClick: = चेकबॉक्स क्लिक करें; FCheckBox.Caption: = "TDmCheckBox"; FCheckBox.Left: = 3; FCheckBox.Top: = 19; FCheckBox.V अदृश्य: = सच; समाप्त; समाप्त।
डेल्फी XE6



Юрий Зотов ©   (2015-09-11 14:39) [1]

http://www.cyberforum.ru/delphi-beginners/thread340882.html



dmk ©   (2015-09-11 17:14) [2]

यूरी जोतोव © (11.09.15 14: 39) [1]
वहां कोड काम नहीं कर रहा है। बहुत अंत में, मान्यता;)

वास्तव में, मैंने इसे अच्छी तरह से जाना। सभी विकल्प या तो काम नहीं कर रहे हैं या भारी (जैसे एक खिड़की प्रक्रिया की जगह)। और DrawFrameControl का उपयोग करना एक विकल्प नहीं है, क्योंकि स्क्रॉल करते समय, आपको रेंडरिंग की निगरानी करने की आवश्यकता होती है, और इसलिए बच्चे का नियंत्रण हमेशा लटका रहता है जहां आवश्यक हो।
चलो ठीक है। वारिस छोड़ो। यह काम करता हैं;)



sniknik ©   (2015-09-12 01:15) [3]

इसे सामान्य रूप से कार्यान्वित किया जाता है (ईवेंट्स को केवल विंडो नियंत्रण में रखा जाता है), यह खाता है, मेमो, डीबीग्रिड (इनलेसेटर) ... ValueListEditor में एक विंडो और विंडोज़ विंडो है जो विशुद्ध रूप से डेल्फ़िक परत द्वारा बंद है। स्पष्ट रूप से यह मामला है कि उन्होंने इसे "आगे" नहीं किया।
लेकिन अगर आप इसे पहले "विंडो" पर रखते हैं, तो यह काम करेगा, जैसे कि
CheckBox1.Parent: = Edit1; CheckBox1.Left: = 3; CheckBox1.Top:= 3; Edit1.Parent: = ValueListEditor1; Edit1.Left: = 3; Edit1.Top:= 19;



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

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

ऊपर





मेमोरी: 0.56 एमबी
समय: 0.011 c
8-1240992981
Diha
2009-04-29 12:16
2017.05.21
डेल्फी का उपयोग करके वीडियो चलाएं


15-1462129379
DayGaykin
2016-05-01 22:02
2017.05.21
सुरक्षा Keepass 2


2-1441869771
vegarulez
2015-09-10 10:22
2017.05.21
क्लास या ऑब्जेक्ट कैसे बनाते हैं।


15-1461762512
KSergey
2016-04-27 16:08
2017.05.21
विज़ुअल स्टूडियो कोड क्या है?


2-1441716490
थीड
2015-09-08 15:48
2017.05.21
TDBGrid तार (एह) रंग के साथ कुछ बेवकूफ





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