Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.486 Beiträge
 
Delphi 12 Athens
 
#4

AW: DllExpert unit wird finalisiert bevor richtig unregistriert

  Alt 4. Jan 2025, 16:41
Die Methode RegisterPackageWizard habe ich selbst noch nicht benutzt. Der MMX Code Explorer registriert sich über eine exportierte function InitExpert :
Delphi-Quellcode:
procedure FinalizeWizard;
begin
  if MMOTAExpertIndex <> -1 then (BorlandIDEServices as IOTAWizardServices).RemoveWizard(MMOTAExpertIndex);
  MMOTAExpertIndex := -1;
end;

function InitExpert(const BorlandIDEServices: IBorlandIDEServices;
    RegisterProc: TWizardRegisterProc;
    var Terminate: TWizardTerminateProc): Boolean stdcall;
begin
  Result := True;
  Terminate := FinalizeWizard;
  MMOTAExpertIndex := (BorlandIDEServices as IOTAWizardServices).AddWizard(TMMXBDSExpert.Create);
end;

exports InitExpert name WizardEntryPoint;
Vielleicht hilft dir das ja weiter.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat