Autoselect dbgrid

Question

Ola, pessoal. To com uma d�vida:
Nos campos DBEdit tenho a proprieade Autoselect para que o texto fique selecionado no componente ao receber o foco. Como fa�o isto em um dbgrid, j� que n�o tem esta propriedade?

Edineidaniel · Answer

Desculpe,Mas n�o entendi bm qual o seu problema realmente..Pq vc precisa de autoselect em um dbGrid? O q vc pretende fazer?t+Edinei...

Stclara3107 · Answer

Pelo seguinte, meu amigo.Troquei a tecla tab pelo enter no meu sistema. S� que o chefe quer que quando a c�lula do dbgrid receber o foco (s�o tr�s no form) o texto venha �selectado� como quando uso um dbedit para que ele possa usar o ctrl+c para copiar e jogar para um outro lugar com ctlr+v.� um sistema de controle de eleitores.......

Marco Salles · Answer

seguinte :voce quer que ao receber o foco cada c�lula do dbgrid fique selecionada de cada vez , ou voce quer que todas as celulas juntas do dbgrid fiquem selecionadas de uma s�vez ????...

Stclara3107 · Answer

Quero que o texto da celula que recebe o foco fique selecionado como se fosse um dbtext...

Marco Salles · Answer

[b:b42c2e0c1a]propriedade options do dbgrid ..coloque dgAlwasysShowEditor em False[/b:b42c2e0c1a]

isto deve resolver , caso n�o tenha exito , poste como esta configurado as suas propriedades Options para que possamos ajusta-la

Marco Salles · Answer

[quote:81b130f29e]propriedade options do dbgrid ..coloque dgAlwasysShowEditor em False Cita��o: isto deve resolver , caso n�o tenha exito , poste como esta configurado as suas propriedades Options para que possamos ajusta-la [/quote:81b130f29e]isto vai dar aquele efeito azulado na celula da Grade.. Agora para usar o CNTR+C tente executar o codigo abaixo:[code:1:81b130f29e]procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;  Shift: TShiftState);begin if (Shift = &#91;ssCtrl&93;) and (Key = 67) then  begin   if dbgrid1.SelectedField = NomeDoSeuTFiled1  then      Clipboard.AsText:=NomeDoSeuTFiled1.AsString   else       if dbgrid1.SelectedField = NomeDoSeuTFiled2  then         Clipboard.AsText:=NomeDoSeuTFiled2.AsString       else          if dbgrid1.SelectedField = NomeDoSeuTFiled3  then            Clipboard.AsText:=NomeDoSeuTFiled3.AsString          else             if etec...                 Clipboard.AsText:=etc....        end;end;[/code:1:81b130f29e][b:81b130f29e]declare na sec��o implementation a uses implementation Clipbrd;[/b:81b130f29e]...

F�rum Autoselect dbgrid #324773