随笔分类 -  Delphi7 API

摘要:示例如下program Project1;uses Windows, Messages;{供 WM_LBUTTONDOWN 消息调用的自定义过程}procedure OnLButtonDown(h: HWND);var BrushHandle: HBRUSH; Rect: TRect;beg... 阅读全文
posted @ 2014-11-04 11:22 Delphi爱好者2014 阅读(1670) 评论(0) 推荐(0)
摘要:消息创建WM_CREATE:代码如下program Project1;uses Windows, Messages;{供 WM_PAINT 消息调用的自定义过程}procedure OnPaint(h: HWND);const str = '创建的窗口程序';var DC: HDC; ps:... 阅读全文
posted @ 2014-11-03 13:57 Delphi爱好者2014 阅读(764) 评论(0) 推荐(0)
摘要:继续上节,我们还是用工程文件创建一个MDI窗口。代码如下:program MDIApp;uses Windows, Messages;var TheMessage:TMsg; FrameWindow,ClientWindow,ChildWindow:HWND;const IDCHILDWN... 阅读全文
posted @ 2014-10-31 13:08 Delphi爱好者2014 阅读(620) 评论(0) 推荐(0)
摘要:首先新建一个工程,不用单元,把窗口关掉,我们用WINDOWS API函数来创建一个窗口。program Project1;uses Windows,Messages;function WindowProc(HWndow:HWND;msg,wparam,lparam:UINT):UINT;std... 阅读全文
posted @ 2014-10-21 10:54 Delphi爱好者2014 阅读(845) 评论(0) 推荐(0)
摘要:BitBlt该函数对指定的源设备环境区域中的像素进行位块(bit_block)转换,以传送到目标设备环境BitBlt( DestDC: HDC; {目标 DC} X, Y, Width, Height: Integer; {目标位置与大小} SrcDC: HDC; ... 阅读全文
posted @ 2014-10-17 22:09 Delphi爱好者2014 阅读(1936) 评论(0) 推荐(0)