test.dpr

来自「ASProtect的2.4版」· DPR 代码 · 共 20 行

program Test;

uses
  Windows,
  SysUtils;

Var
  i : Integer;

begin

  MessageBox(0,'Begin','',0);

  {$I Inc\UserPolyBuffer.inc}

  For i:= 1 to 5 do MessageBox( 0, PChar(IntToStr(i)), 'Index', 0 );

  MessageBox(0,'End','',0);

end.