تبدیل کاراکتر(متغیر از نوع چار) به کد اسکی و برعکس

[peiman]

سلام به همه
برای تبدیل یه کاراکتر به کد اسکی و برعکس (تبدیل کد اسکی به کاراکتر) چه دستوری وجود داره
اصلا برای همچین کاری دستور وجود داره؟

 

[saeedsmk]

توي چه زبوني؟
مثلا توي vb
a=chr(12)
stringdumm=asc("a"(

 

[peiman]

خب اینجا فروم دلفی هست نه؟

 

[mamizadeh]

با سلام
دستور chr برای تبدیل کد اسکی به کاراکتر و دستور ord برای تبدیل کاراکتر به کد اسکی

 

[peiman]

ببین من یه مشکل دیگه دارم
من میخوام از یه رشته دونه دونه کاراکتر جدا کنم و کد اسکی شو مثلا بعلاوه سه کنم بعد دوباره یه رشتش کنم ولی با این دستور نمیشه یه رشته تک کاراکتری رو به کد تبدیل کرد
راه حلی واسه این کار من بلدی؟

 

[peiman]

در واقع میخوام یه رشته رو به کد اسکی تبدیل کنم
راهی داره؟

 

[behzad53a]

ببین من یه مشکل دیگه دارم
من میخوام از یه رشته دونه دونه کاراکتر جدا کنم و کد اسکی شو مثلا بعلاوه سه کنم بعد دوباره یه رشتش کنم ولی با این دستور نمیشه یه رشته تک کاراکتری رو به کد تبدیل کرد
راه حلی واسه این کار من بلدی؟

اگه منظ.رت رو درست فهميده باشم
اينطوري ميشه:

بجاي 5 اگه طول رشته رو نداري ميتوني strlen استفاده كني حتي اگه 1 كاراكتري هم باشه كار ميكنه.

اسكي هر كاراكتر با يكي كمتر از انديسش جمع شده و دوباره يه رشته جديد درست شده. شما ميتوني هر كار ديگه خواستي انجام بدي.

var
  i: Integer;
  str: string;
begin
  str := 'alaki';

  for i:= 1 to 5 do
    str[i] := Chr( Ord(str[i]) + i -1);

 

[peiman]

کاملا درسته
در واقع من برای این سوالم یه تاپیک دیگه درست کرده بودم با این حال از توجهت ممنونم
http://forum.persiantools.com/showthread.php?t=28626