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 < [email protected]> 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 > [email protected] > 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
-- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
