Posted on 2003-10-30
I like to switch the TForm.BorderStyle property from anything to bsNone and back. It appears that the controls on the form move up a little bit because of the missing border. Also the client area grows for the same reason. I like the controls to stay at the same screen coordinates and client area to stay the same size.
procedure ChangeBorderStyle(const form: TForm; const borderStyle: TBorderStyle);
- the amount I have to add/substract to TForm.Width and TForm.Height are different for different styles (bsSingle, bsSizable...)
- if I switch forward and backward a couple of times my form was slightly growing in size (roundoff error?)