可能是关于action(50分)

  • 主题发起人 主题发起人 linuxcrow
  • 开始时间 开始时间
L

linuxcrow

Unregistered / Unconfirmed
GUEST, unregistred user!
谁能给我讲些关于action的东东.(delphi6)
还有,怎么做出个象OICQ的弹出菜单那样,在左边有一条图象
也就是win98开始菜单那样.
 
那是窗口,不是菜单!
你可以用TImage,TSpeedButton简单的摆出来[:D]
 
to:OopsWare,别用!号,那就是菜单。
我有控件,其实,到现在这种控件已经不是什么密秘了。
 
用个TPopupMenu试一下就知道了(设计时看不到效果, 运行时可以)
把popupmenu.ownerdraw置为true.
加入n个menuitem
第一个menuitem的bitmap加入一幅图. caption为空, enabled为false;

OnMeasureItem中写:
width := menuitem1.bitmap.width;
height := menuitem1.bitmap.height;

OnDrawItem中写:
acanvas.draw(arect.left, arect.top, menuitem1.bitmap);

第二个menuitem的break设为mbBreak.
 
to: cgh0717
说话过于自信,抱歉。以后注意。[:(]

用Spy++, WinSight32看看吗。如果有源代码,就看看API是用的
CreateWindow 还是 CreateMenu 。
您认为下面的东西是菜单还是窗口?

+------------+ +------------+
| 菜单 (A) | | 菜单 (A-A) |
| 菜单 (B) | | 菜单 (A-B) |
| 菜单 (C) | +------------+
| 菜单 (D) |
|------------|
| 退出 (X) |
+------------+
[:D][:D][:D][:D][:D][:D][:D][:D][:D][:D][:D][:D]

 
yxyyyy的方法可行!等以后给你加分
其他大虾有什么更好的法子??
 
接受答案了.
 
后退
顶部