歪 歪就歪 Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-24 #3 procedure TForm1.Button1Click(Sender: TObject); var n: Integer; begin n := Ord('3'); ShowMessage(IntToHex(n, 4)); end;
procedure TForm1.Button1Click(Sender: TObject); var n: Integer; begin n := Ord('3'); ShowMessage(IntToHex(n, 4)); end;
沈 沈前卫 Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-24 #4 y9y: 那边的分该你拿： http://www.gislab.ecnu.edu.cn/delphibbs/dispq.asp?LID=204402
歪 歪就歪 Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-24 #5 沈前卫：呵呵，谢谢，我已经看到那贴了，你忙了半天，我不能拿那 分数，谢谢。你收了那分吧。
K koukou Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-25 #6 不好意思，是任意字符的 ASCII码，当然也包括汉字的……
K koukou Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-25 #7 ; 老大们把键盘的字符转换为ASCII码,,我当然会了,,只是怎样才能把任意的 汉字转化为ASCII码那,,,求你了,,给个回答好不好,,老大求你了
P Pipi. Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-25 #8 汉字要转为2个ascii，就是这样了。 也不用ord了，直接 integer(mychar) 就可以了
W wrench Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-26 #9 汉字和其它字符是一样的呀！ 取出字符串的每一位，然后ord()即可？
