edi�ao de todos os registos numa tabela!

Question

boas caros programadores!! digamos que tenho uma tablea em paradox,em que uso ttable e que contem os seguintes dados:Nome             telefone             telemoveljoao                111             ...

Firekiller · Answer

No caso, creio que uma query seria melhor:

with Query do begin
close;
SQL.Text := �Update Tabela Set TeleMovel = :Telemovel, Telefone = :Telefone Where Nome = :Nome�;
ParamByname(�Telemovel�).AsString := �555�;
ParamByName(�Telefone�).AsString := �555�;
ParamByname(�Nome�).AsString := �Jo�o�;
ExecSql;
end;

Martins · Answer

[b:bb9dff5caf]Pergunta:[/b:bb9dff5caf]Todos dessa tabela passar�o a ter o mesmo n�mero telemovel?...

Firekiller · Answer

Colega Martins, creio que foi apenas um exemplo... s� para demonstrar como seria a tabela....

Zangado · Answer

mNome := dbCadastro.FieldByName(�Nome�).AsString;
mMatricula := dbCadastro.FieldByName(�Matricula�).AsString;

while not dbCadastro.eof do begin
if dbCadastro.FieldByName(�Nome�).AsString = mNome then begin
dbCadastro.edit;
dbCadastro.FieldByName(�Telefone�).AsString := edTelefone.Text;
dbCadastro.Post;
end;
dbCadastro.Next;
end;
dbCadastro.FindKey([mMatricula]);

Cyberchip · Answer

aee galera muito obrigado...funciona na perfei�ao (e mais qualquer coisa q aprendi no delphi), muito obrigado galera...