Array
(
)

Erro ao editar um registro quot;At end of tablequot;.

Leorez
   - 01 jul 2004

O problema é o seguinte, quando gravo o registro e tento editalo novamente da um erro

Utilizo o codigo abaixo para gravar o registro.

#Código

try
if not dmLabo.Labo.InTransaction then
dmLabo.Labo.StartTransaction;

with dmLabo.qrPedidos do
begin
Post;
ApplyUpdates;
end;

dmLabo.Labo.Commit;
TotalGeral;
except
dmLabo.Labo.Rollback;
Application.MessageBox(´Não foi possível gravar as informações.´, ´Contabilidade´ , mb_OK + MB_ICONERROR);
end;

Utilizo o codigo abaixo para editar o registro.

try
dm.qrPedidos.Edit
except
dmLabo.Labo.Rollback;
Application.MessageBox(´Não foi possível editar o registro.´, ´Contabilidade´ , mb_OK + MB_ICONERROR);
end;


em seguida aparece um menssagem de erro

At end of table.

Utliliso ODBC e os compomente da paleta BDE do delphi7


:arrow: Título alterado pelo Moderador oTTo.
:idea: Seja mais claro no título.
:idea: LEia as regras de conduta do fórum.