Solved

Display in different resolution

Posted on 1998-11-15
8
197 Views
Last Modified: 2011-09-20
I would like my application to look good in resolution higher then 800x600 (which is what I develop in).

I am using anchors (Delphi 4) which helps a lot. My only problem is one of my screen has 4 big buttons in the middle. If I just move them to the center the screen looks empty. How can I change the size/font of the buttons to accomodate new resolutions ? I can think of how to do it the hard way but I suspect there might be a better way.
0
Comment
Question by:yvesmail
8 Comments
 
LVL 27

Expert Comment

by:kretzschmar
ID: 1346909
hi yvesmail,

the form has a property scaled.
Set it to true and all controlls in the Form should be scaled depents of the resolution.


But i have not tested.

meikl
0
 
LVL 1

Accepted Solution

by:
xpher earned 180 total points
ID: 1346910
Try using on FormCreate
ChangeScale(x, 100) where x is the percentage that you would like to scale to. ie if you create in 800x600 and want it to display in higher resolution that is say 40% greater then
ChangeScale(140, 100);
(ie 140%)
You could write code like

if Screen Width > 800 then
 ChangeScale(140, 100);

Obviously you will have to work out percentage yourself.

Or you could use scaleby one changes only the form the other changes components too.

Hope this helps

Chris :)
0
 
LVL 10

Expert Comment

by:viktornet
ID: 1346911
I have a component I've done another person here on E-E...

I could send you the srouce code if you want...

If you want me to do so, I'd like to get the credit if you like the component...

Cheers,
Viktor
0
 

Author Comment

by:yvesmail
ID: 1346912
Thank you. I will try these suggestions.

Viktor: That would be great if you could send me your source code. I will give you the credit if I use it. My email: ymailhot@magma.ca
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 
LVL 10

Expert Comment

by:viktornet
ID: 1346913
Hello!

I just sent it to you. Hope that's what you needed ....

Cheers,
Viktor
0
 

Author Comment

by:yvesmail
ID: 1346914
It turns out all I need is what xpher proposed. I added the following line and it works great. Thank you Viktor for your component but it looks like I won't need it.
0
 
LVL 10

Expert Comment

by:viktornet
ID: 1346915
...
0
 
LVL 10

Expert Comment

by:viktornet
ID: 1346916
That's what y'all out there say...
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
In my programming career I have only very rarely run into situations where operator overloading would be of any use in my work.  Normally those situations involved math with either overly large numbers (hundreds of thousands of digits or accuracy re…
This is a video that shows how the OnPage alerts system integrates into ConnectWise, how a trigger is set, how a page is sent via the trigger, and how the SENT, DELIVERED, READ & REPLIED receipts get entered into the internal tab of the ConnectWise …
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …

947 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

19 Experts available now in Live!

Get 1:1 Help Now