小小疑惑,关于case.

huanghope 2003-12-12 08:26:01
大侠:
为何:
case copy(edit1.Text,4,1) of
'1':label1.Caption:='dd';
'2':label1.Caption:='pp';
'3':label1.Caption:='dddd';
'4':label1.Caption:='pppp';
end;
无法编译通过,错误提示是:copy(edit1.Text,4,1),类型不符,可是case中的表达式不是可以为字符吗?
谢谢!
...全文
37 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
flyinwuhan 2003-12-12
  • 打赏
  • 举报
回复
可以这样:
var
c : Char;

c := edit1.Text[4];
case c of
.
end;
flyinwuhan 2003-12-12
  • 打赏
  • 举报
回复
大哥,Copy返回的是字符串,不是字符。
即使copy一个字符还是字符串,而不是字符。
solokey 2003-12-12
  • 打赏
  • 举报
回复
用变量代替copy呢?

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧