Informação
- Você pode baixar os componentes JEDI VCL em http://jvcl.delphi-jedi.org/
- Recomendamos a leitura dos artigos Usando TJvDBGrid - Part2 e Usando TJvDBGrid - Part3
A propriedade que usaremos é a ShowCellHint. Em nosso exemplo vamos usar basicamente:
1 TForm
1 TClientDataSet
1 TDataSource
1 TJvDBGrid.
No TClientDataSet criar os seguintes campos:
CODIGO :Integer
NOME :String
TELEFONE :String
Deixe a propriedade ShowCellHint com o valor true
Agora basta iniciar algumas informações na Grid. O exemplo de código abaixo fará isso.
procedure TForm2.FormCreate(Sender: TObject); begin ClientDataSet1.CreateDataSet; ClientDataSet1.Append; ClientDataSet1CODIGO.AsInteger := 1; ClientDataSet1NOME.AsString := 'Jocimar de Souza Medeiros'; ClientDataSet1TELEFONE.AsString := '44 9999-2233'; ClientDataSet1.Post; ClientDataSet1.Append; ClientDataSet1CODIGO.AsInteger := 2; ClientDataSet1NOME.AsString := 'Silvana Rodrigues de Mello'; ClientDataSet1TELEFONE.AsString := '44 9899-2266'; ClientDataSet1.Post; end;
Dica
- Lembre-se de que a propriedade showHint deverá estar com o valor true também
É isso aí então pessoal! Agora quando uma informação na TJvDBGrid ficar oculta parcialmente e passarmos o mouse sobre essa informação, será mostrada um hint com o restante do conteúdo.
Em caso de dúvidas, sugestões ou reclamações, por favor comentem o post. E se a informação ajudou você, curta o post nas redes sociais usando os ícones abaixo.
Baixe os fontes do artigo no GitHub
Legal....
ResponderExcluir