(ord(key کلید back

[matinebi]

من برای محدود کردن کاربران به این که فقط عدد وارد نماییند به این صورت عمل کرده ام

if (ord(Key)<48) or (ord(key)>57) then

key:=#0;

مشکل اینجاست که کلید back هم غیر فعال میشه

[daffy_duck376]

اين كد ره تو on key press بنويس و كد خودتو بگذار كنار

if key NOT in ['1','2','3',4','5','6',7','8','9','0',#8,#13] then
key :=#0

برو حالشو ببر

[matinebi]

اين كد ره تو on key press بنويس و كد خودتو بگذار كنار

if key NOT in ['1','2','3',4','5','6',7','8','9','0',#8,#13] then
key :=#0

برو حالشو ببر

این ارور رو میده missing operator or semicolon

if key NOT in ['1','2','3','4','5','6','7','8','9','0',#8,#13] then

key :=#0;

[daffy_duck376]

شرمنده هر عدد رو بايد به صورت 'عدد'‌بنويسي تو كد بالا عدد 4 و 7رو دقت كن اشتباه من بود

[matinebi]

بازم همین طوریه رو not ارور میگیره

[s.mostafa.rahmani]

if not (key in ['0'..'9',#8,#13]) then 

key :=#0;

[daffy_duck376]

يه نگاهي به اين تاپيك بنداز توش يه برنامه هست كه يه عالمه كد رو توش هست اين كد هم توش هست برنامه رو خودم نوشتم كد ها هم تست شده هستن
https://barnamenevis.org/showthread.php?t=118369