MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Compartilhe

    Convidad
    Convidado

    Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Convidad em Ter 21 Ago 2012, 20:35

    Boa tarde nobre colegas!
    Estou de cabeça quente e não consigo resolver uma questão:

    Tenho um controle ListView, que é carregado por DAO.

    O carregamento está funcionando perfeitamente!
    Mas como se trata de datas de vencimento, quando
    uma parcela estiver vencida, gostaria que a linha
    conrespondente a parcela ficasse vermelha.

    Já procurei em vários locais, mas não encontrei.
    Alguém poderia me auxilian nisso? Grato!

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Alexandre Neves em Ter 21 Ago 2012, 20:50

    Boa tarde, Marcos
    Parece que a caixa de listagem não aceita cor de linha diferente da cor das restantes. A única diferença que já vi foi com a selecção de linhas, que passa de branco para preto

    Convidad
    Convidado

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Convidad em Ter 21 Ago 2012, 20:55

    Grato Alexandre, mas não se trata de uma caixa de listagem e sim de uma ListView da classe
    MSComctlLib.ListViewCtrl.2
    É um Activex ocx que é muito usado no vb, mas no Access tb!
    tem alguma idéia?

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Alexandre Neves em Ter 21 Ago 2012, 20:56

    Não, Marcos, apenas trabalho com caixa de listagem
    Pode ser que algum colega o ajude.
    Boa sorte!

    Convidad
    Convidado

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Convidad em Qua 22 Ago 2012, 12:35

    Alguma novidade?

    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2287
    Registrado : 21/04/2011

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Marcelo David em Qua 22 Ago 2012, 16:55

    Meu amigo, atribua uma Key personalizado ao ítem do ListView,
    depois, no próprio laço que você o preenche, faça seu if e
    altere a cor do ítem usando como base a Key criada...


    .................................................................................
    Marcelo David
    [Você precisa estar registrado e conectado para ver este link.] (em construção)

    Convidad
    Convidado

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Convidad em Qua 22 Ago 2012, 17:09

    Obrigado marcelo, mas como fazer isso?

    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2287
    Registrado : 21/04/2011

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Marcelo David em Qua 22 Ago 2012, 18:31

    Veja se consegue adapitar:


    Dim strK as String 'Recebe uma letra que irá ser o promeiro caractere da Key
    Dim intK as Integer 'Será contatenado a variável strK para formar a Key
    intK = 0 'Inicializo a variável com 0
    Do Until rsP.EOF
    intK = intK + 1 'incremento a variável intK a cada laço
    strK = "k" & intK 'Concateno as duas variáveis, pois é obrigatório o primeiro caractere de uma Key ser uma letra

    Set Itens = LV.ListItems.Add(, strK, rsP!IdReq) 'Aqui atribuo a Key personalizada ao item do ListView
    bolUrg = rsP!Urgente
    Itens.SubItems(1) = rsP!Produto
    Itens.SubItems(2) = rsP!Qtd
    Itens.SubItems(3) = IIf(IsNull(rsP!PrecoAtual) = True, "Não cotado", rsP!PrecoAtual)
    Itens.SubItems(4) = rsP!finalidade
    LV.ListItems(strK).ListSubItems(1).ForeColor = IIf(bolUrg = True, vbRed, vbBlue) 'Caso a variável bolUrg for True, a cor da linha atual da coluna 1 será vermelha, caso contrário, será azul.
    rsP.MoveNext
    Loop
    Obs.: Para mudar a cor de toda a linha, terá que repetir o código em azul para cada coluna.



    .................................................................................
    Marcelo David
    [Você precisa estar registrado e conectado para ver este link.] (em construção)

    Convidad
    Convidado

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Convidad em Qua 22 Ago 2012, 19:09

    Grande mestre, perfeito!!!
    Deu certo! Muito obrigado!

    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2287
    Registrado : 21/04/2011

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Marcelo David em Qua 22 Ago 2012, 19:31

    Grande eu sei que sou em estatura, afinal 1,82 metros... É um bom tamanho... Razz
    Grato pelo retorno!


    .................................................................................
    Marcelo David
    [Você precisa estar registrado e conectado para ver este link.] (em construção)

    Ney Santos
    Intermediário
    Intermediário

    Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 145
    Registrado : 23/05/2011

    Re: [Resolvido]Mudar cor da fonte de uma linha do ListView basiada em critério

    Mensagem  Ney Santos em Sex 04 Abr 2014, 10:38

    Bom dia!
    estou tentando adptar ams nao estou entendo o código..
    no meu caso a lsit view recebe os valores de uma consulta..
    Existem 3 tipos de pessoas Autor, Réu e Advogado.
    No caso gostaria de destacar o Advogado..
    O nome dado a listView é ctlListView
    Poderia me ajudar?

      Data/hora atual: Qui 08 Dez 2016, 00:07