Pessoal me ajudem não deu certo!!!!!
16/03/2003
0
dtm1.Q2.Active:=false;
dtm1.q2.sql.clear;
dtm1.Q2.sql.Add(´insert into Mensalidade (Cod_Mor,No_Mor) values (:ECodigo, :ENome)´);
dtm1.Q2.parambyname(´Cod_Mor´).Asstring:=ECodigo.text;
dtm1.Q2.parambyname(´No_Mor´).Asstring:=EMorador.text;
dtm1.Q2.execsql;
Valeu pela dica mas a pesquisa não está achando o campo Cod_Mor na tabela... Se puder me ajudar!!!!
Valeu...
dtm1.q2.sql.clear;
dtm1.Q2.sql.Add(´insert into Mensalidade (Cod_Mor,No_Mor) values (:ECodigo, :ENome)´);
dtm1.Q2.parambyname(´Cod_Mor´).Asstring:=ECodigo.text;
dtm1.Q2.parambyname(´No_Mor´).Asstring:=EMorador.text;
dtm1.Q2.execsql;
Valeu pela dica mas a pesquisa não está achando o campo Cod_Mor na tabela... Se puder me ajudar!!!!
Valeu...
Marciojse
Curtir tópico
+ 0
Responder
Posts
16/03/2003
Adilsond
O problema esta no nome de seus parametros.
dtm1.Q2.ParamByName(ECodigo´).AsString := Edit1.text;
dtm1.Q2.ParamByName(´EMorador´).AsString := Edit2.text;
dtm1.Q2.ParamByName(ECodigo´).AsString := Edit1.text;
dtm1.Q2.ParamByName(´EMorador´).AsString := Edit2.text;
Responder
16/03/2003
Adilsond
O problema esta no nome de seus parametros.
dtm1.Q2.ParamByName(ECodigo´).AsString := Edit1.text;
dtm1.Q2.ParamByName(´EMorador´).AsString := Edit2.text;
Desculpe, faltou a aspa.
dtm1.Q2.ParamByName(´ECodigo´).AsString := Edit1.text;
Responder
16/03/2003
Adilsond
Explicando melhor, os parametros são aqueles precedidos de dois pontos(:).
dtm1.Q2.ParamByName(´ECodigo´).AsString := ECodigo.Text;
dtm1.Q2.ParamByName(´EMorador´).AsString := EMorador.Text;
dtm1.Q2.ParamByName(´ECodigo´).AsString := ECodigo.Text;
dtm1.Q2.ParamByName(´EMorador´).AsString := EMorador.Text;
Responder
Clique aqui para fazer login e interagir na Comunidade :)
