| Subject: | Loading Screen very slow in certain PC when I change Formstyle from fsNormal to |
| Posted by: | Jeremy Lim (jeremy.l…@mydexter.com) |
| Date: | Wed, 7 Nov 2007 |
My program need to change the form style from fsNormal to fsMDIChild in
Run-Time, because my application sometime need this program to run back
ground without showing the forms.
But when I change fsNormal to fsMDIChild in Run-Time some PC loading need
around 5 seconds below
are the coding;
FormStyle := fsMDIChild;
if ((Application.MainForm as TfmMainForm).igLogo.ClientHeight >
Self.Height) and
((Application.MainForm as TfmMainForm).igLogo.ClientWidth >
Self.Width) then
begin
Self.Top := ((Application.MainForm as
TfmMainForm).igLogo.ClientHeight - Self.Height) Div 2;
Self.Left := ((Application.MainForm as
TfmMainForm).igLogo.ClientWidth - Self.Width) Div 2;
end;
The default formstyle is fsNormal.