DLL als Erweiterung für mein Programm

[F.W.]

Aha! Nagut.

Ich habe ein bestehendes Programm (für mein Netzwerk) versucht mit einer DLL auzustatten, weil oft Updates kommen und da ist es praktisch, wenn eben nur der dauerupdateteil der in der DLL liegt durch ein Update der DLL geupdatet wird. (Viele updates was? )

1. Das Programm darf nur einmal starten, dafür hab ich folgenden Code verwendet:

Delphi-Quellcode:

Initialization //Verhindern, dass das Programm mehrmals gestartet wird
 mHandle := CreateMutex(nil, True, 'LANTool_NoDes.exe');
 if GetLastError = ERROR_ALREADY_EXISTS then begin
    MessageDlg('LAN-Tool ist schon gestartet!!', mtInformation, [mbOk], 0);
    Halt;
 end;

finalization
 if mHandle <> 0 then CloseHandle(mHandle);

Seit dem Hinzufügen der DLL kommt grundsätzlich die Messagebox.

2.Ich greife von der DLL auf ein Formular zu (das Formular, wo die function für die DLL deklariert ist), allerdings kommen da Zugriffsverletzungen aus der DLL -> Was machen?

Danke!

[Luckie]

Zum Thema Formulare in DLL's kuck dir mal das DLL Tutorial von Assarbad an: http://www.luckie-online.de/Downloads/Importe/Assarbad/

[fkerber]

Hi!

Zum Thema Plugin für die eigene Anwendung:
http://www.delphipraxis.net/internal...ect.php?t=5390

Evtl. ist das ein anderer Ansatz, weiß ich leider nicht, aber vielleicht hilft es ja.

Ciao fkerber

[F.W.]

@Luckie: Wie ich Formulare in DLLs bekomme weiß ich, aber meine DLL greift auf das TRichEdit im MainFormular zu. Also ich denke mal, dass es daran liegt.
Nochmal meine Frage: Ist es möglich aus einer DLL auf Objekte der Anwendung zuzugreifen? Und wenn ja, wie sieht dann das Musterbeispiel aus?

Ich habe bisher nur die Unit des Hauptformulars in die Uses-Klausel der DLL-Unit eingegeben.

[Luckie]

Zitat von F.W.:

Ich habe bisher nur die Unit des Hauptformulars in die Uses-Klausel der DLL-Unit eingegeben.

Das wird so nicht klappen. Woher soll die kompilierte DLL die Komponenten deiner Hauptform kennen. Über gib einen Zeiger der des Richedits an die Funktion in der DLL:

[F.W.]

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?