jmdll.dpr

内嵌dll的加密。。。没看懂是个什么意思。是收集来的。一直丢电脑里!

library JMDll;

uses
  SysUtils, Classes, Forms;

{$R *.res}

procedure pTestPassword(AHandle : THandle;Password : String); stdcall;
begin
  Application.Handle := AHandle;
  if Password <> '123' then
  begin
    Application.MessageBox('你的密码不正确，我要退出程序了 !','信息');
    Application.Terminate;
  end else
  begin
    Application.MessageBox('你的密码正确了，你是用破解的 ?','信息');
  end;
end;

exports
  pTestPassword;

end.