Windows XP - Normal and classic themes

HI there,

I just wrote an app in delphi 7 which, when it starts up goes to max screen size. Now if I have my Windows XP set to classic theme, it takes up all the screen, however if I used one of the fancy windows xp themes (like the default blue or silver etc) I get a gap at the top of the screen and also cuts off some space at the bototm of the screen.

Whats up?

Cheers all
LVL 10
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

ZhaawZSoftware DeveloperCommented:
how do you maximize it?
wildzeroAuthor Commented:
Using the Maximize property of the form (window state?)
wildzeroAuthor Commented:
Interesting... here is what I have found

If I have the Form1 windowstate property set to wsMaximized then
  - Windows XP default blue theme it shows up with a gap at the top of the program and the bottom is cut off
  - Windows XP classic it shows up fine

so what I did is set the window state to wsNormal then ran the software and maximized it myself and that worked fine in both.

So what I have to do is set it to wsnormal then on Form1.OnCreate do
 Form1.WindowState := wsMaximized;

and it works fine.

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today

From novice to tech pro — start learning today.