Wie ich das Handle übergeben kann ist klar nur wie bzw ,welches ist das
wenn der User meine DLL initialisiert über eine Funktion ähnlich diese..

function SK_AERO_INIT: HWND; stdcall;
fällt mir im moment nicht ein Sorry

Ist das hInstance???

markieren

Delphi-Quellcode:

function SK_AERO_INIT: LRESULT; stdcall;

implementation

function SK_AERO_INIT: LRESULT; stdcall;
begin
  result := hInstance;
end;

gruss

Ja.

Vergleich doch einfach mal HInstance mit GetModuleHandle('deine.dll').

Zitat von himitsu:

Ja.

Vergleich doch einfach mal HInstance mit GetModuleHandle('deine.dll').

Danke!
Sorry wenn das eine dumme frage war aber ich war mir jetzt nicht sicher.

gruss

Macht nix.

HInstance ist quasi einfach nur eine Variable, welche bei Initialisierung eines Modules (DLL oder EXE) mit dem Handle des Modules (LoadLibrary/GetModuleHandle) befüllt wird.

Aktuell (seit WinNT) stimmt das das "zufällig" mit {$IMAGEBASE $xxxxxxxx} überein (falls die EXE/DLL nicht verschoben werden mußte.

zusammenfalten · markieren

Delphi-Quellcode:

  procedure LibraryProc(Reason: integer);
  begin
    case (Reason) of
      DLL_PROCESS_ATTACH:
      begin
        //
      end;
      DLL_PROCESS_DETACH:
      begin
        //
      end;
    end;
  end;

Kann oder btw.. muss ich meine Anwendung also die EXE die meine DLL verwendet
mit der Libraryproc iniziieren?

Hab da im moment ein problem eine Classe zu erstellen innerhalb der DLL

SKAERO_InitSkin..

In der EXE
SKAERO_InitSkin(hMain, 'Sample.ske');

In der DLL

markieren

Delphi-Quellcode:

function SKAERO_InitSkin(hMain: HWND; ConfigFile: string): BOOL; stdcall;
begin
  Result := SkinEngine.InitSkin(hMain, ConfigFile);
end;

Soll meinen Skin einladen und an dem Handle hMain übergeben.
Irgendwo hängt es .

zusammenfalten · markieren

Delphi-Quellcode:

function TSkinEngine.InitSkin(hMain: HWND; zConfigFile: string): BOOL;
var
  wExePath: string;
  zTip: PAnsiChar;
  ImageFile: PAnsiChar;
  rc: TRect;
  x, y: integer;
  CloseButton: TSkinImageButton;
  RestoreButton: TSkinImageButton;
  MaximizeButton: TSkinImageButton;
  MinimizeButton: TSkinImageButton;

begin

  // Speichere das HauptFenster Handle
  MainWindow(hMain);
  // ermittle die Fenster größe
  GetClientRect(hMain, rc);
  // erstelle die Class TSkinConfig
  FConfig := TSkinConfig.Create;

kann das mit der LibraryProc zu tun haben?

FConfig := TSkinConfig.Create;
Kann ich nicht auflösen einzige Meldung zu viele aufeinanderfolgende Fehler.

gruss