随笔分类 -  界面编程

摘要:1 DCDC := GetDc(0); //桌面DC := GetDc(窗口句柄) //窗口客户区DC := GetWindowDC(窗口句柄)) // 整个窗口,包括非客户区2 字体OldFont: HFONT; OldFont := SelectObject(WinDC, Canvas.Font.Handle);同样还有Pen, BRUSHPen 创建用CreatePen, Brush 用 C... 阅读全文
posted @ 2009-07-28 22:33 谭志宇 阅读(232) 评论(0) 推荐(0) 编辑
摘要:[代码] 阅读全文
posted @ 2009-07-27 18:48 谭志宇 阅读(167) 评论(0) 推荐(0) 编辑
摘要:var Style: Integer;begin Style := GetWindowLong(Handle, GWL_STYLE);//wnd为控件句柄 if (Style and (WS_VSCROLL)) <> 0 then Caption := 'Yes' else Caption := 'No';end; 阅读全文
posted @ 2009-06-08 11:32 谭志宇 阅读(196) 评论(0) 推荐(0) 编辑
该文被密码保护。
posted @ 2009-04-26 04:20 谭志宇 阅读(3) 评论(0) 推荐(0) 编辑
该文被密码保护。
posted @ 2009-04-02 11:32 谭志宇 阅读(2) 评论(0) 推荐(0) 编辑
该文被密码保护。
posted @ 2009-04-02 11:29 谭志宇 阅读(1) 评论(0) 推荐(0) 编辑
该文被密码保护。
posted @ 2009-04-01 14:54 谭志宇 阅读(2) 评论(0) 推荐(0) 编辑
该文被密码保护。
posted @ 2009-03-24 18:11 谭志宇 阅读(5) 评论(0) 推荐(0) 编辑
摘要:TButtonTest = class(TGraphicControl) public constructor Create(aOwner: TComponent); override; protected procedure Paint; override; end; constru... 阅读全文
posted @ 2009-03-12 16:34 谭志宇 阅读(175) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示