Fórum UpdateSQL #196542

Olá Pessoal,

Estou tentando usar o UpdateSQL para deletar registros, e não estou obtendo sucesso até agora.
Já pesquisei no fórum sobre isso, e acredito estar fazendo tudo certo, relamente não sei o que está errado.
Segue abaixo as características do meu programa:

Paradox 7
Delphi 7
BDE

[b:0b993b8049]Query:[/b:0b993b8049]

Select * from tabela where prev = :previsao

[b:0b993b8049]Tabela:[/b:0b993b8049]

Key.............integer(primarykey)
nome..........string
...
Prev............integer


[b:0b993b8049]Código ao pressionar o botão para apagar:[/b:0b993b8049]

procedure TForm10.Button4Click(Sender: TObject);
begin
query.ParamByName(´previsao´).Value := cod;
query.Open;
Query.First;
while not query.eof do
begin
Query.delete;
Query.Next;
end; //for
query.apllyupdates;
end;


[b:0b993b8049]Código do DELETESQL do UpdateSQL:[/b:0b993b8049]

delete from tabela
where
key = :OLD_Key

A query está com CachedUpdates=True, e RequestLive=False, e com a propriedade UpdateSQL com o respectivo UpdateSQL.

Esta dando o erro:
´Invalid use of keyword.
Token: Key
Line number: 3´


Muito obrigado.