API fürs Zeichnen von Fenster-Button (BorderIcons) im Win Vista/7 Stil gesucht

[ConnorMcLeod]

Hier bitte:

Delphi-Quellcode:

uses
    Themes
  ;

procedure PaintCloseButton(ACanvas: TCanvas; ARect: TRect);
var
  CloseBtnDrawDetails: TThemedElementDetails;
begin
        CloseBtnDrawDetails := ThemeServices.GetElementDetails(twCloseButtonNormal);
        ThemeServices.DrawElement(ACanvas.Handle, CloseBtnDrawDetails, ARect);
... oder normal ...
        Windows.DrawFrameControl(ACanvas.Handle, ARect, DFC_CAPTION, DFCS_CAPTIONCLOSE);
end;

Den Rest findest Du bestimmt selbst raus. HTH

[s.h.a.r.k]

Genau der Code liefert mich aber einen Button, den ich nicht haben will Der ist nämlich zum einen nicht transparent und zum anderen hat der ein Icon in der Mitte! Ich will eines ohne Icon und das gibts nicht. Habe schon alle twXXX-Optionen durchprobiert.

[ConnorMcLeod]

Das hier zeichnet einen Buttonhintergrund, aber transparent ist er noch nicht. Vllt findest Du noch den richtigen Klassennamen für OpenThemeData raus. Die Klassen stehen in der Datei AeroStyle.xml, aber genauer habe ich nicht geforscht.

Delphi-Quellcode:

function OpenThemeData(hwnd: HWND; pszClassList: LPCWSTR): THandle; stdcall; external 'uxtheme.dll';
function CloseThemeData(hTheme: THandle): HRESULT; stdcall; external 'uxtheme.dll';
function DrawThemeBackground(hTheme: THandle; hdc: HDC; iPartId, iStateId:
  Integer; const pRect: TRect;
  pClipRect: PRECT): HRESULT; stdcall; external 'uxtheme.dll';

procedure TForm1.Button1Click(Sender: TObject);
var
  ltd: THandle;
begin
  ltd := OpenThemeData(Handle, PWideChar('button'));
  try
    DrawThemeBackground(ltd, Canvas.Handle, 1, 1, Rect(20, 20, 100, 50), 0);
  finally
    CloseThemeData(ltd);
  end;
end;

[s.h.a.r.k]

Hm... Ich glaube ich habe die Antwort gefunden. Lass mich aber auch gerne vom Gegenteil überzeugen, sind ja immerhin schon fast fünf Jahre seit dem Post vergangen.

Zitat von http://social.msdn.microsoft.com/Forums/en-US/windowsuidevelopment/thread/05474b1f-d92b-4774-8ea5-751cda72ea7a:

Hi devexpert,

Unfortunately, we do not expose the caption buttons though any API. The only way to get these is by letting the DWM draw the non-client area of your app.

Thanks,
Wale

[GPRSNerd]

Ich habe von den Jedis den JvCaptionButton benutzt, aber die gleichen Probleme gehabt mit Style/Theme und fehlender Transparenz.
Erstaunlicherweise gibt es ein paar Programme, die da ganz ordentliche Buttons hinkriegen, wie z.B. UltraMon.

Wenn du dafür eine Lösung finden solltest, könntest du die ja hier posten...

[s.h.a.r.k]

Ich muss mir mal ein Windows 7 in eine VM installieren und da ein Theme-Wechsel vornehmen, sodass die Button anders aussehen. Ich könnte wetten, dass es eine API für das ganze gibt oder vielleicht eine Beschreibung der Zeichenroutine. Ergebnisse folgen, sobald ich mal Zeit habe

[s.h.a.r.k]

Hm, es ist scheinbar wirklich so, dass die Anwendungen die Buttons selbst zeichnen müssen und es keinerlei Windows API gibt, siehe dem Screenshot anbei. Leider habe ich es nicht geschafft in der letzten halben Stunde der VM beizubringen mehrere Monitore zu nutzen, daher kann ich im Moment noch keine Aussage bzgl. UltraMon treffen.

Nachtrag: Habe es jetzt geschafft meiner VM mehrere Monitore unterzujubeln und so UltraMon mal näher anzuschauen. Das Ergebnise ist das gleich wie bei Trillian, es wird echt alles selbst gezeichnet. Wundert mich zwar immer noch etwas, aber ich muss mich wohl damit abfinden,dass ich das nun echt selbst machen muss.