Problemas Com Msjet40.dll [resolvido]

[lsardinha]

Quando vou rodar a rotinha

Query.Close;
Query.SQL.Clear;
Query.SQL.Add('Select Max(Processo) as Maximo');
Query.SQL.Add('From processo');
Query.SQL.Add('Where Ano=2005');
Query.Open;

Na segunda linha aparece a mensagem:

"access violation at address 1B041FC6 in module" msjet40.dll

não sei por que, pois no access o sql roda normalmente, na propriedade sql da Query ele aceita, só quando vou rodar ela dessa forma que dá o erro... alguém por favor me ajude!!!

Obrigado.

[lsardinha]

Consegui resolver o problema, veja como tem que ficar a instrução

Query.Close;

Query.SQL.BeginUpdate;

Query.SQL.Clear;

Query.SQL.Add('Select Max(Processo) as Maximo');

Query.SQL.Add('From processo');

Query.SQL.Add('Where Ano=2005');

Query.SQL.EndUpdate;

Query.Open;