弱智问题 类型转换 在线等~~~~~~ (20分)

  • 主题发起人 主题发起人 hjlover2000
  • 开始时间 开始时间
H

hjlover2000

Unregistered / Unconfirmed
GUEST, unregistred user!
我要将 edit 中输入的数字转换为 char 型
请问如何做???
 
var str :string;
achar:char;
str:=edit.text;
achar:=str[1];
//edit中的数字本来就是字符型的
 
Pchar(edit.text)
 
好象没有成功,简单说,我在 EDIT 输入 50 , 那么要输出第 50 号的ascll值 , 也就是 #50。
 
Char(StrToInt(edit.text))
 
我试过了,但是当edit中为字母时不行,例如 6a
 
abc:=edit1.text;
for i:=0 to length(str) do
chararr:=abc;
 
报错了.....
 
来自:hjlover2000, 时间:2004-4-27 17:24:14, ID:2584129
我试过了,但是当edit中为字母时不行,例如 6a

当然不行拉! 当里面用非数字时候 strtoint 是没办法处理,这函数是Delphi提供的,
没考虑到这个 , 你可以自己判断 或者 限制输入 ,比如在 onkeypress 里面:
if (key>'0') or key (< '9') then key:=#0;
 
几个需要搞清楚的概念性问题:
1.Edit中输入的是 字符串 2.要用 StrtoInt 转成 数值
3.然后把此数值‘转’成char类型的
4.实际上char后,在内存中的值并没有变化,只是在逻辑上的“类型”
 
ord(edit1.text)
 
后退
顶部