[Lazarus] Não encontra o parametro?

Fabio Luis Girardi fluisgirardi at gmail.com
Mon Mar 3 21:04:30 CET 2014


William, rescreva a sua dúvida em inglês, talvez a resposta para ela venha
mais depressa...


Em 3 de março de 2014 16:58, William Oliveira Ferreira <
bdexterholland at gmail.com> escreveu:

> Olá lista,
>
> eu tenho um código mamão com açúcar aqui que eu não consigo entender por
> que cargas d'água não encontra o parâmetro da SQL. Alguém quer chutar algo?
>
> var
>   sql_Query : TSQLQuery;
> begin
>   Result := False;
>   sql_Query := TSQLQuery.Create(nil);
>   sql_Query.DataBase := Self._Conexao;
>   sql_Query.Transaction := TSQLTransaction(Self._Conexao.Transaction);
>
>   sql_Query.SQL.Clear;
>   if TSQLTransaction(Self._Conexao.Transaction).Active then
>     TSQLTransaction(Self._Conexao.Transaction).EndTransaction;
>
>   sql_Query.SQL.Add('DELETE FROM loc_clientes');
>   sql_Query.SQL.Add('WHERE cli_codigo = :PCodigo');
>
>   sql_Query.ParamByName(':PCodigo').AsInteger := Codigo;
>
>   try
>     sql_Query.ExecSQL;
>   except
>     raise Exception.Create('Erro ao excluir o cliente! [ID: ' +
> IntToStr(Codigo) + ']');
>   end;
>
> ____
>
> A mensagem de erro:
>
> Parameter ":PCodigo" not found
>
>
> Vira e mexe esta mensagem me assombra...
>
>
> ...Digo isto porque em outros trechos não ocorre.
>
> --
> ________________________________
> William de Oliveira Ferreira
>
> --
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>
>


-- 
The best regards,

Fabio Luis Girardi
PascalSCADA Project
http://sourceforge.net/projects/pascalscada
http://www.pascalscada.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20140303/38a85673/attachment-0003.html>


More information about the Lazarus mailing list