Fremde DLL per COM verwenden - OLE-Server-Proxy erstellen

[shmia]

Du solltest deinen Programcode umstellen anstatt der alten Klasse TKDF nachzutrauern.
Das geht so:

Delphi-Quellcode:

uses ..., EineDLLLib_TLB; 

TForm1 = class(TForm)

  private
    F_KDF : IKDF;   // ein Interface-Pointer

    procedure CreateKDF;  // "Kraft durch Freude" Objekt erzeugen

    procedure MachWas;

end;

procedure TForm1.CreateKDF;
begin
  // Interface Objekt erzeugen
  F_KDF := CoKDF.Create;   // das war einfach, oder ?  

end;

procedure TForm1.MachWas;
begin
  if not Assigned(F_KDF) then
    CreateKDF;
  
  // jetzt mit F_KDF arbeiten
  F_KDF.OpenFile(....);   // fiktive Methode - frei erfunden

  // du brauchst kein .Free oder ähnliches aufrufen
  // F_KDF wird automatisch von der VCL freigegeben
end;