Query
Bem pessoal,
Gostaria de saber como faço para gravar em uma QUERY..TBCLIENTE
nome
endereço
datanascimento
.....
tudo com EDIT,s
por favor
[]´s
Gostaria de saber como faço para gravar em uma QUERY..TBCLIENTE
nome
endereço
datanascimento
.....
tudo com EDIT,s
por favor
[]´s
Junior#
Curtidas 0
Respostas
Henry Lima
29/04/2003
Basta somente digitar o código abaixo:
query1.sql.clear;
query1.sql.add(´insert into tbclientes (nome, endereco, dtnascimento)´);
query1.sql.add(´values (´+quotedstr(editnome.text)+´,´+
quotedstr(editendereco.text)+´,´+
quotedstr(editdtnascimento.text)+´)´);
query1.execsql;
Espero que tenha ajudado.
em breve
www.nucleoone.com
query1.sql.clear;
query1.sql.add(´insert into tbclientes (nome, endereco, dtnascimento)´);
query1.sql.add(´values (´+quotedstr(editnome.text)+´,´+
quotedstr(editendereco.text)+´,´+
quotedstr(editdtnascimento.text)+´)´);
query1.execsql;
Espero que tenha ajudado.
em breve
www.nucleoone.com
GOSTEI 0
Junior#
29/04/2003
Henry, ajudou muito cara muito obrigado..!!
mas desculpe minha ignorancia pra que serve esse codigo abaixo...
query1.execsql;
[]´ junior
mas desculpe minha ignorancia pra que serve esse codigo abaixo...
query1.execsql;
[]´ junior
GOSTEI 0
Henry Lima
29/04/2003
Vai executar o código em sql
GOSTEI 0
Hacson Menezes
29/04/2003
Só para complementar, caso não dê certo.
query1.sql.clear;
query1.sql.add(´insert into tbclientes (nome, endereco, dtnascimento)´);
query1.sql.add(´values (´+quotedstr(editnome.text)+´,´+
quotedstr(editendereco.text)+´,:dtnasc)´);
query1.ParamByName(´dtnasc´).AsDatetime := strtodate(editdatanascimento.text)
query1.execsql;
query1.sql.clear;
query1.sql.add(´insert into tbclientes (nome, endereco, dtnascimento)´);
query1.sql.add(´values (´+quotedstr(editnome.text)+´,´+
quotedstr(editendereco.text)+´,:dtnasc)´);
query1.ParamByName(´dtnasc´).AsDatetime := strtodate(editdatanascimento.text)
query1.execsql;
GOSTEI 0