![](https://img-blog.csdnimg.cn/20201014180756754.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Delphi
文章平均质量分 63
风中草帽
酒香也怕巷深
展开
-
delphi 无边框最小化到任务栏上
delphi 无边框最小化到任务栏上//下面可以使每个窗口都单独列在任务栏上 type TForm1 = class(TForm) Button1: TButton; procedure CreateParams(var Params:TCreateParams);overri转载 2008-10-06 20:32:00 · 1012 阅读 · 0 评论 -
delphi 无边框用鼠标改变窗体大小
delphi 无边框用鼠标改变窗体大小//先声明 procedure WMNCHITTEST(var Msg : TWMNCHITTEST); message WM_NCHITTEST;//无边框用鼠标改变窗体大小 procedure TForm1.WMNCHITTEST(var Msg: TWMNCHITTEST);const cOffset=10;转载 2008-10-06 20:37:00 · 2623 阅读 · 1 评论 -
FindWindow和FindWindowEx的语法和用法
HWND FindWindow( LPCTSTR lpClassName, {窗口的类名} LPCTSTR lpWindowName {窗口的标题} ); 参数 lpClassName: 指向一个指定了窗口的类名字符串,或一个标识类名字符串的成员的指针。 lpWindowName:是指 要查找窗口的窗口标题 而非应用程序的名称,如果该参数为空,则为所有窗口全匹配。返回值:如果函数成功,返回值为具有指定类名和窗口名的窗口句柄;如果函数失败,返原创 2010-10-01 14:47:00 · 1014 阅读 · 0 评论