delphi4arab منتديات دلفي للعرب

السلام عليكم ورحمه الله
اود اتحكم فى الedit كى تقبل ارقام فقط وبعد قبول الارقام تقبل مفتاح الانتر لتنتقل للسطر التالى مرفق صوره وكود ولله الامر من قبل ومن بعد افادكم الله وزادكم علما وخلقا

[color="purple"]في المرفقات مثال على السريع
اعتقد انه الشيء الذي تبحث عنه
سلام[/color]

مشكور اخى الغالى على الاجابه الوافيه ودائما الى الامام ان شاء الله

تكتب في حدث OnkeyPress

كود :
if not (Key in ['0'..'9','.',#13,#8]) then Key:=#0;

وفي حدث OnkeyUp

كود :
if Key = VK_RETURN then 
   Showmessage(Edit1.Text);

أو أي كود آخر

delphi4arab منتديات دلفي للعرب

alyoseef

musvc

alyoseef

الكاسر الآخر