Problem with Themes in Delphi

When I enable Themes in Delphi XE3 and have a MainMenu as well as an Actionlist and a toolbar connected, the MainMenu and the Toolbar overlap.

Seems to happen when Standard Actions are connected to the Menu.

Win7 Ultimate
Delphi XE3
i7 processor
WRiederOwnerAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
WRiederConnect With a Mentor OwnerAuthor Commented:
Solved it myself. It's not a perfect solution, but these are the steps.

1) Set Align to alNone
2) Position = poDesktopCenter
3) Instead of setting Align to alClient, in OnCreate set Height to Screen.Height - 30; and
     Width to Screen.width - 30;
0
 
ThommyCommented:
Please provide a demo for further help...
0
 
WRiederOwnerAuthor Commented:
Please download

ftp://www.compmark.biz/Sample/MdiEdit.7z

and choose any style from

Project-Options-Appearance
0
Get your problem seen by more experts

Be seen. Boost your question’s priority for more expert views and faster solutions

 
ThommyCommented:
Seems to be a bug!!!

Which XE3 Update version do you have installed?

Have you already tried the latest version update 2?
ID: 29294, Update 2 for Delphi, C++Builder and RAD Studio XE3
0
 
WRiederOwnerAuthor Commented:
I just did update No1. Didn't know there was a No 2 already.
Maybe somebody with update 2 installed, could test this?
It's very simple to do and would save me a whole days work,
if it doesn't work
0
 
ThommyCommented:
Update 2 is available since last week.

It is just an idea, that it could work with the latest update. But I also haven't installed update 2  by now.

I will probably find time to try it out tomorrow...
0
 
WRiederOwnerAuthor Commented:
Thanks Thommy
0
 
WRiederOwnerAuthor Commented:
Maybe more interest now?
0
 
WRiederOwnerAuthor Commented:
FYI: Setting WindowState to wsMaximized in the Object Inspector sorts it out
0
 
WRiederOwnerAuthor Commented:
Not flawless
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.