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

नीचे

जब कीस्ट्रोके हैंडलर चालू होता है तो टीईडिट एक बीप उत्पन्न नहीं करता है। इसी तरह की शाखाएँ खोजें


voronkov   (2001-12-18 12:27) [0]

इस परेशानी से थक गए और पता नहीं कैसे लड़ें। TEdit में मैं OnKeyDown कीस्ट्रोक हैंडलर का उपयोग करता हूं। मैं कीस्ट्रोक्स जैसे एंटर, एस्केप और अन्य को पकड़ता हूं। ऐसी चाबियों को दबाने के बाद, एक ध्वनि संकेत लगता है। यदि कोई साउंड कार्ड है, तो ध्वनि योजना के सेट से संकेत, यदि नहीं, तो कंप्यूटर स्पीकर काम करता है। उपयोगकर्ता हाउल, मैं उनके साथ बैठता हूं, हाउल भी। कंप्यूटरों में चढ़ना और बोलने वालों को काटना असुरक्षित लगता है। इसे कैसे रौंदें?



Anatoly Podgoretsky   (2001-12-18 12:34) [1]

कुंजी: = # 0



Anatoly Podgoretsky   (2001-12-18 12:36) [2]

क्षमा करें, OnKeyPress के बारे में सोचा



Виктор Щербаков   (2001-12-18 12:42) [3]

OnKeyDown के बारे में क्या? हाल ही में भी यही समस्या थी।
रिचएडिट का उपयोग करना था।



Владислав   (2001-12-18 12:58) [4]

तो समस्याएं क्या हैं?
आपको OnKeyPress और Key: = # 0 जोड़ना होगा;



Teacher   (2001-12-18 13:02) [5]

मैं OnKeyUp को संसाधित करता हूं, मैं OnKeyDown में संसाधित कोड प्राप्त करते समय असाइनमेंट #0 के अलावा कुछ नहीं करता।



Виктор Щербаков   (2001-12-18 13:04) [6]

व्लादिस्लाव को ©
मदद से:
कुंजी जो "t एक ASCII चार मूल्य (शिफ्ट या F1, उदाहरण के लिए) के अनुरूप नहीं है" डॉन एक OnKeyPress घटना उत्पन्न करते हैं।



Владислав   (2001-12-18 13:06) [7]

> विक्टर शार्बाकोव © (18.12.01 13: 04)

हां, लेकिन भगवान का शुक्र है कि वे "चीख़" नहीं करते हैं।



Виктор Щербаков   (2001-12-18 13:09) [8]

उदाहरण के लिए Ctrl + S आज़माएं :)



Владислав   (2001-12-18 13:19) [9]

> विक्टर शार्बाकोव © (18.12.01 13: 09)

हालांकि "झांकना" नहीं है?

कुछ और आप सोच सकते हैं?

:)))



voronkov   (2001-12-18 13:19) [10]

मैंने कुंजी एम्बेड करने की कोशिश की: = 0 OnKeyUp में, समस्या बनी रही। अच्छा खा लिया, क्या करना है?



Dmitriy(new)   (2001-12-18 14:29) [11]

TMyEdit = class (TEdit)
...
प्रक्रिया कीप्रेस (var कुंजी: चार); ओवरराइड;
...
अंत;

प्रक्रिया TMyEdit.KeyPress (var कुंजी: चार);
शुरू करना
मामले की कुंजी
#1..#12,#14..#26,#28..#255:;
अन्य कुंजी: = # 0;
अंत;
अंत;


और "चीख़" न करें।



cdaDmitriy   (2001-12-18 15:22) [12]

काम करते हैं?



panov   (2001-12-18 15:26) [13]

इसे आज़माएं:
प्रक्रिया TfDocEdit.FormKeyPress (प्रेषक: Tobject; var कुंजी: चार);
शुरू करना
अगर (की = #27) तो
शुरू करना
कुंजी: = # 0;
अगर (fDocEdit.ActiveControl TEdit है) तो
शुरू करना
TEdit (fDocEdit.ActiveControl)। पाठ: = vPrevValue;
TEdit (fDocEdit.ActiveControl) .Modified: = गलत;
अंत;
अंत;
अगर (की = #13) तो
शुरू करना
कुंजी: = # 0;
प्रदर्शन (WM_NEXTDLGCTL, 0,0);
अंत;
अंत;



panov   (2001-12-18 15:27) [14]

और सेट करने के लिए मत भूलना
TfDocEdit.KeyPreview: = सच;



cdaDmitriy   (2001-12-18 15:32) [15]

>> पनोव ©
कीपरव्यू भूल गया: = सच;
और सवाल यह है कि अगर आप फॉर्म / प्रोजेक्ट 10 ..n TEdit पर क्या करेंगे?

OOP को भूल गए



voronkov   (2001-12-18 16:06) [16]

दोस्तों, आप सभी को धन्यवाद। साथ में झांकना मत
मामले की कुंजी
#13: शुरू करें
...
अंत;
अन्य कुंजी: = # 0;
अंत;
, OnKeyPress में, हालांकि इस घटना के साथ काम करना थोड़ा असामान्य है, क्योंकि मैं V_ _ जैसे स्थिरांक के साथ काम कर रहा हूं।
दुर्भाग्य से, मैं एक बड़ी मात्रा में मैनुअल इनपुट के साथ एक कार्यक्रम लिख रहा हूं और अक्सर अलग-अलग टीईडिट को एक ही कुंजी के लिए अलग-अलग जवाब देना चाहिए, अन्यथा आप फॉर्म ईवेंट का उपयोग कर सकते हैं। इसलिए यहां पीएलओ रूसी लोकतंत्र के पिता को नहीं बचाता है।



panov   (2001-12-18 16:12) [17]

> cDDmitriy © (18.12.01 15: 32)
आप प्रत्येक को इस हैंडलर का नाम लिखें।



cdaDmitriy   (2001-12-18 16:15) [18]

> पनोव © OOP को भूल गया
आप एक बार एक नया घटक (T..Edit) बनाते हैं

प्रक्रिया कीप्रेस (var कुंजी: चार); ओवरराइड;

और इसका उपयोग करें



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

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

ऊपर





मेमोरी: 0.6 एमबी
समय: 0.035 c
14-22393
फेलिक्स
2001-11-08 21:54
2002.01.08
क्या करना है?


14-22387
- = क्रेजीफिश = -
2001-11-09 16:28
2002.01.08
सवाल विषय नहीं है


6-22311
बिगफुट
2001-10-04 19:27
2002.01.08
दूर से


7-22420
Cntcyz.cm crfpfnm cdjt bvz
2001-09-21 21:12
2002.01.08
लोग मुझे बताते हैं कि कैसे होना है?


1-22249
यूजीन ज़ेलिकोवस्की
2001-12-17 13:53
2002.01.08
TTimer का उपयोग किए बिना कुछ समय कैसे प्रतीक्षा करें





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