PDA

View Full Version : تعریف آرایه حروف فارسی در دلفی XE2



mahdy.asia
سه شنبه 21 خرداد 1392, 17:38 عصر
من با دلفی 7 کار می کردم تازه با دلفی XE2 شروع بکار کردم برای تعریف آرایه کلیدهای تایپ توی دلفی 7 بشکل زیر تعریف می کردم

Const
ValidDigitAlphabet : Set of Char = ['0'..'9','a'..'z','A'..'Z','پ'..'ü','/','.',' ','-','_'];
حالا این کد رو تو دلفی XE2 قسمت فارسی جواب نمی ده بازه حروف الفبای فارسی رو چطور به سیستم معرفی کنم

'پ'..'ü'

khorsandreza
سه شنبه 21 خرداد 1392, 18:42 عصر
Main: array[1..3,0..9]of string = (('', 'يكصد و', 'دويست و', 'سيصد و', 'چهارصد و', 'پانصد و', 'ششصد و', 'هفتصد و', 'هشتصد و', 'نهصد و'),
('', '', 'بيست و', 'سي و', 'چهل و', 'پنجاه و', 'شصت و', 'هفتاد و', 'هشتاد و', 'نود و'),
('', 'يك', 'دوو', 'سه', 'چهار', 'پنج', 'شش', 'هفت', 'هشت', 'نه'));




EngStr : String[35] = 'آابپتثجچحخدذرزژسشصضطظعغف كگلمنوهيءئ';
FarStr : String[35] = '';
g_days_in_month : Array[1..12] Of Byte = (31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);

mahdy.asia
سه شنبه 21 خرداد 1392, 19:24 عصر
من از یک تابع داخلی توی دلفی XE2 استفاده کردم

if IsLetterOrDigit(key) then
مشکلم برطرف شد اما روش دوست عزیزم khorsandreza (http://barnamenevis.org/member.php?73948-khorsandreza) می تونه این اشکال رو بر طرف کنه ضمنا کد مذکور که قبلا استفاده می کردم خطای کامپایلر نداشت فقط بازه حروف فارسی رو در نظر نمی گرفت