gleichwertiger Ersatz für GetSafeHwnd

[EWeiss]

Zitat von jaenicke:

Du kannst dort auch das Handle direkt übergeben. GetSafeHwnd prüft eben zusätzlich noch, ob das Fenster und das Handle überhaupt existieren.

Meinst so?

Delphi-Quellcode:

function DIMMED_INIT(pParentWnd: TWinControl; clLight: COLORREF;
       clDark: COLORREF): BOOL; stdcall;
begin
   result := False;

   if (Assigned(pParentWnd) and IsWindow(pParentWnd.Handle)) then
   begin
      FadeWnd := TFadeWnd.Create(pParentWnd);
      FadeWnd.CreateGradient(clLight, clDark);
      result := True;
   end;
end;

gruss