Ohne Fremdkomponente Button in die Formleiste bringen

[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.