Sobre Sele��o no DBGrid...

Question

Pessoal vi um programa feito em VB e achei muito interessante a maneira como ele utilizou o multi-select no DBGrid... o usu�rio simplismente d� um duplo clique no Indicador e a linha fica selecionada,...

Michael · Answer

Ol� Bruno!Vc pode simular isso no DBGrid do Delphi. Fa�a assim: crie um campo calculado no dataset que alimenta a grid, do tipo Boolean. Ent�o, no duplo clique de uma linha da DBGrid, vc muda o valor deste campo, para false ou true. E, no evento OnDrawColumn da grade vc pinta a imagem que quiser: uma bolinha, uma seta, etc.A �nica considera��o � que, ao trabalhar sobre os registros selecionados, vc ter� que verificar quais campos est�o com o valor true.[]�s...

Bruno Belchior · Answer

Michael � uma grande id�ia... na verdade n�o trabalho com o DBGrid default do delphi... tenho meu DBGrid herdando dele que j� implementa o tipo booleano com CheckListBox... � como o Cant� disse um vez no livro dele sobre uma dessas id�ias simples...[quote:5ec2a725e3=�Cantu, Dominando o Delphi 7�]� l�gico, desde que voc� pense nisso antes... :lol:[/quote:5ec2a725e3]

Yallebr · Answer

Michael,

Mas com campo calculado isso n�o funcionaria, pois a cada vez q mudar a linha o campo calculado perde os valores e recalcula, ai n�o ser� poss�vel fazer isso com campo calculado. Ou estou errado, vc j� implementou esse sua ideia?

obrigado

Yalle

Michael · Answer

Ol�!Com um campo calculado n�o, mas com [b:1878494d2d]InternalCalc[/b:1878494d2d] sim. ;-)[]�s...

Firekiller · Answer

Cara, pra por os desenhos, pra ficar com uma apar�ncia melhor, adicione o desenho que voc� quer em um ImageList, e no evento OnDrawColumnCell coloque:

ImageList1.Draw( DBGrdi1.Canvas, 0, Rect.Top, 0 ), que seria

ImageList.Draw( Canvas, Coluna, Linha, IndiceImagem).

Apenas uma dicazinha.... defina as propriedades height e width da grid como 11 antes de adicionar as imagens na lista.

Espero que te ajude.

Diogoalles · Answer

ol� Michaela respeito desse internalCalc, eu poderia utilizar ele na seguinte situa��o?ou como se utiliza?[i:cb0fdba6fa]Voc� tem um TAble com um Datasource, este ligado ao DBGrid. A� voc� cria um campo calculado �check� do tipo boolean; Ai coloquei no Oncalcfields da tabela para check = false. Ent�o todos os registros n�o est�o checados. Assim pensei numa rotina no DBGrid.OnCellClick. Se for igual a coluna �check� ent�o, Table1.Check := not(Table1.Check). S� que n�o funciona porque a tabela n�o est� em edi��o. Ent�o o unico problema nessa minha id�ia � saber com calcular o valor deste campo s� para o registro que cliquei, fazendo ele receber conforme acima. [/i:cb0fdba6fa][url]//forum.clubedelphi.net/viewtopic.php?p=225684#225684[/url]obrigado...

Firekiller · Answer

Colega, o campo do tipo InternalCalc, se n�o me engano s� est� dispon�vel nos ClientDataSets... e no caso do exemplo que voc� citou, ficaria meio complicado funcionar, porque um campo do tipo Calculated s� � alterado no evento OnCalcFields. Para voc� fazer funcionar, voc� teria que ter tipo um vetor onde a quantidade de elementos fosse igual a quantidade de linhas da dbgrid, ent�o, a cada clic na coluna especificada, o valor do elemento do vetor respectivo a essa linha � alterado, e, por exemplo se for um vetor de inteiros, voc� poderia colocar mais ou menos assim no evento OnCalcFields (meio que aproveitando seu c�digo):

//Supondo que o campo calculado que vc criou se chame Check
Table1Check.Value := ( vetor[ linhaCorrespondente ] = 1);

Onde, se o valor for 1, o campo ser� setado como verdadeiro, e se for diferente disso, o campo ser� falso. Ent�o a id�ia seria, no click do mouse, o valor de vetor[ linhaCorrespondente ] seria alterado, e n�o diretamente o valor do campo.

F�rum Sobre Sele��o no DBGrid... #298221