怎样遍历ActionList 50分 急！！哪位高手帮帮忙？ ( 积分: 50 )

  • 主题发起人 主题发起人 myyinuo
  • 开始时间 开始时间
M

myyinuo

Unregistered / Unconfirmed
GUEST, unregistred user!
如何用Actions的数组形式遍历ActionList1 设定其Enable或Visable属性
ActionList1->Actions
Delphi代码如下：
TAction(ActionList1.Actions).enable = fasle
最好在BCB试验一下。
 
如何用Actions的数组形式遍历ActionList1 设定其Enable或Visable属性
ActionList1->Actions
Delphi代码如下：
TAction(ActionList1.Actions).enable = fasle
最好在BCB试验一下。
 
很难么？
 
难道这就把各位难倒了。。。。。。
还是不值一提？
 
我以前是这么实现的（效率可能低一些，呵呵）：
for i := 0 to ComponentCount -1do
begin
if Components is TAction then
(Components as TAction).Enable := False;
end;
 
[red]to: royal1442[/red]
忘了告诉你,我要的是C++代码.
Delphi代码我已经实现
 
so sorry !
 
自由界面和报表的完美解决方案！
http://www.anylib.com
 
ActionList1->Actions->Enable = False;
C++区分大小写的,请看看I是不是声明为小写了
 
[red]to:zqw0117[/red]
Enable 不是Actions的属性，这样会报错的，我已经试过！
 
(TAction)(ActionList1->Actions)->Enable
这样试试,我这台机器上没装C++ Builder
 
[red]to：zqw017[/red](TAction)(ActionList1->Actions)->Enable 我试过
没有错误信息，但不生效，就是控制不到Enabled属性
郁闷呀
 
下断点,跟一下,是不是进了SetEnable方法!看看里面怎么走的.
 
不理解，楼主既然定义了Action，为什么又要把它置为不可用？如果用不到，不定义就好啦！[:D]
 
多人接受答案了。
 
您必须登录或注册才可回复。

Similar threads

S
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
第十六章 操作界面与操作逻辑
回复
0
查看
720
import
I
I
常用算法（3）动态规划
回复
0
查看
1K
import
I
I
一个数列
回复
0
查看
843
import
I
后退
顶部