Dialog dimensions (SOLVED)

[frose]

Hello,

this sample:

Code: Select all  Expand view

FUNCTION Main()

   LOCAL oDlg
   LOCAL lExit := .F.
   LOCAL oBtn

   DEFINE DIALOG oDlg FROM 5, 5 TO 40, 80 TITLE "A Dialog Box"

   @  1,  1 TO 4, 30 LABEL "&This is a LABEL for anything:" OF oDlg

   @  2,  2 CHECKBOX lExit PROMPT "This is a CHECKBOX with a long text description"  OF oDlg
   @  3,  2 CHECKBOX lExit PROMPT "This is a CHECKBOX with a long text description"  OF oDlg
   
   @  5,  4 BUTTON "&Ok" OF oDlg SIZE 40, 12

   @  5, 12 BUTTON oBtn PROMPT "&Cancel" OF oDlg SIZE 40, 12 ;
            ACTION( MsgInfo( "Cancel" ), lExit := .T., oDlg:End() )

   ACTIVATE DIALOG oDlg VALID lExit

RETURN nil

generates this output:


- What about the row hight? How to adjuste?
- The row hight seem to differ, is that normal?
- The lines of the LABEL are partly overwritten by the check boxes.
- How to adjuste the size of the controls?
- Is it opportune to change to PIXEL?

Thanks in advance for any help

[StefanHaupt]

Frank,

you can change the default size of controls in the ON INIT clause. With the PIXEL clause you can place the controls more exactly on the dialog.

[frose]

Stefan,

many thanks for your tip.

It's really better to develop the dialogs with a resource compiler, e. g. 'Resource Builder' and not handmade.