Hint DBGrid Informativo

Delphi

31/05/2012

Olá pessoal,
A situação é: Como colocar um Hint informativo em uma cada linha da DBGrid?
Exemplo.: Tenho uma grid onde sao listados os alunos
quero adicionar uma coluna com um icone de informação e ao passar o mouse nele.
Ele me abriria o historico de ocorrencias desse aluno, em um hint.
Ex.: Ocorrencia 1 lançada: Aluno se comportou mal
Ocorrencia 2 lançada: Aluno se comportou mal
Ocorrencia N lançada: Aluno se comportou mal

Obs.: Aluno é só um exemplo, vou usar a situação pra outra coisa.
Jeferson Cruz

Jeferson Cruz

Curtidas 0

Respostas

Bruno Leandro

Bruno Leandro

31/05/2012

A minha sugestão seria no evento OnColEnter do dbgrid, voce colocar a mudança do hint ex: dentro do evento voce colocar

if query.fieldbyname(situacao).astring = situacaoxyz then
dbgrid.hint := fulano ...
else
dbgrid.hint := nao fulano ...
GOSTEI 0
Joel Rodrigues

Joel Rodrigues

31/05/2012

Acredito ser a solução do Bruno a mais adequada. Como sugestão, sugiro dar uma olhada em um curso grátis sobre DBGrid existente aqui no portal DevMedia.
GOSTEI 0
Joel Rodrigues

Joel Rodrigues

31/05/2012

Acredito ser a solução do Bruno a mais adequada. Como sugestão, indico dar uma olhada em um curso grátis sobre DBGrid existente aqui no portal DevMedia.
GOSTEI 0
Jeferson Cruz

Jeferson Cruz

31/05/2012

Legal, funcionou... mas eu precisava a cada mudança de linha.

Mas obrigado pelas dicas.
GOSTEI 0
Joel Rodrigues

Joel Rodrigues

31/05/2012

Cara, você pode botar no AfterScroll da tabela a qual está ligada o grid. Mas pode comprometer o desempenho.
GOSTEI 0
Bruno Leandro

Bruno Leandro

31/05/2012

tenta colocar esse codigo no evento OnDataChange do datasource do seu dbgrid
GOSTEI 0
Jeferson Cruz

Jeferson Cruz

31/05/2012

Acabei criando uma tabela detalhe para ser mostrado a informação, caso haja... ficou melhor que o hint
no afterscrool tive problemas com a lentidão!

Obrigado pessoal...
GOSTEI 0
POSTAR