Pessoal me ajudem não deu certo!!!!!

Delphi

16/03/2003

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...


Marciojse

Marciojse

Curtidas 0

Respostas

Adilsond

Adilsond

16/03/2003

O problema esta no nome de seus parametros.

dtm1.Q2.ParamByName(ECodigo´).AsString := Edit1.text;
dtm1.Q2.ParamByName(´EMorador´).AsString := Edit2.text;


GOSTEI 0
Adilsond

Adilsond

16/03/2003

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;


GOSTEI 0
Adilsond

Adilsond

16/03/2003

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;


GOSTEI 0
POSTAR