forums.silverfrost.com

Little-Acorn · Joined: 06 Jul 2008 Posts: 111 Location: San Diego

I have been writing an application that has several buttons, edit boxes, and other things. It works fine, including the buttons.

The code for each button looks something like this:

C* Place button to Save Registers.
i=winio@('%`ap&',dxpos1,dypos3)
i=winio@('%^8bt[&Save]&',UPDATREG)

I know that if I change the %^8bt to %^6bt, the button will get shorter in its horizontal dimension.

My question is, is it possible to make a button which is smaller in both horizontal and vertical dimensions? I know how to make the text font smaller, but how about the button itself?

Thanx all!

LitusSaxonicum · Posted: Sun Nov 30, 2008 7:11 pm Post subject:

There must be more than one answer to this question, but probably the simplest is to use %tt instead of %bt.

You can also make custom buttons with %ib and &tb

However, if you shrink the font, don't the buttons shrink too?

Eddie

Little-Acorn · Joined: 06 Jul 2008 Posts: 111 Location: San Diego

PaulLaidler · Posted: Mon Dec 01, 2008 1:50 pm Post subject:

Here are two more ways....
1. Use %di and design the dialog using a dialog editor or
2. Use %lw to get the handle of the button then use %sc to initialise the window and call resize_window@ within the %sc callback to set the size of the button to exactly what you want.

LitusSaxonicum · Posted: Mon Dec 01, 2008 9:23 pm Post subject:

Paul,

Your method (2) is a really rather clever approach - but I keep forgetting that a control is also a window! As for your method (1), I've regarded the %di format code as forever beyond my ken (FTN95.chm doesn't help me much!).

Little-Acorn,

I have a program that operates with a single window (just like "Calculator"). Unfortunately, this window is too large to fit when run on a PC with graphics resolution too low. So I call this routine at an early stage while setting up the window. Then all the buttons scale down, the window looks the same but it is smaller.