W
wql
Unregistered / Unconfirmed
GUEST, unregistred user!
程序中留下内部空间,自己写啊!
例如
Procedure WriteMyINI;
Label
_P1 ,
_Proc ;
Var
Ps ,
Pe : Pointer;
_size : DWord;
Begin
Ps:=@P1;
Pe:=@_Proc
_size:=LongInt(Pe)-LongInt(Ps);
GoTo _Proc;
_P1:
Asm
// 1..16 : 256字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
// 1..16 : 256字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
// 1..16 : 256字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
// 1..16 : 256字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
End;
_Proc:
// 上面定义了1K字节空间!你可以把数据保存在里面!呵呵!
End;
例如
Procedure WriteMyINI;
Label
_P1 ,
_Proc ;
Var
Ps ,
Pe : Pointer;
_size : DWord;
Begin
Ps:=@P1;
Pe:=@_Proc
_size:=LongInt(Pe)-LongInt(Ps);
GoTo _Proc;
_P1:
Asm
// 1..16 : 256字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
// 1..16 : 256字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
// 1..16 : 256字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
// 1..16 : 256字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 // 16字节
End;
_Proc:
// 上面定义了1K字节空间!你可以把数据保存在里面!呵呵!
End;