Schliessen-Button wie bei BalloonTips von XP selbst gemacht

[Helmi]

Hallo,

ich würde gerne so einen Schliessen-Button, wie er bei den BalloonTips bei XP zu sehen ist, selbst gemacht.
(siehe Pic).

Weiss jemand, wie man diesen Button nachbauen kann, wenn möglich ohne eigener Kompo.

Ich hab schon mal einen SpeedButton für so was benutzt. Er schaut ähnlich aus, wenn man Flat auf true setzt und Caption = X, aber es fehlt halt das schwarze Rechteck um den Button rum.

Weiss jemand wie man das machen könnte, bzw. gibt es denn die möglichkeit einen "System"-Button, z. B. durch auslesen einer DLL, zu bekommen (dies sollte aber Windows-Version-unabhänigig sein)?

[RavenIV]

nimm doch ein image dafür.
im OnClick schliesst du den BallonTip dann.

[Flocke]

Zitat von Helmi:

Weiss jemand wie man das machen könnte, bzw. gibt es denn die möglichkeit einen "System"-Button, z. B. durch auslesen einer DLL, zu bekommen (dies sollte aber Windows-Version-unabhänigig sein)?

Es gibt die Funktion DrawFrameControl, die das zeichnet. Normalerweise sollte das mit dem Typ DFC_CAPTION und dem Stil als eine Kombination von DFCS_CAPTIONCLOSE und einem oder mehreren der Flags DFCS_FLAT, DFCS_HOT, DFCS_INACTIVE, DFCS_PUSHED, DFCS_TRANSPARENT gehen.
Nimm am besten eine Paintbox dafür, lass dir die Größe aber auch von dieser Funktion mit dem Flag DFCS_ADJUSTRECT ausrechnen.

[Helmi]

Zitat von Flocke:

Zitat von Helmi:

Weiss jemand wie man das machen könnte, bzw. gibt es denn die möglichkeit einen "System"-Button, z. B. durch auslesen einer DLL, zu bekommen (dies sollte aber Windows-Version-unabhänigig sein)?

Es gibt die Funktion DrawFrameControl, die das zeichnet. Normalerweise sollte das mit dem Typ DFC_CAPTION und dem Stil als eine Kombination von DFCS_CAPTIONCLOSE und einem oder mehreren der Flags DFCS_FLAT, DFCS_HOT, DFCS_INACTIVE, DFCS_PUSHED, DFCS_TRANSPARENT gehen.
Nimm am besten eine Paintbox dafür, lass dir die Größe aber auch von dieser Funktion mit dem Flag DFCS_ADJUSTRECT ausrechnen.

Hallo,

Danke für den Tip mit dem DrawFrameControl
funktioniert echt gut.

Trotzdem hätt ich noch ein paar kleine Fragen:

• Wie kann ich es schaffen, dass der Button, wie er bei dem BalloonTips von WinXP, beim Überstreichen durch die Maus, die Farbe verändert?
• Ich würde auch gerne die Grundfarbe verändern - das Graue schaut ja unmöglich aus
• Wie kann man mit dieser Function und dem Flag "DFCS_ADJUSTRECT" die Größe ermitteln?

[Helmi]

Hat jemand ne Ahnung wie man ich das transparent hinbekommen kann?
DFCS_Transparent hat bei mir keine Auswirkung

ich hab anbei mal ein Beispiel-Projekt angehängt

[edit]Neue Version - in der alten war ein Fehler[/edit]

[Helmi]

*push*

weiss jemand über meine fragen von oben weiter?

[Helmi]

*push*

Weiss jemand vielleicht, wie ich es machen kann, dass der Button, den ich mit DrawFrameControl erzeuge, beim Überfahren mit der Maus die Farbe verändert?
(Wie bei einem BalloonTip von WindoofsXP)

[Helmi]

Nach fast einem dreivierteltem Jahr erlaub ich mir nochmal nachzufragen

[Muetze1]

Im Normalfall erledigt es dier HotTrack, somit DFCS_HOT. Näheres dazu findest du in der MSDN, schonmal dort geschaut?

[Helmi]

Hallo

mit diesem Code erzeug ich den Button in der PaintBox:

Delphi-Quellcode:

  with PaintBox1 do
    begin
      DrawFrameControl(Canvas.Handle, ClientRect, DFC_CAPTION, DFCS_CAPTIONCLOSE + DFCS_FLAT + DFCS_HOT + DFCS_TRANSPARENT);
    end;

Nur wie muss ich das nun machen, dass der Button wechselt? - im Code oben ist ja das DFCS_HOT schon mit dabei.
Wenn ich es rauslasse, dann seh ich erst mal keinen Unterschied.