Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)
    Delphi
    by Luckie, 16. Sep 2002
  Scheint zu funktionieren. Bei mir sieht das jetzt so aus:
  
  procedure RaiseLastError;
  
  function EnumThreadWndProc(wnd: HWND; ResultWnd: PInteger): Boolean; stdcall;
  begin
  Result := False;
  ResultWnd^ := wnd;
  end;
• Forum: Win32/Win64 API (native code)

  Fensterhandle bekommen

    Delphi
    by Luckie, 16. Sep 2002
  Hallo,
  ich habe mir gerade einen nonVCL Ersatz für RaiseLastWin32Error gebastelt:
  procedure RaiseLastError(hWnd: Cardinal);
  var
  LastError: DWORD;
  szBuffer, szError : array of Char;
  begin
  LastError := GetLastError;
  wvsprintf(szBuffer, 'Win32-Fehler. Code: %d', PChar(@LastError));
  lstrcat(szBuffer, #13#10);