Erro ao salvar no banco

8 views
Skip to first unread message

carlos.394

unread,
Jan 26, 2010, 2:54:28 PM1/26/10
to TboDbxFb Firebird DBX4 Driver
procedure TFrmFichaPai.BtnGravarClick(Sender: TObject);
var erro: integer;
begin
if Verifica_Campos_Em_Branco then
begin
DtSrc.DataSet.Post;
erro:= (DtSrc.DataSet as TClientDataset).ApplyUpdates(0);
if erro > 0 then DtSrc.DataSet.Edit;
end
else abort;
end;

Este codigo esta no botão de salvar do meu formulario de cadastro de
cidades. Estou usando delphi 7 + firebird 2.1+dbexpress, o erro é o
seguinte que diz que a tabela não existe e para na seguinte linha: if
erro > 0 then DtSrc.DataSet.Edit;

PS: Esta criado o banco e as tabelas.

Podem me ajudar?

Felipe Dal Pizzol

unread,
Jan 27, 2010, 5:50:20 AM1/27/10
to tbod...@googlegroups.com
Buenas guri!

as informações do connection não estão sendo alteradas em runtime
para acessar um local incorreto?!

Abraço!

2010/1/26 carlos.394 <carlo...@gmail.com>



--
Felipe Dornelles Dal'Pizzol

Carlos Alberto

unread,
Jan 27, 2010, 9:05:20 AM1/27/10
to tbod...@googlegroups.com


Não estão sendo mudadas em runtime.


--
Carlos Alberto Santos Junior
Bacharel Sistema de Informação -
UNIFRA - Santa Maria - RS
Reply all
Reply to author
Forward
0 new messages