FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC fold transparentes
Posts: 233
Joined: Wed Aug 09, 2006 03:07 PM
fold transparentes
Posted: Fri Dec 22, 2006 01:25 PM

Hola a todos...

Alguien puede decirme como hacer transparentes las dos fold que tengo declaradas para que parezca que está encima del fondo?? El fondo no es una imagen sino que le he dado un color a la pantalla....

DEFINE WINDOW oWnd1 TITLE "Configuración"

@ 3, 1 FOLDER oFld PROMPTS "Parámetros", "Sistema" ;
SIZE 225, 150

@ 2, 1 SAY "Codigo PDA" OF oFld:aDialogs[ 1 ] SIZE 70, 15
@ 2, 10 GET oCod_pda var (cAliasVector)->codpda OF oFld:aDialogs[ 1 ] SIZE 130, 21
@ 3.6, 1 SAY "Aplicación" OF oFld:aDialogs[ 1 ] SIZE 70, 15
@ 4, 10 GET oAplic var (cAliasVector)->aplicacion OF oFld:aDialogs[ 1 ] SIZE 130, 21
@ 5.4, 1 SAY "Almacen" OF oFld:aDialogs[ 1 ] SIZE 70, 15
@ 6, 10 GET oAlmacen var (cAliasVector)->almacen OF oFld:aDialogs[ 1 ] SIZE 130, 21
@ 7.1, 1 SAY "Lista Precios" OF oFld:aDialogs[ 1 ] SIZE 70, 15
@ 8, 10 GET oPrecios var (cAliasVector)->lista_pvp OF oFld:aDialogs[ 1 ] SIZE 130, 21

// Second page

@ 2, 1 SAY "Dirección IP" OF oFld:aDialogs[ 2 ] SIZE 70, 15
@ 2, 10 GET oIP var (cAliasVector)->ip_equipo OF oFld:aDialogs[ 2 ] SIZE 130, 21
@ 3.6, 1 SAY "Nombre del Equipo" OF oFld:aDialogs[ 2 ] SIZE 70, 15
@ 4, 10 GET oNombreEq var (cAliasVector)->equipo OF oFld:aDialogs[ 2 ] SIZE 130, 21

oWnd1:setcolor(RGB(1,1,1),RGB(230,184,94))

ACTIVATE WINDOW oWnd1

Saludos

Elías Torres.

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
fold transparentes
Posted: Fri Dec 22, 2006 03:06 PM

Elias,

Has probado a darle color al folder con oFld:SetColor( ... ) ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 233
Joined: Wed Aug 09, 2006 03:07 PM
fold transparentes
Posted: Fri Dec 22, 2006 05:24 PM

Antonio,

Gracias... Como no me di cuenta antes....

Saludos.

Elías Torres.

Continue the discussion