Einzelnen Beitrag anzeigen

Benutzerbild von Cylence
Cylence

Registriert seit: 2. Sep 2004
Ort: Allgäu
246 Beiträge
 
Delphi 7 Enterprise
 
#1

Form auf DesktopEbene Problem

  Alt 19. Apr 2011, 13:35
Hi,

wenn ich eine Form auf die Desktopebene verbanne, dann ist das an sich kein Problem so

Delphi-Quellcode:
var
  hdesk: THandle;
begin
    hdesk := FindWindow('progman', 'DeskDisplay');
    hdesk := FindWindowEx(hdesk, 0, 'SHELLDLL_DefView', nil);
    hdesk := FindWindowEx(hdesk, 0, 'SysListView32', 'FolderView');
    Windows.SetParent(Handle, FindWindow(nil, 'Program Manager'));
zB onFormCreate, das klappt ohne Probleme, nun wenn aber die Form Alphablending oder TransparentColor hat, UND die Grafikkarte mehrere Ausgänge hat, oder sogar mehrere Monitor aktiv sind, dann wird die Form unsichtbar sobald ich sie auf diese Art auf die Desstopebene schiebe.
Komischerweise ist Sie aber noch da, wenn man mit der Maus über die Position des Fensters fährt, verändert sich der Mauscursor zu crHandpoint, wie ich es auf dieser Form eingestellt habe, aber sie ist unsichtbar...
Hat jemand eine Idee was man da amchen kann? Oder ist Desktopebene mit Alpha oder Transparentcolor und Multiscreenfähige Grafikkarten nicht möglich, kann ja wohl nich sein...

Hoffe jemand kennt das Problem schon...

Gruß

tom
Tom
Just DO it
  Mit Zitat antworten Zitat