Fehler 0xc00007b: Anwendung konnte nicht gestartet werden

[EWeiss]

Die DLL und Anwendung läuft habe aber Probleme.

Delphi-Quellcode:

var // GDI variable
  hGDIP: HMODULE; // Library Handle
  StartUpInfo: GDIPlusStartupInput;
  GdiplusStartup: function(var token: Int64;
                           var lpInput: GDIPlusStartupInput;
                           lpOutput: Int64): Int64; stdcall;

  GdiplusShutdown: function(var token: Int64): Int64; stdcall;
  GdipToken: Int64;

Delphi-Quellcode:

function GDI_Init: boolean;
begin
  Result := false;
  hGDIP := LoadLibrary(LibGdiPlus);
  if hGDIP <> 0 then begin
    GdiplusStartup := GetProcAddress(hGDIP, 'GdiplusStartup');
    if Assigned(GdiplusStartup) then begin
      FillChar(StartUpInfo, SizeOf(StartUpInfo), 0);
      StartUpInfo.GdiPlusVersion := 1;
      GdiplusStartup(GdipToken, StartUpInfo, 0);
      Result := (GdipToken <> 0);
      GDIReady := Result
    end
    else GDI_Close;
  end;
end;

Bekomme GDI+ nicht initialisiert unter 64Bit
Integer nach Int64 umgelegt hilft aber nicht.

Hat sich erledigt..
Ich habe zwar auf Int64 umgestellt aber vergessen den Record "GDIPlusStartupInput" ebenfalls anzupassen da war es noch Integer.

gruss