Einzelnen Beitrag anzeigen

Benutzerbild von F.W.
F.W.

Registriert seit: 28. Jul 2003
Ort: Zittau
636 Beiträge
 
#16

Re: DLL als Erweiterung für mein Programm

  Alt 27. Jul 2004, 18:54
Ich habe jetzt eine Funktion SetPointer in die DLL aufgenommen, mit der wird im OnCreate des Progs das Hauptfenster (darauf greift die DLL auch noch zu bzw. soll sie) und ein TRichEdit übergeben:

Auszug aus DLL:
Delphi-Quellcode:
uses
  SysUtils, Forms, ComCtrls, Graphics,
  Main_Unit;

var
 TheRichEdit: TRichEdit;
 TheMain: TMain;

  function SetPointer(ARichEdit: TRichEdit; AMain: TMain): Boolean; export;
  function SetSettings(S: String): Boolean; export;
  procedure Schreibe(S: String; AFont: TFont); export;

implementation

function SetPointer(ARichEdit: TRichEdit; AMain: TMain): Boolean; export;
begin
 Result := False;
 TheMain := AMain;
 TheRichEdit := ARichEdit;
 Result := True;
end;
Allerdings musste ich, weil ich ja TMain angegeben habe die Main_Unit (Hauptformular des Progs) mit reinnehmen.
Aber so funktioniert es nicht. Muss ich vielleicht als Übergabeparameter Pointer nehmen?
  Mit Zitat antworten Zitat