Folderex on Folderex Coordinate

[Mulyadi]

Hi All,
how to make coordinate folder A1,A2 balance..?
look my sample code:

Code: Select all  Expand view  RUN

#include "fivewin.ch"

Function main()

   local oDlg, oFld, oFld1

   DEFINE DIALOG oDlg TITLE "Test ( coordinat folder 2 to large )" size 500, 300  TRUEPIXEL

   @ 1, 10 FOLDEREX oFld OF oDlg  SIZE oDlg:nWidth-20, oDlg:nHeight-10 PIXEL ;
     PROMPT "Folder A", "Folder B"
     
   @10, 1 FOLDEREX oFld1 OF oFld:aDialogs[1]  SIZE oFld:aDialogs[1]:nWidth, oFld:aDialogs[1]:nHeight PIXEL ;
     PROMPT "Folder A1", "Folder A2"

     
   ACTIVATE DIALOG oDlg CENTERED

return nil

 

if just one folderex on a dialog, the coordinate can be balance.

thanks.

[nageswaragunupudi]

Code: Select all  Expand view  RUN

  local oDlg, oFld, oFld1

   DEFINE DIALOG oDlg SIZE 500,300 PIXEL TRUEPIXEL

   @ 1,10 FOLDEREX oFld OF oDlg SIZE oDlg:nWidth-20, oDlg:nHeight-10 PIXEL PROMPT "Prompt-A", "Prompt-B"

   oFld:aDialogs[ 1 ]:lTruePixel := .t.

   @ 0,0 FOLDEREX oFld1 OF oFld:aDialogs[ 1 ] ;
      SIZE oFld:aDialogs[ 1 ]:nWidth-4, oFld:aDialogs[ 1 ]:nHeight-30 PIXEL ;
      PROMPT "Prompt-A1", "Prompt-A2"

   ACTIVATE DIALOG oDlg CENTERED
 

[Mulyadi]

Thanks mr Rao.

especially in the case of lTruePixel, please explain it to me differences in calculations in the case of size x, y pixels.
example:

Code: Select all  Expand view  RUN

// in case lTruePixel := .F.
@ x,y say "test" of oDlg size 30, 12 pixel
// next row
@ x+12, y say "another row" of oDlg size 50, 12 pixel
//the result of the distance between rows is balanced
 

but in then case lTruePixel := .T.
@ x,y say "test" of oDlg size 30, 12 pixel
// next row
@ x+12, y say "another row" of oDlg size 50, 12 pixel
// the result of the distance between rows overlaps

[nageswaragunupudi]

@ r,c .... SIZE w,h PIXEL when oDlg:lTruePixel == .T.

is the same as

@ r/2, c/2 .... SIZE w/2, h/2 PIXEL when oDlg:lTruePixel == .F.

[Mulyadi]

Thanks Mr. Rao

Regards