中国程序员联盟 正在重新改版中ing 不便之处还请见谅 改版后将内容涉及java delphi .net php
 
  首页 | 数据库开发 | 网络通讯 | 多线程 | 多媒体开发 | 图像处理 | 程序人生 | 系统函数 | 控件开发 | Web服务
 
  当前位置:笨鱼delphi技术网>系统函数>文章内容

delphi 向任务条添加任务

来源:站内 关于:bill 发布时间:2007-06-27   [收藏] [推荐]

First You should get TrayBar handle:
  FindWindow( 'Shell_TrayWnd', '' )

And then You may do whatever You whant. For example create a button:

AButtonWnd :=CreateWindow( 'button' ,
                       'Caption' ,
                       WS_ChildWindow ,
                       0 ,
                       0 ,
                       75 ,
                       20 ,
                       FindWindow( 'Shell_TrayWnd', '' ) ,
                       0 ,
                       hInstance ,
                       Nil );
ShowWindow( AButtonWnd, SW_SHOW )

If You don't whant to create controls by Yourself and let Delphi do it,
use such a WinApi function for any Delphi-made control:
  function SetParent(WndChild: HWnd;
                               WndNewParent: HWnd): HWnd;
( see coresponding Help )


[浏览: 次]   
上一篇:delphi 清除系统启动后的桌面   下一篇:delphi 隐藏开始按钮
[收藏] [推荐] [返回顶部] [打印本页] [关闭窗口]  
    评论加载中…
google adsense热点文章
·delphi Delphi中ShellExecute的妙用
·delphi 如何快速读取文本文件
·delphi 在应用层截获键盘消息
·delphi 如何判断输入值是否中文
·delphi delphi实现服务开启与关闭
·delphi 实时记录事件日志
·delphi 使MEMO自动滚动
·delphi 如何区分键盘两个Enter键
·delphi 切换界面的方法
·delphi 汉字输入法的编程及使用
·delphi Delphi程序输入法自动切换最简
·delphi 程序缩小为任务右下角的小图标
     delphi技术网 | firefox 下载 | Avant Browser下载 | dedecms 技术网 | drupal 爱好者 | php 技术网
  Copyright@www.delphichm.com,2006-2009.All Rights Reserved.
 
程序员联盟 | delphi Java .net|QQ:707102932