Data: 30/09/2009 09:11:34
De: luiz
IP: 187.6.7.155
Assunto: Re: Mask edit
De: luiz
IP: 187.6.7.155
Assunto: Re: Mask edit
|
estou usando o delphi7 uso um componente da aba "BDE" chamado query dentro deste componete digito os cmando do banco de dados para fazer a insersão no BD na opção SQL
'insert into funcionarios (empresa,nomefuncionario,telefone,celular,dataadmissao) values (:campo2,:campo3,:campo4,:campo5,:campo6)' no botão de incluir uso o seguinte codigo. ' query1.Params.ParamByName('campo2').Value :=strtoint(lbcodempresafunc.Text); query1.Params.ParamByName('campo3').Value :=lbnomefuncionario.Text; query1.Params.ParamByName('campo4').Value :=lbtelfixofuncionario.Text; query1.Params.ParamByName('campo5').Value :=lbcelularfuncionario.Text; query1.Params.ParamByName('campo6').Value :=dataadmissao.Text; query1.ExecSQL; query1.Close; ' Espero que te ajude! |



