社区
C++ Builder
帖子详情
怎么把所有Edit的onchange事件放在一个过程中处理?
CppFile
2003-08-31 10:28:31
因为要判断用户有没有 更改数据,如果更改了数据就要设置一个标志位,我的那个form中有十几个edit,我可不想在每个edit的onchang事件中写同样的代码。
有好的解决 方法么?
...全文
151
10
打赏
收藏
怎么把所有Edit的onchange事件放在一个过程中处理?
因为要判断用户有没有 更改数据,如果更改了数据就要设置一个标志位,我的那个form中有十几个edit,我可不想在每个edit的onchang事件中写同样的代码。 有好的解决 方法么?
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
10 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
CTAer
2003-08-31
打赏
举报
回复
你先为一个Edit编写完成OnChange事件(如:TForm1::Edit1OnChange())后,把剩下的Edit全部选中,然后点击Event页,在OnChange下拉列表框中选择刚才编写的OnChange事件就好了
FallenAngel
2003-08-31
打赏
举报
回复
TEdit * edit = dynamic_cast<TEdit*>(Sender) ;
把这一句放到你每个Edit的OnChange事件中去,然后要改变属性,只要改变edit的属性就可以了
FallenAngel
2003-08-31
打赏
举报
回复
TEdit * edit = dynamic_cast<TEdit*>(Sender) ;
把这一句放到你每个Edit的OnChange事件中去,然后要改变属性,只要改变edit的属性就可以了
zht2000
2003-08-31
打赏
举报
回复
也可以用actionlist创建一个action事件,让其change事件指向它
dongyangzong
2003-08-31
打赏
举报
回复
设置一个Edit的事件,然后将其它的Edit的事件指向它即可。方法如下:
在Object Inspector中将事件的名称复制到其它事件即可。
事件的Sender参数指示哪个Edit触发事件
ThinkX
2003-08-31
打赏
举报
回复
如Kingcaiyao说的,很简单。
kingcaiyao
2003-08-31
打赏
举报
回复
void __fastcall TForm1::DoChange(TObject *Sender)
{
//Do Something....
}
void __fastcall TForm1::FormCreate(TObject *Sender)
{
for(int i=0;i<ComponentCount;i++)
{
TEdit *pEdit=dynamic_cast<TEdit*>(Components[i]);
if(pEdit) pEdit->OnChange=DoChange;
}
}
阿鹏兄
2003-08-31
打赏
举报
回复
是呀就用上面的方法,共享事件
zihan
2003-08-31
打赏
举报
回复
你在其中的一个Edit的change里面写
{
TEdit(Sender)->Text = "";
//这样就可以把所有的Edit都清空
}
然后把所有Edit的OnChange都选择该Edit的OnChange事件就可以了
nightfallrove
2003-08-31
打赏
举报
回复
按住SHIIFT选中所有Edit然后双击OnChange事件,,,
然后写代码,,,,
这时所有选中的Edit在改变内容时都是执行同一段代码
Delphi
中
对用户输入数据的控制
Delphi
中
对用户输入数据的控制Delphi
中
对用户输入数据的控制
Delphi XE4 iOS应用程序开发(2)
实现用户更改日期的
事件
处理
过程
在用户更改了日期之后,
OnChange
事件
会被触发。你可以给
OnChange
事件
实现
一个
事件
处理
过程
来响应用户的动作。 要实现
OnChange
事件
处理
过程
: 1. 选择TCalendar
Edit
组件。 2. 在Object Inspector
中
,打开Events页,然后双击
OnChange
后面的空白处。 3. 编写如下代码: [d
DELPHI基础开发技巧
DELPHI基础开发技巧◇[DELPHI]网络邻居复制文件uses shellapi;copyfile(pchar(newfile.txt),pchar(//computername/direction/targer.txt),false);◇[DELPHI]产生鼠标拖动效果通过MouseMove
事件
、DragOver
事件
、EndDrag
事件
实现,例如在PANEL上的LABEL:var x
关于 MVC 的
一个
常见的误用
如何避免把 Model View Controller 写成 Massive View Controller 已经是老生常谈的问题了。不管是拆分 View Controller 的功能 (使用多个 Child View Controller),还是换用“广义”的 MVC 框架 (比如 MVVM 或者 VIPER),又或者更激进一点,转换思路使用 Reactive 模式或 Reducer 模式,其实...
delphi控件属性和
事件
常用【属性】 Action:该属性是与组件关联的行为,允许应用程序集
中
响应用户命令 Anchors:与组件连接的窗体的位置点 Align:确定组件的对齐方式 AutoSize:确定组件是否自动调整其大小 BiDiMode:(所有组件) 为从右向左写的语言提供支持 BoundsRect:定义组件边框矩形(只适用于运行时) Borderwidth:(窗口化组件)边框的宽度 BorberStyle...
C++ Builder
13,870
社区成员
102,693
社区内容
发帖
与我相关
我的任务
C++ Builder
C++ Builder相关内容讨论区
复制链接
扫一扫
分享
社区描述
C++ Builder相关内容讨论区
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章