whocq.dpr

来自「可探索指定IP地址段内的所有OICQ用户号码」· DPR 代码 · 共 21 行

program WhoCQ;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Ingusclass in 'Ingusclass.pas',
  Protohdr in 'Protohdr.pas',
  packet32 in 'Packet32.pas',
  IngusPacket in 'IngusPacket.pas';

{$R *.RES}

begin
    Application.Initialize;
  Application.ShowMainForm := False;
  Application.Title := 'WhoCQ';
  Application.CreateForm(TForm1, Form1);
  Form1.Show;
  Application.Run;
end.