Fórum Inserção de dados #362309
08/08/2008
0
Boa noite
Tenho uma tabela no sql server com os seguintes campos
id_cliente: intidentity(1,1)
nome
nasc
rg
sexo
e seguinte código:
Após compilar e rodar o programa, e entrar com os dados o delphi me retorna o seguinte erro:[list]Project.exe raised class EaccessViolation whit message ´access violation blavlablabla.......
[/list]
Qual é o meu erro?
Tenho uma tabela no sql server com os seguintes campos
id_cliente: intidentity(1,1)
nome
nasc
rg
sexo
e seguinte código:
datamodule.DM.Queryclientes.SQL.Clear; datamodule.DM.Queryclientes.SQL.Add(´INSERT INTO clientes´); datamodule.DM.Queryclientes.SQL.Add(´(nome,foto,rg,nasc)´) ; datamodule.DM.Queryclientes.SQL.Add(´values(´+quotedstr(labelnome.Text) + ´,´ + datetostr(datanasc.Date) +´,´+ Quotedstr(editrg.Text) + ´,´ +Quotedstr(CBsexo.Text)+´)´); datamodule.DM.Queryclientes.ExecSQL;
Após compilar e rodar o programa, e entrar com os dados o delphi me retorna o seguinte erro:[list]Project.exe raised class EaccessViolation whit message ´access violation blavlablabla.......
[/list]
Qual é o meu erro?
Lomaster
Curtir tópico
+ 0
Responder
Posts
09/08/2008
Ricknetbr
Voce esta fazendo isso antes do datamodule estar instanciado?
Tente:
if Assigned(QueryClientes) then
begin
datamodule.DM.Queryclientes.SQL.Clear;
datamodule.DM.Queryclientes.SQL.Add(´INSERT INTO clientes´);
datamodule.DM.Queryclientes.SQL.Add(´(nome,foto,rg,nasc)´) ;
datamodule.DM.Queryclientes.SQL.Add(´values(´+quotedstr(labelnome.Text) + ´,´ + datetostr(datanasc.Date) +´,´+ Quotedstr(editrg.Text) + ´,´ +Quotedstr(CBsexo.Text)+´)´);
datamodule.DM.Queryclientes.ExecSQL;
end
Tente:
if Assigned(QueryClientes) then
begin
datamodule.DM.Queryclientes.SQL.Clear;
datamodule.DM.Queryclientes.SQL.Add(´INSERT INTO clientes´);
datamodule.DM.Queryclientes.SQL.Add(´(nome,foto,rg,nasc)´) ;
datamodule.DM.Queryclientes.SQL.Add(´values(´+quotedstr(labelnome.Text) + ´,´ + datetostr(datanasc.Date) +´,´+ Quotedstr(editrg.Text) + ´,´ +Quotedstr(CBsexo.Text)+´)´);
datamodule.DM.Queryclientes.ExecSQL;
end
Responder
Gostei + 0
09/08/2008
Tronics
Cara usa paramByname ou params pra ficar mais organizado.. vc esta passando uma data como parametro pro campo foto ?! vê ai certinho...
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)