Set the BorderStyle form to bsDialog and use this code in the create form,
SetWindowLong(Handle,gwl_style,GetWindowLong(handle,gwl_style) or WS_THICKFRAME); ClientHeight := Height; Refresh;
I think this is an ugly hack, but you can find it in order.
source share