会员
周边
众包
新闻
博问
闪存
所有博客
当前博客
我的博客
我的园子
账号设置
简洁模式
...
退出登录
注册
登录
工作日志
工作日志
博客园
首页
新随笔
联系
管理
订阅
2008年12月11日
Delphi小技巧杂记
摘要: //获取任务栏尺寸 procedure TForm1.Button1Click(Sender: TObject); var TaskList: HWnd; Bordered: TRect; begin TaskList := FindWindow(’Shell_TrayWnd’, nil); GetWindowRect(TaskList, Bordered); Label1.Cap...
阅读全文
posted @ 2008-12-11 11:16 滴水藏海映太阳
阅读(538)
评论(0)
推荐(0)
编辑