2008 年 12月 11 日随笔档案 - 滴水藏海映太阳

2008年12月11日

摘要： //获取任务栏尺寸 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 滴水藏海映太阳阅读(570) 评论(0) 推荐(0)