BMP no xBrowse - RESOLVIDO

[evertonlb]

Amigos.. tenho um xBrowse que mostra os clientes cadastrados na loja. Como acontece em todas as lojas tem clientes que estão com registro no SPC. Claro que teno dentro do cadastro do cliente um campo para saber se ele esta ou não registrado. O que eu gostaria de fazer era colocar um BMP (uma bolinha) antes do nome para clientes que tem registro e um para quem não tem. Creio que seja possível. como poderia fazer?

 

Att.

Everton

[Theotokos]

Adiona na primeira Coluna do xBrowse, no meu caso do Lado Esquerdo do Nome do Cliente

    oBrw:aCols[1]:AddResource("Bloqueado" )                  // Adiciona Imagem Resource para Bloqueado
    oBrw:aCols[1]:AddResource("DesBloqueado" )           // Adiciona Imagem Resource para Não Bloqueado
    oBrw:aCols[1]:bBmpData          := { || If( D_COND1 = 1, 1, 2 ) }     // Verifica a Condição: se 1) Imagem 1 (Bloqueado),  se 2) Imagem 2 (Não Bloqueado)
    oBrw:aCols[1]:nDataBmpAlign  := 0

 

 

 

[evertonlb]

 

Adiona na primeira Coluna do xBrowse, no meu caso do Lado Esquerdo do Nome do Cliente

    oBrw:aCols[1]:AddResource("Bloqueado" )                  // Adiciona Imagem Resource para Bloqueado
    oBrw:aCols[1]:AddResource("DesBloqueado" )           // Adiciona Imagem Resource para Não Bloqueado
    oBrw:aCols[1]:bBmpData          := { || If( D_COND1 = 1, 1, 2 ) }     // Verifica a Condição: se 1) Imagem 1 (Bloqueado),  se 2) Imagem 2 (Não Bloqueado)
    oBrw:aCols[1]:nDataBmpAlign  := 0

 

 

 

Coloquei da seguinte maneira.. não deu erro, mas tambem não funcionou

        aCol_oXBrw111[4] := oXBrw111:aCols[4]
           oXBrw111:aCols[4]:AddResource("Imagens\16\accept.bmp" )                                               // Adiciona Imagem Resource para Bloqueado
           oXBrw111:aCols[4]:AddResource("Imagens\16\cancelamento.bmp" )                                         // Adiciona Imagem Resource para Não Bloqueado
           oXBrw111:aCols[4]:bBmpData       := { || If( !empty( PES_REGI ), 1, 2 ) }                             // Verifica a Condição: se 1) Imagem 1 (Bloqueado),  se 2) Imagem 2 (Não Bloqueado)
           oXBrw111:aCols[4]:nDataBmpAlign  := 0                                                                 //     .and. empty( PES_BAIX )
           aCol_oXBrw111[4]:nWidth          := 645
           aCol_oXBrw111[4]:cHeader         := "Nome do Cliente"
           aCol_oXBrw111[4]:lHIDE           := .F.
           aCol_oXBrw111[4]:oHeaderFont     := oFONT5PS
           aCol_oXBrw111[4]:oDataFont       := oFONT6PS
           aCol_oXBrw111[4]:oFooterFont     := oF_Form1_1
           aCol_oXBrw111[4]:bClrHeader      := {|| { 0, 16773863 } }
           aCol_oXBrw111[4]:bClrFooter      := {|| { 0, 15790320 } }
           aCol_oXBrw111[4]:bClrStd         := {|| { 0, 16777215 } }
           aCol_oXBrw111[4]:bClrSel         := {|| { 16777215, 5525059 } }                                                            
           aCol_oXBrw111[4]:bClrSelFocus    := {|| { 16777215, 16750899 } }                   

Onde será que tá o erro?

 

Att.

Everton

[evertonlb]

Foi só colocar no lugar de ADDResource o AddBmpFile.

Valeu mesmo Theotokos... Obrigado

 

Att.

Everton