比如我有10个edit 如果我只有其中的四个输入的值。其它都为空。 我有什么方法可得出输入数值的edit的caption 我现在只能用if 去判断。 但是如果我再增加edit。if 又得去改。我不知道有没有更加有效的办法。或者说只能像我这样写。请大家指教一下。
还有。像edit可以用case来实现吗? 比如。 case edit.text of
1....
2... 我试过不行。有没有相关的变通方法?
还有。像edit可以用case来实现吗? 比如。 case edit.text of
1....
2... 我试过不行。有没有相关的变通方法?
解决方案 »
- 怎么判断edit输入的数据类型
- 数据库异常的问题
- 看看这段SQL语句,为什么运行时不能成功?
- delphi5中的错误!急!!!!!在线等!
- 如何使用TDBchart,做一个饼图,能给个例子吗?
- 紧急求救:我用GHOST犯了一个致命错误,把目标盘搞错了,谁能帮我恢复我给100分。。。
- 在DELPHI程序里怎样创建sql的数据库。
- delphi用BDE控件的SQL语句建立的dbf表,或者batchmove产生的dbf表,无法被其他软件识别,比如foxpro,excel.请问如何解决该问题,在线等待
- 画图问题!!!!
- 可以给我介绍一些关于CASE工具的东东吗?比如,流行的有那些?你们一般都使用他们吗?
- dephin跟VS一样是工具吗
- [Delphi + MySQL] 通过参数Parameters将中文字写入MySQL时, 显示为乱码?
像edit可以用case来实现吗? 比如。 case edit.text of
1....
2...
//使用Edit的Tag属性
For i:=0 to ComponentCount-1 Do
begin
if Components[i] is TEdit then
(Components[i]as TEdit).Text='' then
//操作
end;
For i:=0 to ComponentCount-1 Do
begin
if Components[i] is TEdit then
(Components[i]as TEdit).Text='' then
//操作
end;
顶。
if (Components[i] as TEdit).Text<>'' then
memo1.lines.Add(Components[i].text);
这样写为什么编译不了?我怎么才能得到text里面的字符