Array
(
)

ediçao de todos os registos numa tabela!

Cyberchip
   - 05 nov 2005

boas caros programadores!!

digamos que tenho uma tablea em paradox,em que uso ttable e que contem os seguintes dados:


Nome telefone telemovel
joao 111 111
pedro 222 222
joao 111 111
teresa 333 333

e o que gostaria de fazer é:
quando o utilizador quisesse alterar o campo joao para:

telemovel telefone
555 555



ele alterasse todos os registos que a tabela contem.


como posso fazer isto???

sou muito novato em delphi e estou a tentar começar a aprofundar os meus conhecimentos,espero que me possam ajudar.

desda ja o meu muito obrigado!


Firekiller
   - 05 nov 2005

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
   - 05 nov 2005

Pergunta:

Todos dessa tabela passarão a ter o mesmo número telemovel?


Firekiller
   - 05 nov 2005

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


Zangado
   - 05 nov 2005

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
   - 06 nov 2005

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