procedure TForm2.plugin1AfterLoad(Sender: TObject; FileName: String;
  const ALibHandle: Cardinal; var AllowLoad: Boolean);
begin try
_log_entry('Load plugin module '+filename+', successfully');
except end;End;