Atualizar varios registros ao mesmo tempo

[silas_aguiar 0]

Pessoal estou com uma dúvida,

 

Estou usando Adotable, Adoconnecting e Datatable.

 

Como faço para atualizar varios registros ao mesmo tempo. Ex. tenho um registro em que todos os cadastrados pertencem ao "9° ano", quero mudar todos que contém 9° ano para 8° ano.

 

Desde já agradeço a atenção de todos!

[Eisenheim 67]

Olá amigo.

 

Bem, eu vejo duas formas:

 

Primeira forma:

 

UPDATE TABELA SET CAMPO = VALOR WHERE CAMPO = VALOR_ANTIGO;

 

Segunda forma:

 

  SuaTabela.Filtered := false;
  SuaTabela.Filter   := 'CAMPO='+QuotedStr('9º');
  SuaTabela.Filtered := true;

  SuaTabela.First;
  while not SuaTabela.Eof do
  begin
    SuaTabela.Edit;
    SuaTabelaCAMPO.AsString = '8º';
    SuaTabela.Post;
    SuaTabela.Next;
  end;
 
  SuaTabela.Filtered := false;
  SuaTabela.Filter   := '';
  SuaTabela.Filtered := true;

[silas_aguiar 0]

Olá Jeferson,

 

Obrigado pela resposta, segui suas orientações. Coloquei o código font em um edit.

Deu o seguinte erro:

 

debugger exception notification
Project Project12.exe raised exception class EOleException with message 'BOF ou EOF' são verdadeiros, ou
o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual'. Process stopped.

 

 

Fico no aguardo....Obrigado!

[Eisenheim 67]

Olá amigo.

 

Qual das duas formas que te passei você fez?

 

Se puder, poste o código para que eu possa analisar e ver o que está ocorrendo.

 

Até a próxima. :thumbsup: