- 博客(7)
- 资源 (30)
- 收藏
- 关注
原创 拖动识别
<br />uses ShellAPI;//定义过程procedure WMDROPFILES(var Msg: TMessage); message WM_DROPFILES;//变量var afilename: string;// 实现过程 procedure TForm1.WMDROPFILES(var Msg: TMessage); var FilesCount: Integer; // 文件总数 i: Integer; FileName
2010-10-27 19:51:00 479
原创 Windows 60个常用API
Windows 60个常用API附录A 常用的Windows API 调用本附录列出了PowerBuilder 常用Windows API 系统调用同时给出了这些函数的功能说明方式以及应用示例下表首先给出常用API 调用的名称和扼要功能读者需要详细了解某个函数的声明格式和示例时可通过序号在本附录中找到相应说明表A 常用的Windows API 系统序号 函数 功能1 Arc() 在窗口上画一条弧线2 Beep() 让计算机按指定的频率和周期发声3 BringWindowToTop() 将窗口放置在最前面4
2010-10-27 19:25:00 1850
原创 Function MessageBox
<br />对应对象:TApplication 声明:function MessageBox(Text,Caption:PChar;Flags:Word):Integer; 功能:MessageBox方法可以显示一个对话框,在对话框中包含了一条信息和一个及多个按钮。MessageBox方法是TApplication中的一个经常使用的方法,它包含了Windows API MessageBox函数。使用过Windows的朋友都看到过MessageBox,可以使用VB或Delphi来创建它们。以下
2010-10-27 19:04:00 453
原创 AllocConsole
<br />var s: string;begin AllocConsole; try Write('请输入 然后按 [ENTER]'); Readln(s); ShowMessage('您输入了: ' + s); finally FreeConsole; end;end;
2010-10-27 17:04:00 819
原创 Delphi编程(OOP)
<br />刚刚接触的Delphi的朋友,可能最感兴趣的就是它丰富、强大的VCL(可视化构件库)。仅仅向窗体上扔几个构件,甚至不用动手写代码,就能很容易地做出一个有实用价值的程序,真是令人激动。但是,VCL只是Delphi的一小部分,Delphi的优秀远远不只是表现在VCL上。如果你仅仅停留在使用VCL这一阶段,那么你永远也不可能成为一个真正的Delphi高手。记住,必须超越VCL,才能够接触到Delphi的核心。<br /> 那么,在Delphi的VCL后面,到底隐藏着什么呢?本文将讨论两个比较高级的D
2010-10-13 00:16:00 622
原创 swf资源文件释放.
//定义一个资源文件 .rc MySwf RC_DATA "c:/123.swf" MySwf 为资源标识符,可任意,RC_DATA 不可改 再用brcc32编译生成.res文件 包含资源文件 {$
2010-10-12 16:39:00 700
转载 Delphi的unicode与GB2312转转换, 汉字unicode转GB2312
<br />Delphi的unicode与GB2312转转换, 汉字unicode转GB2312{===============================================================}{ 函数 : RESULTSTRING = HexToBin(HEXSTRING){ 目的 : 把十六进制字符串转换为二进制字符串{{===============================================================}
2010-10-04 13:35:00 2784
TMS Component Pack 5.7.1.0 Full Source 安装版
2010-10-02
DELPHI全掌握(万一先生的博客)
2009-07-05
PASCAL精要(编程技巧)
2009-07-05
API函数的中文帮助文件
2009-07-05
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人