Einzelnen Beitrag anzeigen

engine

Registriert seit: 6. Mär 2005
73 Beiträge
 
#7

Re: Form bei Exit einrollen (Taskbar)

  Alt 5. Mai 2006, 23:29
Hallo,

ich habe so etwas ähnliches über einen Timer gemacht. Das funktioniert auch recht gut.
Du brauchst nur über einen Timer zu Prüfen ob sich die Maus über dem Formular befindet.
Delphi-Quellcode:
var
  p : TPoint;
  wc : TWinControl;
  i : byte;

begin
  GetCursorPos(p);

  begin
    wc:=FindVCLWindow(p);

    if wc <> nil then // Maus befindet sich im Form
      begin
        ...
      end
    else // Maus befindet sich außerhalb der Form
      begin
        ...
      end;
  end;
end;
Wie Sir Thornberry schon gesagt hat.

mfG engine
  Mit Zitat antworten Zitat