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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  MUDAR COR DE ALGUMAS LINHAS NO MSFLEX
LCRamos
Pontos: 2843
GOIANIA
GO - BRASIL
ENUNCIADA !
Postada em 30/05/2006 14:46 hs            
Venho tentando mudar a cor de uma linha ou coluna no MsFlex, mas tudo que tento, não sai como o esperado.
Quero que em um cadastro de produto, na consulta os produtos que estiverem com estoque negativo, saiam em vermelho, no código abaixo, consegui fazer isto, mas ao entrar o grid em foco, ele não destaca a linha inteira, fica só algumas células destacadas, e também me traz no Top do Grid o ultimo registro, e quando clico no grid volta ao primeiro registro normal, mas sem clicar funciona de forma incorreta.
Alguém sabe, estou usando o código abaixo.
If dtaPRODUTO.Recordset.RecordCount > 0 Then
  msfPRODUTO.Visible = True
  iJ = 0
  For iJ = 0 To dtaPRODUTO.Recordset.RecordCount
   msfPRODUTO.TextMatrix(iJ, 2) = Format$(msfPRODUTO.TextMatrix(iJ, 2), "###,##0.000")
   msfPRODUTO.TextMatrix(iJ, 3) = Format$(msfPRODUTO.TextMatrix(iJ, 3), "###,##0.00")
   msfPRODUTO.TextMatrix(iJ, 4) = Format$(msfPRODUTO.TextMatrix(iJ, 4), "###,##0.00")
   sCOL = msfPRODUTO.TextMatrix(iJ, 2)
   If Val(sCOL) < 0 Then
    msfPRODUTO.Row = iJ
    msfPRODUTO.Col = 2
    msfPRODUTO.CellForeColor = vbRed
   End If
  Next
 Else
  msfPRODUTO.Visible = False
 End If
End Function
 
vlu//
 
   
Daniel
Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 30/05/2006 15:01 hs            
Voce está usando a função errada é CellBackColor
 
   If Val(sCOL) < 0 Then
    msfPRODUTO.Row = iJ
    msfPRODUTO.Col = 2
    msfPRODUTO.CellBackColor = vbRed
   End If
 

dsmn
     
Ex-FatBoy
Pontos: 2843 Pontos: 2843
LONDRINA
PR - BRASIL
ENUNCIADA !
Postada em 30/05/2006 15:15 hs            
   
LCRamos
Pontos: 2843
GOIANIA
GO - BRASIL
Postada em 30/05/2006 17:32 hs            
Obrigado Daniel, mas a função é a mesma, fica do mesmo jeito, a diferença é que a cor de fundo que muda, eu quero só o texto, mas mesmo assim continua o defeito.
Ex-FatBoy, sim, vi a dica e funciona da forma que está o meu, se não clicar no Grid, fica todo esquisito e bagunçado.
Alguém tem sugestão?
 
Obrigado.
 
vlu//
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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