Buenas tardes foro,
Como implemento un folder con 2 labels que me quede ajustado a una ventana ?
FWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Folder ajustado a ventana o dialogo
Prueba a ver
DEFINE WINDOW oWnd .....
.../...
oWnd:oClient := oFolder
ACTIVATE WINDOW oWnd ....Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
No funciona maestro Navarro
Uso este codigo
Uso este codigo
#include "fivewin.ch"
function Main()
local oDlg, oFld
DEFINE DIALOG oDlg TITLE "FiveWin Dynamic folders" ;
FROM 5, 5 TO 20, 49
@ 0.5, 1 FOLDER oFld PROMPT "&xBase", "&And OOP", "&Power" ;
OF oDlg //SIZE 160, 90
@ 1, 1 BUTTON "&Hello" OF oFld:aDialogs[ 1 ] ;
ACTION MsgInfo( "Hello world!" )
oDlg:oClient := oFld
ACTIVATE DIALOG oDlg CENTERED
return nil
procedure AppSys // Xbase++ requirement
returnFWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity
Si funciona con ventanas, pero en tu caso con Dialogs
#include "fivewin.ch"
function Main()
local oDlg, oFld
DEFINE DIALOG oDlg TITLE "FiveWin Dynamic folders" ;
FROM 5, 5 TO 200, 490 PIXEL //TRUEPIXEL
ACTIVATE DIALOG oDlg CENTERED ON INIT ( oFld := CreateFolder( oDlg ), oDlg:oClient := oFld )
return nil
Function CreateFolder( oDlg )
local oFld
@ 0, 0 FOLDER oFld PROMPT "&xBase", "&And OOP", "&Power" ;
OF oDlg PIXEL SIZE oDlg:nWidth - 6, oDlg:nHeight - 29
@ 10, 10 BUTTON "&Hello" OF oFld:aDialogs[ 1 ] ;
ACTION MsgInfo( "Hello world!" ) SIZE 128, 32 PIXEL
Return oFldCristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Muchas gracias maestro Navarro
FWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity