Ohne Fremdkomponente Button in die Formleiste bringen

[Nicodius]

wie kann ich ohen Fremdkomponente einen button neben dem "X" positionieren bzw mehrere Buttons an beliebigen positionen beim formcaption?


mit freundlichen Grüßen (@stan und natürlich ROTFRONT)

Nico

[Sprint]

In der JVCL ist eine Komponente die auch mit Theme unter XP funktioniert. Kannst dir ja mal den SourceCode dazu anschauen.

[Nicodius]

ja aber ich bin kein jedi fan bei mir funzt das nie :(

--> ich habs also nicht mehr oben ich hatte die komponente ja aber nach 2-3 tagen gehen meine Fremdkompos allesamt nicht mehr :?


egal


vl wäre wer so nett mri den quellcode zu schicken :love:

[Sprint]

Brauchst dir die ja die JVCL nicht installieren. Reicht ja wenn du dir die Unit JvCaptionButton anschaust.

[DaFox]

Hi!

Delphi-Quellcode:

// ...
private
  procedure WMNCPaint(var Msg: TWMNCPaint); message WM_NCPaint;
// ...
procedure TForm1.WMNCPaint(var Msg: TWMNCPaint);
begin
  inherited;
  // mit GetWindowDC() DC von Form holen
  // mit GetSystemMetrics() Größe des Buttons ermitteln (SM_CXSIZE, SMCYSIZE)
  // Button zeichnen, bspw. mit DrawEdge oder per Resource
end;

Gruß,
Markus

PS: Ungetestet. :)

[Luckie]

WM_NCPAINT ist aber nur eine von wenigen Nachrichten, die man abfangen muss. Hier noch mal ein Beispiel, um den Text der Fenstercaption zu zentrieren: http://www.luckie-online.de/Delphi/S...M_NCPAINT.html

Hier im Forum, muss auch irgendwo Code von mir rumschwieren, wie man es mit einem Button macht.

[Nicodius]

danke erstmal


jo luckie, könntest du mir den Link posten?

danke

[Luckie]

Ich müsste sleber suchen.

[Nicodius]

och bitte mach das


mitten i munterricht schreib ich diese nachricht wir machen grad wieder word ^^

[Luckie]

Gut: WM_NCPAINT. Mann!!!