DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: sy1012
今日帖子: 0
在线用户: 1
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 my_delphi (my_delphi) ★☆☆☆☆ -
普通会员
2003/12/15 9:35:44
标题:
请问:如何用代码动态控制任务栏的显示与隐藏? 浏览:1530
加入我的收藏
楼主: 请问:如何用代码动态控制任务栏的显示与隐藏?
----------------------------------------------
*-------------------------------\
| 渴求知识,也渴望您的帮助!     \
| 愿结识当今天下爱好DELPHI之朋友!\
|__________________________________\______^_^
作者:
男 rhot (rbeatles) ★☆☆☆☆ -
盒子活跃会员
2003/12/15 9:39:53
1楼: 这样可不可以:
StatusBar1.Visible:=false;
StatusBar1.Visible:=true;
----------------------------------------------
-
作者:
男 my_delphi (my_delphi) ★☆☆☆☆ -
普通会员
2003/12/15 10:43:15
2楼: 哦我也许没说清楚,  我说的是WINDOWS的任务栏.

你那个StatusBar1系统说找不到.
----------------------------------------------
*-------------------------------\
| 渴求知识,也渴望您的帮助!     \
| 愿结识当今天下爱好DELPHI之朋友!\
|__________________________________\______^_^
作者:
男 dfw@107866 (jacky_shen) ★☆☆☆☆ -
普通会员
2003/12/15 10:50:30
3楼: var
  hShell: THandle;

procedure TForm1.Button1Click(Sender: TObject);
begin
  // 隐藏
  hShell := FindWindow('Shell_TrayWnd', nil);
  if hShell <> 0 then
    ShowWindow(hShell, SW_HIDE);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
 // 显示
  if hShell <> 0 then
    ShowWindow(hShell, SW_SHOW);
end;
----------------------------------------------
----
VCL
作者:
男 my_delphi (my_delphi) ★☆☆☆☆ -
普通会员
2003/12/15 11:25:58
4楼: 楼上的兄弟,你好呀!

你的"隐藏"可以实现
但显示却不行.
我把你的显示代码中的if hShell <> 0 then改为if hShell = 0 then还是不行.
    

----------------------------------------------
*-------------------------------\
| 渴求知识,也渴望您的帮助!     \
| 愿结识当今天下爱好DELPHI之朋友!\
|__________________________________\______^_^
作者:
男 my_delphi (my_delphi) ★☆☆☆☆ -
普通会员
2003/12/15 15:39:25
5楼: 有谁知道??
请告诉我!!
----------------------------------------------
*-------------------------------\
| 渴求知识,也渴望您的帮助!     \
| 愿结识当今天下爱好DELPHI之朋友!\
|__________________________________\______^_^
作者:
男 loubingtt (我的生活与你无关) ★☆☆☆☆ -
盒子活跃会员
2003/12/15 16:14:15
6楼: 我晕.你在首页看看.我传了个全api写的代码.上面有关于所以桌面的:系统拖盘,系统时间,任务栏,启动栏....
----------------------------------------------
按此在新窗口浏览图片
作者:
男 dfw@107866 (jacky_shen) ★☆☆☆☆ -
普通会员
2003/12/19 17:46:42
7楼: var
  hShell: THandle;

这个变量必须声明为全局变量。

我的代码全部测试通过,才放上来的。
此帖子包含附件:dfw@107866_20031219174642.rar 大小:128.1K
----------------------------------------------
----
VCL
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行89.84375毫秒 RSS