SQl.add

[aquilisfelipe 0]

bom dia. sou iniciante no delphi,

nao desmerecendo a ferramenta mais se trata de um programa

muito bom porem teoricamente simples,mas a situação se

aperta quando inserimos o mysql em seu corpo.

tenho uma duvida boba,porem nao consegui resposta definitiva com ninguem.

uso bd mysql e tenho que inserir alguns dados via sql e a string

em questão ultrapassa 255 caracteres, me foi sugerido usar um add

,mas nao obtive resposta a como e quando usar. alguem pode me esclarecer essa duvida?

 

 

 

 

aqui vai a parte da duvida em si....

 

procedure TfrmYouClube.BitBtn1Click(Sender: TObject);

var

cpf:String;

begin

 

QrComprar.Close;

QrComprar.Open;

QrBuscaCli.close;

QrBuscaCli.ParamByName('cpf').AsString := QrComprarcpf.AsString;

QrBuscaCli.Open;

 

if QrBuscaCli.RecordCount = 1 then

begin

QrGravar.Sql.Text := 'update tab_clientes set nome = '''+

QrComprarnome_entrega.AsString+

''' where cpf = '''+QrComprarcpf.AsString + '''';

QrGravar.ExecSql;

//QrGravar.ApplyUpdates;

end else

begin

QrGravar.Sql.add := 'insert into tab_clientes (cpf,nome,nped,codprod,valor,quant,presente,peso,cor,personalizado,voltagem,tamanho,cont,codcli,data,forma,valorpgto1,datapgto1,tid,entrega,valorentrega,estatus,endereço,numero,complemento,bairro,cidade,estado,cep1,cep2,nome_entrega,dataentrega,site,descricao,FAB)''+

' values ('''+QrComprarcpf.text+''','''+QrComprarnped.text+''','''+QrComprarcodprod.text+''','''+QrComprarvalor.text+''','''+QrComprarquant.text+''','''+QrComprarpresente.text+''','''+QrComprarpeso.text+''','''+QrComprarcor.text+''','''+QrComprarpersonalizado.text+''','''+QrComprarvoltagem.text+''','''+QrComprartamanho.text+''','''+QrComprarcont.text+''','''+QrComprarcodcli.text+''','''+QrComprardata.text+''','''+QrComprarforma.text+''','''+QrComprarvalorpgto1.text+''','''+QrComprardatapgto1.text+''','''+QrComprartid.text+''','''+QrComprarentrega.text+''','''+QrComprarvalorentrega.text+''','''+QrComprarestatus.text+''','''+QrComprarendereço.text+''','''+QrComprarnumero.text+''','''+QrComprarcomplemento.text+''','''+QrComprarbairro.text+''','''+QrComprarcidade.text+''','''+QrComprarestado.text+''','''+QrComprarcep1.text+''','''+QrComprarcep2.text+''','''+QrComprarnome_entrega.text+''','''+QrComprardataentrega.text+''','''+QrComprarsite.text+''','''+QrComprardescricao.text+''','''+QrComprarFAB.text+''');

QrComprarcpf.AsString + ''','''+QrComprarnome_entrega.AsString+''')';

QrGravar.ExecSql;

//QrGravar.ApplyUpdates;

 

end;

 

end;

end.

[Joe_m 0]

Bom Dia !!!

 

A form,a correta de se usar o add é a seguinte:

 

Query.Sql.Add('Intruções');

Query.Sql.Add('Intruções');

Query.Sql.Add('Intruções');

Query.Sql.Add('Intruções');

 

Da forma acima não vai estourar 255 caracteres