如何让TAB键只在两个控件之间响应?

computerstarveling 2003-08-23 10:58:09
如题
...全文
43 15 打赏 收藏 转发到动态 举报
写回复
用AI写文章
15 条回复
切换为时间正序
请发表友善的回复…
发表回复
dragon191 2003-08-29
  • 打赏
  • 举报
回复
将其他控件的TabStop设置为False
computerstarveling 2003-08-29
  • 打赏
  • 举报
回复
to lxpbuaa:我按你的方法做了,好象不行.
lV运用 2003-08-28
  • 打赏
  • 举报
回复
设置其它的TabStop为false
netrobo 2003-08-27
  • 打赏
  • 举报
回复
设置TabStop!
lxpbuaa 2003-08-27
  • 打赏
  • 举报
回复
都5天了还没搞定啊?假设你说的两个控件名字为ControlName1和ControlName2,那么这样写:
procedure TForm1.FormCreate(Sender: TObject);
var
I: Integer;
tfComponent: TComponent;
begin
for I := 0 to ComponentCount-1 do
begin
tfComponent := Components[I];
if tfComponent is TWinControl then
TWinControl(tfComponent).TabStop :=
(tfComponent.Name = 'ControlName1') or
(tfComponent.Name = 'ControlName2');
end;
end;

—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————
computerstarveling 2003-08-27
  • 打赏
  • 举报
回复
怎么没人回答了?
computerstarveling 2003-08-23
  • 打赏
  • 举报
回复
如果不设False,而是要在程序里控制怎么做?
lxpbuaa 2003-08-23
  • 打赏
  • 举报
回复
将其他控件的TabStop设置为False

—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————
computerstarveling 2003-08-23
  • 打赏
  • 举报
回复
其实我是想用代玛实现,按TAB键只能在两个控件里互切,把其他控件的TAB都屏闭掉。
yujohny 2003-08-23
  • 打赏
  • 举报
回复
那你要不要Tab键在dbgrid间的列有效呢?
computerstarveling 2003-08-23
  • 打赏
  • 举报
回复
只在dbgrid1和dbgrid2之间切换
yujohny 2003-08-23
  • 打赏
  • 举报
回复
你给出那两个控件,我写代码给你
zousoft 2003-08-23
  • 打赏
  • 举报
回复
是呀,同意楼上的楼上和楼上。
firestoneman 2003-08-23
  • 打赏
  • 举报
回复
经典,呵呵
lxpbuaa 2003-08-23
  • 打赏
  • 举报
回复
用程序设置TabStop

—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————

5,379

社区成员

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

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