[Resolvido] Não permite modificar dados do Registro
Srs., boa tarde.
Estou fazendo uma varredura numa tabela de saldos e mediante alguns dados, preciso alterar o saldo do registro que estiver sendo lido, porém, ao colocar em Edit, me aparece a mensagem de " ... 'qrverif1: cannot modify read-only dataset' ...
Segue abaixo trecho do código.
xMes:=strtoint(copy(datetostr(dtLancto.Date),4,2));
xAno:=strtoint(copy(datetostr(dtLancto.Date),7,4));
with dataModule1.qrVerif1 do
begin
close;
sql.Clear; // Pegarei todos os Lancamentos do mes e ano para a conta
sql.Text:='select * from SCCAXXXX where MMMCORR=:iCta and extract(year from MMMDATA)=:iAno and extract(month from MMMDATA)=:iMes order by MMMDATA';
params.ParamByName('iCta').AsString:=dbcCtaCorr.KeyValue;
params.ParamByName('iMes').AsInteger:=xMes;
params.ParamByName('iAno').AsInteger:=xAno;
open;
end;
dataModule1.qrVerif1.First;
dataModule1.qrVerif1.Edit;
...
Exatamente na última linha, onde faço o edit do registro, ocorre este erro.
Alguém pode ajudar..
Abcs
Discussão (10)
Carregando comentários...