Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Form bei Exit einrollen (Taskbar) (https://www.delphipraxis.net/68810-form-bei-exit-einrollen-taskbar.html)

Dragon27 5. Mai 2006 21:05


Form bei Exit einrollen (Taskbar)
 
Hallo,

ich stehe momentan ziemlich auf dem Schlauch. Ich würde gerne ein Form das ich Align = Top gemachte habe, beim verlassen der Maus, zum teil einrollen lassen und dann wieder ausrollen, wenn die Maus wieder darauf zeigt.

Sollte so funktionieren wie bei der Taskbar wenn man einstellt Im vordergrund und Taskleiste automatisch ausbelnden.

Danke für Eure Hilfe

Grüße

Dragon27

SirThornberry 5. Mai 2006 21:19

Re: Form bei Exit einrollen (Taskbar)
 
du kannst die Message cm_mouseenter und cm_mouseleave nutzen um mitzubekommen wenn die maus über das Form kommt bzw. das Form verlässt. Alternativ kannst du auch im Timer-Event prüfen ob die Maus sich zur Zeit über dem Form befindet.

Dragon27 5. Mai 2006 21:24

Re: Form bei Exit einrollen (Taskbar)
 
hallo!

Danke für deine rasche Antwort! Könntest du mir da noch ein wenig weiterhelfen, ich habe zwar verstanden was du meinst aber kann das nicht umsetzten.

Danke für deine Mühe!

Gruß

Dargon271

SirThornberry 5. Mai 2006 21:25

Re: Form bei Exit einrollen (Taskbar)
 
welche Variante kannst du nicht umsetzen bzw. wo genau scheitert es?
Weißt du nicht wie du das Form "einrollst", oder weißt du nicht wie du die Mausposition abfragst etc.?

Dragon27 5. Mai 2006 21:28

Re: Form bei Exit einrollen (Taskbar)
 
Ich weiß nicht wie ich das mit der Maus mache. Ein timer ist glaube ich recht ungeschickt gelöst.... Und das andere verstehe ich nicht wie ich das machen soll.

Danke!

SirThornberry 5. Mai 2006 21:50

Re: Form bei Exit einrollen (Taskbar)
 
hab grad geschaut/getestet, das mit dem cm_mouseleave funktioniert bei forms nicht. Somit wird wohl nur die Methode mit dem Form übrig bleiben.

engine 5. Mai 2006 22:29

Re: Form bei Exit einrollen (Taskbar)
 
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

ein Stein 1. Jul 2006 09:46

Re: Form bei Exit einrollen (Taskbar)
 
hallo,

mich würde nun aber noch interessieren, wie ich ein form eigentlich einrollen kann.

danke

SirThornberry 1. Jul 2006 11:15

Re: Form bei Exit einrollen (Taskbar)
 
indem du einfach die Größe der Form veränderst.


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:33 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz