Solved

Delphi Forms ,developed on Windows XP have one shape/look, but now those made on the 7 and 8, are different

Posted on 2013-12-01
5
388 Views
Last Modified: 2013-12-07
Hi!
I have a system with 80 routines/Forms.
Almost all, were developed using Delphi 2010 + XP Windows.
These have a visual. Example: rounded corner edges.
But now, new routines, that I develop using Delphi 201 + Windows 7/8.
Are with a different look.
Example: The corners are not rounded, and and  the forms, presents a different blue.
I've tried.
Put in Uses XPman. (in the main form)
But not solve.
There is how  the news forms, become like those made on windows xp ?
Or, all become the new standard?(new look of windows 7/8)
Important:
I need a solution.
Without must change, mys 80 forms/routines  that are ready.
Will be possible ?

Thanks !

Attention: Forms only show the difference after compiled, not in design time.
0
Comment
Question by:adrex
  • 3
  • 2
5 Comments
 
LVL 25

Expert Comment

by:Sinisa Vuk
ID: 39688705
Hint from About.com is more like this component XPMan, but try it. How looks you app if you set compatibility mode (XP sp3)?
0
 

Author Comment

by:adrex
ID: 39688920
I had already read, that the unit XPMan has the same effect of  XML manifest.
And a colleague tried that and it did not work.

The difference between the Forms, are only two:

1-The corners are rounded, and now not.

2-And the color, forms now, have a more intense blue, on the frames, the four edges, top, bottom and both sides.

I am not prefer, like before or like after, only need, that be all iguals.
Thanks.
0
 
LVL 25

Expert Comment

by:Sinisa Vuk
ID: 39689276
Some elements of form/controls in delphi are under windows control (painting borders, etc.). You will never get same look under all versions. Main example is TButton component. Form skinning should help for task like this: http://www.alphaskins.com/
http://delphi.about.com/od/toppicks/tp/delphi_skin.htm

Additionally you can try to set manifest like here:
http://www.mytechguide.com/137/how-to-force-old-applications-to-have-windows-xp-look/
http://msdn.microsoft.com/en-us/library/windows/desktop/bb773175%28v=vs.85%29.aspx
0
 

Accepted Solution

by:
adrex earned 0 total points
ID: 39691355
I got a solution.
Put in Properties.
Form Style, all types less, fsNormal
and
BordesStyles=bsSizeable
Thanks
0
 

Author Closing Comment

by:adrex
ID: 39702901
Why make this configuration at forms.
Solve de problem.
Was that I discovered.
By my self.
But Thanks  everybody
0

Featured Post

How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

Join & Write a Comment

Suggested Solutions

Title # Comments Views Activity
Convert MSI to MSM 1 31
how to copy from computer to usb drive 7 68
firefox deployment by sccm 1 24
UAC Controls - confused 9 36
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
If you get continual lockouts after changing your Active Directory password, there are several possible reasons.  Two of the most common are using other devices to access your email and stored passwords in the credential manager of windows.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
This video Micro Tutorial explains how to clone a hard drive using a commercial software product for Windows systems called Casper from Future Systems Solutions (FSS). Cloning makes an exact, complete copy of one hard disk drive (HDD) onto another d…

747 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now