Nicht Verkleiner wenn man auf die Titelleiste klickt

[tuxhol]

Folgende Möglichkeit fällt mir noch ein:
Unterdrück doch einfach die Titelleiste. Wenn keine da ist, kann man schließlich auch nicht maximieren

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
Var
 Save : LongInt;
Begin
 If BorderStyle=bsNone then Exit;
 Save:=GetWindowLong(Handle,gwl_Style);
 If (Save and ws_Caption)=ws_Caption then Begin
   Case BorderStyle of
     bsSingle,
     bsSizeable : SetWindowLong(Handle,gwl_Style,Save and
       (Not(ws_Caption)) or ws_border);
     bsDialog : SetWindowLong(Handle,gwl_Style,Save and
       (Not(ws_Caption)) or ds_modalframe or ws_dlgframe);
   End;
   Height:=Height-getSystemMetrics(sm_cyCaption);
   Refresh;
 End;
end;

Damit sollte das Problem gelöst sein.
Falls Du aus ästhetischen Gründen dennoch eine Titelleiste brauchst, nimmst Du entweder ein Label dafür und plazierst es hübsch oben über die ganze Breite oder einen Screenshot von Deiner alten Titelleiste, den Du in ein Image packst...