char() 和 ord() 到底怎么用？？？(50分)

5

567567

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-23

• #1

var
a:char;
b:string;
c:string;
begin
b:='21';
a:=ord(;
showmessage(a);
c:=char(a);
showmessage(c);

end;
请给出类似代码！！！

谢谢！！！！！

 

G

grayguygg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-23

• #2

（1）ord .取得有序变量在取值范围中所在的顺序，即位置
（2）chr.取得ASCII码对应的字符
例如
const
i:integer=ord('A') {I值为65}
c:char=chr(65); {C值为 'A'}

 

5

567567

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-23

• #3

谢谢!!!

请使用变量

var
a:char;
b:string;
c:string;
begin
b:='21';
a:=ord(b);
~~~~~~~~~~ 提示 类型不对!!!

 

B

bigroute

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-23

• #4

var
s:string;
i:integer;
begin
s := char(64);//s ="A";
i := ord('A');//i =64;

char 和ord 是 ASCII码和字符转换的.

b:='21';
a:=ord(b); 这样当然不行, ord 的参数是char 不是string
'1'是char,
'111111111'是string;

 

5

567567

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-23

• #5

var
a:char;
b:string;
c,s:string;
i:integer;
begin

i:=64;
s := char(i);//s ="A";
i := ord(s);//i =64;
~~~~~~~~~~~~~~~~~~~~~
怎样换回来呀！！！其实就是 一个字符变量 变为 asc码
然后再转化回来！

 

A

Avenir

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-23

• #6

a:char;
i:=64;
a := char(i);{Chr(i)}
i := ord(a);

s:string;
i:=64;
s := char(i);{Chr(i)}
i := ord(s[1]);

 

5

567567

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-23

• #7

谢谢~~~~ 明白了!!!!!!

 

5

567567

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-23

• #8

多人接受答案了。