delphi4arab منتديات دلفي للعرب
كيف يمكن السماح بكتابة عدد معين من الحروف في ايديت - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف يمكن السماح بكتابة عدد معين من الحروف في ايديت (/showthread.php?tid=8874)



كيف يمكن السماح بكتابة عدد معين من الحروف في ايديت - Strem - 16-09-2017

السلام عليكم ورحمة الله وبركاتة
كيف بمكاني تحديد حروف معينة للكتابه في ايديت



RE: كيف يمكن السماح بكتابة عدد معين من الحروف في ايديت - rahiche - 16-09-2017

و عليكم السلام
عنوان السؤال : كيف يمكن السماح بكتابة عدد معين من الحروف في ايديت
و هذا عن طريق الخاصية MaxLength تكتب العدد الاقصى
اما اذا كنت تقصد احرف معينة فهذا يتطلب شيء اخر
وضح سؤالك ...


RE: كيف يمكن السماح بكتابة عدد معين من الحروف في ايديت - mobile - 16-09-2017

وعليكم السلام ورحمة الله وبركاته
تعرف ثابت مثلا
كود :
const  Myconst = ['0','1','2','3','4','5','a','b','c','d','.',#8,#13] ;
ثم في الحدث OnkeyPress
كود :
if not (key in Myconst) then key :=char(VK_UNKNOWN);  

اما ان كنت تقصد عدد الحروف استعمل كما قال لك الاستاذ خاصية MaxLength

او برمجيا في الحدث onkeypress

if longth(edit1.text)>6 then key :=#0;


RE: كيف يمكن السماح بكتابة عدد معين من الحروف في ايديت - Strem - 16-09-2017

(16-09-2017, 06:47 PM)rahiche كتب : اما اذا كنت تقصد احرف معينة فهذا يتطلب شيء اخر
وضح سؤالك ...
شكرا لك اخي العزيز سؤالي واضح جدا كيف بمكاني تحديد حروف معينه

(16-09-2017, 07:56 PM)mobile كتب : if not (key in Myconst) then key :=char(VK_UNKNOWN);
جزاك الله كل خير