摘要：
//通过 DLL Wizard 建立：library TestDLL;uses SysUtils, Classes, Dialogs;{$R *.res}//建立过程procedure Test;begin ShowMessage('TestDLL.Test');end;//输出exports Te... 阅读全文
posted @ 2014-07-15 11:45
何石-博客
阅读(240)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type //晚绑定，也就是动态调用外部函数主要用以下三个命令：... 阅读全文
posted @ 2014-07-15 11:44
何石-博客
阅读(215)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Butt... 阅读全文
posted @ 2014-07-15 11:43
何石-博客
阅读(395)
评论(0)
推荐(0)
摘要：
BeginDeferWindowPos 和 DeferWindowPos、EndDeferWindowPos 是一组一起使用的函数, 可对一组窗口的位置、大小、Z 序等进行调整, 在 ExtCtrls 单元有用到.下面先用常规方法实现对 Panel1 中的一组 Button 进行调整, 然后再用上面... 阅读全文
posted @ 2014-07-15 11:39
何石-博客
阅读(476)
评论(0)
推荐(0)
摘要：
AlphaBlend 是指定图像混合透明的函数, 在 Graphics、GraphUtil、RibbonStyleActnCtrls 单元用到.下面的测试是把一张图片显示在窗体, 并可以调整透明度.本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messag... 阅读全文
posted @ 2014-07-15 11:29
何石-博客
阅读(364)
评论(0)
推荐(0)
摘要：
AdjustWindowRectEx 用在了 Forms、DBCtrls 单元.AdjustWindowRectEx 可以根据窗口样式获取的边缘尺寸.测试:var R: TRect;begin SetRect(R, 0, 0, 0, 0); {此矩形不是全局变量, 需要初始为空} AdjustWin... 阅读全文
posted @ 2014-07-15 11:28
何石-博客
阅读(438)
评论(0)
推荐(0)
摘要：
ActivateKeyboardLayout 分别在 Controls、DBGrids、Grids 单元用到, 基本都是如下语句:ActivateKeyboardLayout(Screen.DefaultKbLayout, KLF_ACTIVATE); {表示激活当前输入法}函数字面的意思是键盘布局... 阅读全文
posted @ 2014-07-15 11:27
何石-博客
阅读(532)
评论(0)
推荐(0)
摘要：
AbortDoc: 该函数终止当前打印作业并删除最好一次调用 StartDoc 函数写入的所有信息.该函数在 Printers 单元的应用:AbortDoc(Canvas.Handle); 阅读全文
posted @ 2014-07-15 11:26
何石-博客
阅读(354)
评论(0)
推荐(0)
摘要：
代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls;type TForm1 = cla... 阅读全文
posted @ 2014-07-15 11:21
何石-博客
阅读(179)
评论(0)
推荐(0)
摘要：
URLOpenStream 和 URLDownloadToFile 类似, 都是下载文件的 COM 函数;前者是下载到 IStream 流, 后者是直接下载到指定路径; 不如后者使用方便.它们都声明在 UrlMon 单元, 本例还要同时 uses ActiveX, 因为要用到 IStream 接口.... 阅读全文
posted @ 2014-07-15 11:19
何石-博客
阅读(2076)
评论(0)
推荐(0)
浙公网安备 33010602011771号