+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : تحديد عدد الاحرف في TEdit (/showthread.php?tid=5429)
تحديد عدد الاحرف في TEdit - hmidadz - 29-07-2013
لديا Tedit1 خاص بالايام الاشهر كيف يمكنني تحديده ما بين 0 و31 ؟
تحديد عدد الاحرف في TEdit - SMP3 - 29-07-2013
PHP كود :
Edit1.MaxLength:=31;
تحديد عدد الاحرف في TEdit - Najy Ibraheem - 29-07-2013
السلام عليكم...
أعتقد أن الأخ hmidadz يقصد أن مربع النص يقبل فقط القيم من 0 إلى 31.
1. اضبط الخاصية MaxLength لمربع النص على 2.
2. في إجراء الحدث OnKeyPress اكتب الكود التالي لمنع كتابة الرموز غير الأرقام:
كود :
if Key > #31 then begin
if not (Key in ['0'..'9']) then Key := #0;
end;3. في الحدث OnChange اكتب الكود التالي لمنع تجاوز القيمة 31، حبث edtDay هو اسم مربع النص:
كود :
if Length(edtDay.Text) = 2 then begin
if StrToInt(edtDay.Text) > 31 then begin
edtDay.Text := '31';
edtDay.SelStart := 2;
end;
end;نرجو الاستفادة و السلام.
تحديد عدد الاحرف في TEdit - S.FATEH - 29-07-2013
السلام عليكم
او عن طريق استخدام TUpDown من صفحة Win32 قم بتغيير خاصية Associate الى Edit الخاص بك
ثم حدد خاصية max الى ما تريد
تحديد عدد الاحرف في TEdit - Najy Ibraheem - 29-07-2013
السلام عليكم...
أو أيضاً ComboBox مع ضبط الخاصية Style على csDropDownList.
سلام.
تحديد عدد الاحرف في TEdit - hmidadz - 30-07-2013
تم الحل و الله اشكركم يا اخوان بارك الله فيكم على الردود
