USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  exibir dados boolean como string num dbgrid
Autodidata
TERESINA
PI - BRASIL
ENUNCIADA !
Postada em 10/11/2004 11:17 hs            
tenho varios campos numa tabela, e um desses campos é do tipo boolean (sim/não)...

quando peço para exibir a tabela no dbgrid a coluna que representa o campo boolean aparece 0 e -1....

O que quero?
Inves dele exibir 0 ou -1 ela exiba Vendido ou À Vender
 
não quer mudar nada no BD... só quero que inves de ser exibido um monte de -1 e 0 seja exibido Vendido ou À Vender no dbgrid.
   
Sandro
não registrado
Postada em 12/11/2004 00:45 hs   
Essa foi interessante... Mas depois de colocar meus raros neurônios para funcionar, encontrei um método simples e eficiente para você fazer o que quer. O único requisito é que você coloque este código em uma parte do seu programa em que você garante que o recordset está estabelecido e que a grid já tenha carregado os dados (p.ex. depois do método refresh do DataControl, se você usar um):
    Dim Coluna as Column
    Set Coluna = DBGrid.Column(NúmeroDaColunaBoolean)
    Coluna.NumberFormat = "#Vendido;A Vender"
    Set Coluna=nothing
Atenção para o ponto e vírgula entre as strings e ao caracter Number (#) no início, sem ele o resultado é uma coluna com valores ilegíveis.
Um abraço,
Sandro.
     
Mateus
AMADORA
PT - PORTUGAL
ENUNCIADA !
Postada em 12/11/2004 12:23 hs            
Vou-lhe dar um exemplo de uso da condição "Ilf":
 
SELECT [qSALDOS_ANTERIORES].[ASSOCIADO], 0 AS AGREGADO, IIf(Sum([saldo])>0,"D","C") AS TIPO, IIf(Sum([SALDO])>0,Sum([saldo]),Sum([SALDO])*-1) AS SALDOA
FROM qSALDOS_ANTERIORES
GROUP BY [qSALDOS_ANTERIORES].[ASSOCIADO], 0;
 
Se utilizar isto no select dos dados que populam o seu Grid, seria :
IIf(tabelatal.[campotal])=0,"A Vender","Vendido")
 
Simples, não é?

 

João Mateus

Se precisar de ajuda extra, visite:

http://joaomateus.planetaclix.pt

   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página