Fórum Atualizar 80 registros com apenas um click #217370
29/02/2004
0
Olá, Pessoal,
Seguinte: Tenho um tabela nomeada de CADASTRO, nela estão cadastrados os dados de ´ 80 ´ funcionários, o campo SALARIO é igual em todos os registros, porque todos os funcionarios recebem o mesmo valor de salario, eu gostaria de colocar um edit e um botão para que quando o salario for modificado fosse colocado o valor no edit e ao clicar no botão, os salarios de todos os funcionarios fossem alterados com apenas esse click no botão, para não ser preciso entrar em cada registro para alterar , seria muito trabalhoso pois tem 80 registros, será que tem como fazer isso? se alguem solber por favor ajude.
Uso Delphi5, Tabela Paradox
obrigado.
Seguinte: Tenho um tabela nomeada de CADASTRO, nela estão cadastrados os dados de ´ 80 ´ funcionários, o campo SALARIO é igual em todos os registros, porque todos os funcionarios recebem o mesmo valor de salario, eu gostaria de colocar um edit e um botão para que quando o salario for modificado fosse colocado o valor no edit e ao clicar no botão, os salarios de todos os funcionarios fossem alterados com apenas esse click no botão, para não ser preciso entrar em cada registro para alterar , seria muito trabalhoso pois tem 80 registros, será que tem como fazer isso? se alguem solber por favor ajude.
Uso Delphi5, Tabela Paradox
obrigado.
Clenio
Curtir tópico
+ 0
Responder
Posts
29/02/2004
Marco Salles
Table1.First;
While Not Table1.Eof Do
Begin
Table1.FieldByName(´Salario´).AsCurrency:=StrToCurr(Edit1.Text);
Table1.Next;
end;
Responder
Gostei + 0
29/02/2004
Aroldo Zanela
Colega,
Outra forma:
Outra forma:
MyQuery.SQL.Text := ´update teste set valor = ´+edit1.text; MyQuery.ExecSQL;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)