文件批量改名工具官网–新起飞部落

typedef struct {
  int version;                   // version of the plugin structure
  char *description;             // name/title of the plugin 
  int (*init)();                 // function which will be executed on init event
  void (*config)();              // function which will be executed on config event
  void (*quit)();                // function which will be executed on quit event
  HWND hwndParent;               // hwnd of the Winamp client main window (stored by Winamp when dll is loaded)
  HINSTANCE hDllInstance;        // hinstance of this plugin DLL. (stored by Winamp when dll is loaded) 
} winampGeneralPurposePlugin;

uses
 Windows,
 Forms,
 mainUnit in 'mainUnit.pas' {FormMain};
 
 {$R *.res}
 
begin
 Application.Initialize;
 
 if 0 = GlobalFindAtom('SOME-UNIQUE-TEXT-RELATED-TO-THIS-APPLICATION') then
 begin
 GlobalAddAtom('SOME-UNIQUE-TEXT-RELATED-TO-THIS-APPLICATION') ;
 
 Application.CreateForm(TFormMain, FormMain) ;
 Application.Run;
 end
 else
 begin
 Application.MessageBox(
 'You can run the trial version '+
 'of this application '+
 'only once per Windows session!',
 'Test Trial Protection') ;
 end;
 end.