Einzelnen Beitrag anzeigen

tomkupitz

Registriert seit: 26. Jan 2011
319 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: *.vsf Style verwenden

  Alt 25. Nov 2019, 19:44
Ja, habe ich gefunden, geklappt auch.

Eigentlich brauche ich immer nur einen weiß gefärbten Form.Caption. Themes sind nicht möglich. Hat jemand ein Stück Quelltext wie man in Windows 10 den Caption selber zeichnen kann?

Sowas funktioniert nicht:

Code:
procedure TForm1.WMNCPaint(var Msg: TWMNCPaint);
...
  dc := GetWindowDC(Handle);
  Rectangle(dc, 0, 0, Width, Height);
  ReleaseDC(Handle, dc);
...
end;
  Mit Zitat antworten Zitat