verkleinern leiste wo schließen/minimiren/Maximiren drauf is

[barf00s]

du könntest dur auch so eine titelleiste selber basteln, wenn du unbedingt ne kleinere leiste benötigst
in dem man bspsweise BorderStyle auf bsNone stellt und ein TPanel als "titelleiste" einfügt
das fenster verschrieben kannst dann über des Panels' OnMouseMove ereignis

Delphi-Quellcode:

begin
  ReleaseCapture;
  SendMessage(Handle, WM_NCLBUTTONDOWN, 2, 0);
// oder
// Form1.Perform(WM_NCLBUTTONDOWN, 2, 0);
end;