易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi Format Type

Format
  type的可能值有下列这些:
  (1) d 有符号十进制数
        Args必须是有符号整型数。如果在格式化字符串中还加入了["." prec],则如果Args
        的长度如果小于给出的精度数时,在前边填补0;如果大于精度数,按实际长度显示。
        Format('(%.3d)', [99]); 结果:'(099)'
  (2) u 无符号十进制数
        Args必须是无符号整型数。其它特性与d一样。
  (3) e 科学技术法
        用科学技术法显示数据,形式大致如下:'-d.ddd...E+ddd'。
        Args必须是一个浮点数。如果是一个负数,则在最前面显示一个符号;在小数点前面
        总是显示一位数字;包括小数点前面的数字在内,数字的个数由["." prec]来确定,
        如果没有指定["." prec],则默认为15位精度。如果实际的数字长度超出了指定的
        ["." prec],则刚刚超出的那一位数字四舍五入。指数符号E后面总是要跟着加号或
        减号,并且在后面至少跟着三位数字。
  (4) f 固定的
        Args必须为浮点数,转换后的形式大致是'-ddd.ddd...'这样的。


相关文档:

专门针对delphi的,嵌入源码的病毒(转)

专门针对delphi的,嵌入源码的病毒
如果在 X:\Program Files\Borland\Delphi7\Lib 发现有 SysConst.bak (12KB) 和
SysConst.dcu (18KB),那么恭喜你,中招了。
http://topic.csdn.net/u/20090817/20/102ba10b-82ae-472d-a0be-6d54ce6a331b.html
http://bbs.2ccc.com/topic.asp?topicid=330829
http://bbs.2ccc.com/top ......

Delphi中使用DirectX截屏函数


转自:http://www.52delphi.com/List.asp?ID=597&Page=1
  核心提示:函数需要 uses Direct3D9,D3DX9; 偶然发现一个函数可以直接保存表面到文件1!所以修改了一下,函数为:...
procedure CaptureScreen(Const FileName: string);
var
BitsPerPixel: Byte;
pD3D: IDirect3D9;
pSurface: IDirect3DSurface9;
......

delphi开发ocx控件开发笔记(一)

      由于项目的需要,近期开始学习用delphi开发一个软电话控件。
      以前接触过一些delphi开发方面的东西(当然都是些皮毛啦),但没接触过ocx控件的开发,在此把一些简单的东西记下来,一方面以后自己可以再学习,另一方面希望对刚刚学习delphi开发ocx控件的初学 ......

Delphi 关键字详解

Delphi 关键字详解---absolute//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.
var
Str: string[32];
StrLen: Byte absolute Str;
//这个声明指定了变量StrLen起始地址与Str相同.
//由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度.
begin
Str := 'abc';
Edit ......

delphi dll 实例 与 dll窗体实例

delphi dll 实例 与 dll窗体实例
本动态链接库方法有
Min,Max,SynAPP,ShowForm,showmyform
dll工程文件
Library Project1;
uses
  dllUnit1 in 'dllUnit1.pas' {Form1};
function Min(X, Y: Integer): Integer; export;
begin
if X < Y then Min := X else Min := Y;
end;
function Max(X, Y: Integer): ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号