读书人

有没有什么控件或者办法当用户用tab或

发布时间: 2012-05-23 13:44:13 作者: rapoo

有没有什么控件或者办法当用户用tab或者回车时按照控件顺序切换并且有颜色来提示
有没有什么控件或者办法当用户用tab或者回车时按照控件顺序切换并且有颜色来提示

如果按tab或回车会使 edit1切换到edit2,再edit3,按顺序来,获得焦点时edit为绿色,离开时为红色

一个个设置很麻烦的,有没有批量或者控件的办法来设置

[解决办法]
我也是一个一个设置的,先关注一下你的这个帖子

[解决办法]
edit1.taborder属性设置次序,就可以实现TAB按自定顺序跳转
[解决办法]

Delphi(Pascal) code
procedure TForm1.edt3Enter(Sender: TObject);beginTEdit(Sender).Color := clRed;end;
[解决办法]
探讨
edit1.taborder属性设置次序,就可以实现TAB按自定顺序跳转

[解决办法]
探讨

引用:
edit1.taborder属性设置次序,就可以实现TAB按自定顺序跳转

楼主是想实现如下功能的
如果按tab或回车会使 edit1切换到edit2,再edit3,按顺序来,获得焦点时edit为绿色,离开时为红色

你再仔细研究一下

[解决办法]
探讨
引用:
edit1.taborder属性设置次序,就可以实现TAB按自定顺序跳转

楼主是想实现如下功能的
如果按tab或回车会使 edit1切换到edit2,再edit3,按顺序来,获得焦点时edit为绿色,离开时为红色

你再仔细研究一下

[解决办法]
RAIZE 里面有个FRAMECONTROL 可以满足你的要求哦,一直在用
[解决办法]
用RZ控件,设置edit.focusColor edit.taborder,安装Cnpack 修改Taborder很方便.
[解决办法]
你看下RZ里面的DEMO啊,里面有详细案例啊,一看就明白
[解决办法]
这个应该是可以做到的,大概的做法就是这样的吧
Delphi(Pascal) code
procedure TfrmFirstForm.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin  if (ssAlt in Shift) or (ssCtrl in Shift) then Exit;  if Key=13 then  begin    ActiveControl.Color:=clRed;    //此处需要判断是否是DBGrid等这样的控件,不需要变色等等    if ActiveControl is TDBGrid then Exit;    FindNextControl(ActiveControl,True,True,False).SetFocus;    ActiveControl.Color:=clGreen;      end;end;
[解决办法]
需要一个功能就装一种控件,时间长了会很吓人
[解决办法]
我的变颜色方法是集中到一个方法中统一由每个Edit控件分别调用
[解决办法]
rz edit 的 focuscolor属性,设置为什么颜色,得到焦点后就显示什么颜色。

读书人网 >.NET

热点推荐