[求助]：ToolBar显示和隐藏的问题？

boaosun

我是用
acedCommand(RTSTR,"-toolbar",RTSTR,"基础",RTSTR,"H",0)......隐藏
acedCommand(RTSTR,"-toolbar",RTSTR,"基础",RTSTR,"S",0)......显示
来实现的！

还有没有用其它办法的？？

小树袋熊

找到窗口句柄，用WindowsAPI函数
BOOL ShowWindow(
    HWND hWnd,        // handle of window
    int nCmdShow         // show state of window
   );
可以控制

boaosun

这种方法找不到CAD的Toolbar名柄的！

小树袋熊

是有点问题
acedGetAcadDockCmdLine()，acedGetAcedTextCmdLine等等函数可以取一些相应的句柄
可就是找不到Toolbar相关
再找找办法

boaosun

用com接口行不行？

小树袋熊

还是先试试ShowWindow吧
可以用以下方法查找所有的窗口

1. 
   
2.   [FONT=courier new]
   
3. 
   
4. var
   
5.   wnd01,wnd02:HWND;
   
6.   s1,s2:String;
   
7. begin
   
8.   wnd01:=GetActiveWindow();  
   
9.   wnd02:=wnd01;
   
10.   repeat
    
11.     i:=GetClassName(wnd02, str1, MAX_PATH);
    
12.     if i=0 then  break;
    
13.     //.......取类
    
14.     //.......
    
15. 
    
16.     i:=GetWindowText(wnd02, str1, MAX_PATH);
    
17.     if i=0 then break;
    
18.     //.......取名字
    
19.     //.......
    
20. 
    
21.     wnd02:=GetNextWindow(wnd02,GW_HWNDNEXT);
    
22. until (wnd02=NULL) or (wnd02=wnd01);
    
23. 
    
24.   [/FONT]
    

复制代码

boaosun

你这个是delphi代码，怎么连进VC中？？

小树袋熊

用写了一个小程序,查找出以下窗口（前面是句柄，后面是类名）
131158  : tooltips_class32
393482  : IME
131424  : AfxControlBar
131456  : tooltips_class32
590392  : TFormMain
262246  : TApplication
..........................
根据分析,  AfxControlBar 就是ToolBar

boaosun

试过AfxControlBar没有用！

小树袋熊

论坛上有一个COM接口操作ToolBar的例子，可以拿来参考

如果CAD的Top和Left都有Toolbar，那么，就会有两个AfxContolBar

AfxControlBar是类名

boaosun

用com接口应该可以，但那个Acad.cpp太庞大了！！

小树袋熊

这样应该可以找到AfxControlBar

1. 
   
2.   [FONT=courier new]
   
3.   HWND h1,h2;
   
4.   CWinApp *p1;
   
5.   p1 = acedGetAcadWinApp();
   
6.   h1 = GetWindow(p1->m_pMainWnd->m_hWnd, GW_CHILD);
   
7.   h2 = FindWindowEx(p1->m_pMainWnd->m_hWnd, h1, "AfxControlBar", NULL);
   
8.   [/FONT]
   

复制代码

uncommon

acedGetAcadFrame()->ShowControlBar(Menu*,BOOL ,BOOL)

wxd_seu

能不能再详细说明一下啊！