این خط را به چه شکلی باید بازنویس کرد تا خطای ناشی از char , widChar رفع شود؟ متشکرمif not( key in ['0'..'9',#46,#8]) then key:=#0;
این خط را به چه شکلی باید بازنویس کرد تا خطای ناشی از char , widChar رفع شود؟ متشکرمif not( key in ['0'..'9',#46,#8]) then key:=#0;
آخرین ویرایش به وسیله khoshblagh : یک شنبه 29 مهر 1397 در 11:49 صبح
با سلام
این کد را در یک سایت روسی پیدا کردم. مسئله حل شد.if (not CharInSet(Key, ['0' .. '9', ',',Chr(8),',',Chr(46)])) then key:=#0;