Trocar valor em DBGrid

Delphi

25/09/2003

Tenho um dbgrid e gostaria de que se determinado valor fosse encontrado no BD, fosse substituido por outro...

Algo assim.
Campo1, campo2, campo3...
Se DBGrid.Coluna[2].SeuValor=´1´ então
DBGrid.Coluna[2].SeuValor:=´2´;


Desde já agradeço...
\
Obrigado...


Dinorvm

Dinorvm

Curtidas 0

Respostas

Joilson_gouveia

Joilson_gouveia

25/09/2003

Vc deve fazer isso é na Consulta SQL, e não no DBGrid.

Altere sua consulta para que venha todas as colunas que vc deseja no DBGrid...

SELECT CAMPO1, CAMPO2, [b:35fcfcb85a]IF CAMPO3=1 THEN 2 ELSE CAMPO3 END AS CAMPO3[/b:35fcfcb85a] FROM TABELA


GOSTEI 0
Dinorvm

Dinorvm

25/09/2003

Valeu,


Muito obrigado, joilson_gouveia...


GOSTEI 0
Dinorvm

Dinorvm

25/09/2003

A dica do joilson_gouveia não funcionou, acho que o problema é que meu BD é paradox...

Alguem poderia me ajudar?


GOSTEI 0
Marcelo.c

Marcelo.c

25/09/2003

Se DBGrid.Coluna[2].SeuValor=´1´ então DBGrid.Coluna[2].SeuValor:=´2´;


Talvez assim:

No evento OnCellClick:

if Column.Field = Campo3 then
  if Campo3.Value = ´1´ then
  begin
    Tabela.Edit;
    Campo3.Value :=´2´;
    Tabela.Post;
  end;



GOSTEI 0
POSTAR