topic-28209

Posts: 729

Joined: Tue Oct 18, 2005 06:49 PM

Bitmap dentro de un GET

Posted: Thu Mar 13, 2014 04:51 PM

Hola Foro,
Es posible desplegar una imagen dentro de un control GET?
He tratado con el siguiente codigo y aunque no da mensaje de error no despliega la imagen:

Code (fw): Select all Collapse

REDEFINE GET oGet VAR cSeekName ID 120 OF oDlg  BITMAP "MY_BMP"

Estoy usando FWH64 version 13.08 + Harbour 3.2.0dev (Rev. 18881)

Saludos,

George

karinha

Posts: 8523

Joined: Tue Dec 20, 2005 07:36 PM

Re: Bitmap dentro de un GET

Posted: Thu Mar 13, 2014 06:04 PM

Code (fw): Select all Collapse

   REDEFINE GET aGetVenda[3] VAR nCodigoProd  ID 22 PICTURE "@K!"        ;
            OF oDlgVendas COLOR nRGB( 000, 000, 000 ), nRGB( 243, 250, 200 );
            CURSOR  oHand       FONT oFont      UPDATE  BITMAP   "BUSCAR"   ;
            VALID ( PESQUISA_PRODUTOS( nCodigoProd, aGetVenda, oLbx,        ;
                    oDlgVendas, DbClientes, DbEstoque, DbPedidos, oSaida ) );
            ACTION( PESQUISA_PRODUTOS( nCodigoProd := [0000000000000],      ;
            aGetVenda, oLbx, oDlgVendas, DbClientes, DbEstoque, DbPedidos,  ;
            oSaida ) )

   //-> ESTA EN \SAMPLES\TESTGET3.PRG
   //aGetVenda[3]:Disable()
   aGetVenda[3]:lBtnTransparent := .T.       // transparent button get aGetVenda[1]
   aGetVenda[3]:lAdjustBtn      := .T.       // Button Get Adjust Witdh aGetVenda[1]
   aGetVenda[3]:lDisColors      := .F.       // Deactive disable color
   aGetVenda[3]:nClrTextDis     := CLR_WHITE // Color text disable status
   aGetVenda[3]:nClrPaneDis     := CLR_BLUE  // Color Pane disable status

   // tecla <F7> acciona el ACTION
   aGetVenda[3]:bKeyDown := { |nKey| IF( nKey == VK_F7, Eval( aGetVenda[3]:bAction ), Nil ) }

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

George

Posts: 729

Joined: Tue Oct 18, 2005 06:49 PM

Re: Bitmap dentro de un GET

Posted: Thu Mar 13, 2014 08:19 PM

Obrigado Karinha.
Ya esta funcionando.

George

FiveTech Support Forums

Bitmap dentro de un GET

Re: Bitmap dentro de un GET

Re: Bitmap dentro de un GET

Continue the discussion