Author: Tomas Rutkauskas
Fix a small bug in TLabel.AutoSize
If you switch between small fonts and large fonts, your labels' sizes will not be
fixed. AutoSize works only when you change the label's caption or when you switch
the property AutoSize on.
The following piece of code could be run e.g. in FormCreate to fix the sizes.
1 2 for I := 0 to ComponentCount - 1 do3 if Components[I] is TLabel then4 with TLabel(Components[I]) do5 if AutoSize = True then6 begin7 AutoSize := False;
8 AutoSize := True;