V vfphome Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-26 #1 Delphi转换Accis编码的函数是什么?与CHR()相反的 最好有事例,,谢谢
K kkyy Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-26 #3 Showmessage(Inttostr(ord('A'))); 65
T tomol Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-26 #4 var ch: char; begin ch := 'A'; ShowMessage(IntToStr(ord(ch))); end;
Z zw84611 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-26 #6 汉字不是ASCII码吧。 来自:tseug, 时间:2002-11-26 15:40:00, ID:1461345 procedure TForm1.Button3Click(Sender: TObject); var S : String; W : WideChar; begin S := '好'; W := WideString(S)[1]; ShowMessage(IntToStr(Ord(W))); end;
汉字不是ASCII码吧。 来自:tseug, 时间:2002-11-26 15:40:00, ID:1461345 procedure TForm1.Button3Click(Sender: TObject); var S : String; W : WideChar; begin S := '好'; W := WideString(S)[1]; ShowMessage(IntToStr(Ord(W))); end;