F�rum Insert SQL em tempo de execu��o Delphi 2007 #379889

21/06/2010

Bom Tarde Gostaria de Saber como posso montar um Insert no Delphi com SQLQuery em tempo de execu��o Tipo Assim que estou fazendo mais por algum motivo n�o esta Grava a Informa��o no banco voc� poderia me ajudar vlSQuery.SQL.Text:='INSERT INTO RERSM(COD_CONTROLE_MENSALISTA,ID_CARTAO,DATA,HRS,AREA) '+ 'Values(:'+IntToStr(FMensalista.Cod_Mensalista)+',:'+IDCartao+ ',:'+DateToStr(Date)+',:'+'TimeToStr(Time)'+',:'+FMensalista.Area+')';

Alexandro Oliveira

Curtir t�pico

+ 0

Responder

Posts

21/06/2010

Wesley Yamazack

Ol� amigo.

Veja como proceder quando for usar campos string, tem que ficar entre ''. Partindo do principio que seu SQLQuery esta configurado para o SQLConnection adequado.

SQLQuery1.SQL.Clear;
SQLQuery1.Close;
SQLQuery1.SQL.Add('INSERT INTO CLIENTE(IDCLIENTE, NOME) ');
SQLQuery1.SQL.Add('VALUES (' + IDCliente + ',' + QuotedStr(Nome) + ')' );
SQLQuery1.ExecSQL;

Fa�a este teste, se der erro me informe o erro.

Me informe tamb�m seu Banco de Dados, e vers�o do Delphi.

Um abra�o

Wesley Y

Responder

Gostei + 0

21/06/2010

Alexandro Oliveira

Bom meu amigo voc� me ajudou muito so faltava a sintase = QuotedStr na minha instru��o, mais surgiu uma duvida, qual a finalidade da sintase (:)na Frenta do Valor a ser gravado, seria um par�metro ? At.Alex Oliveira

Responder

Gostei + 0

21/06/2010

Wesley Yamazack

Ol� amigo,

Seria isso mesmo : � um parametro. Exemplo

SELECT * FROM CLIENTE
WHERE IDCLIENTE = :IDCLIENTE

DAI VOC� TEM QUE INFORMAR PARA O SCRIPT O PARAMETRO ATRAVES DO

SQLQuery1.Close;
SQLQuery1.Params.ParamByName('IDCliente').AsInteger := StrToINt(EdtID.text);
SQLQuery1.Open;

Acho que assim esclarece tua d�vida certo ?

Att,

Wesley Y

Responder

Gostei + 0

23/06/2010

Alexandro Oliveira

Muito Obrigado pela dica. At.Alex Oliveira

Responder

Gostei + 0

23/06/2010

Wesley Yamazack

Blz amigo.

Um abra�o

Wesley Y

Responder

Gostei + 0