FOLDER and PIXEL

[Maurizio]

Hello Antonio ,

The command PIXEL in the folder class doesn't work

Code: Select all  Expand view

#include "fivewin.ch"

 Function Main()
 
 Local oDlg,oFld  
 Local aMonitor  := GetClientRect( GetDesktopWindow() )

 aMonitor[3] -= 60   //  TaskBAr
 aMonitor[4] -= 10
 
 DEFINE DIALOG  oDlg FROM  aMonitor[1] ,aMonitor[2] TO aMonitor[3] ,aMonitor[4]  PIXEL TITLE 'test'  
 
  @ 0, 0 FOLDER oFld PROMPT "Folder 1", "Folder 2" PIXEL   ;
       OF oDlg     SIZE aMonitor[4] ,aMonitor[3] - 100
           
 
 ACTIVATE DIALOG  oDlg
 
 Return nil

Regards Maurizio