porque vc não passa o parametro direto pela query sua?
ao inves de vc colocar q sql na query e depois passar o parametro para a query
já com o parametro
ao inves de
select * from table where codigo = :par_codigo faça assim
'select * from table where codigo = ' + quotestr(edit1.text);
ai a select ja vai com o valor ai só da um open.
----- Original Message -----
From: silvano_monteiro
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 10, 2006 11:19 AM
Subject: [delphi-br] Re: Bug do Delphi 7.0???????????Ninguem sabe???
Amigos...
Tentei isso e nao funcionou tbm...
Atualizei o D7 e nao funcionou tbm...
qual a ultima atualizacao do D7 , alguem sabe?
--- Em delphi-br@yahoogrupos.com.br, "Eduardo Silva dos Santos"
<[EMAIL PROTECTED]> escreveu
>
> Isso mesmo Felipe, pode ser isso mesmo.
>
> e silvano, da uma procurada nas atualizações pro delphi 7. tb ajuda.
>
>
>
> Em 09/08/06, Filipe Belchior<[EMAIL PROTECTED]> escreveu:
> > silvano, eu acho q sei o q é.. então, tente o seguinte..
> >
> >
> > CDSPesquisa.Close;
> >
> > CDSPesquisa.Params.Clear;
> >
> > CDSPesquisa.CommandText := 'SELECT * FROM TABELA002 WHERE CAMPO1
> > = :PARAMETRO1 AND CAMPO2 = :PARAMETRO2';
> > CDSPesquisa.ParamByName('PARAMETRO1').AsString := Edit1.Text;
> > CDSPesquisa.ParamByName('PARAMETRO2').AsString := Edit2.Text;
> > CDSPesquisa.Open;
> >
> >
> >
> > --- Em delphi-br@yahoogrupos.com.br, "silvano_monteiro"
<[EMAIL PROTECTED]>
> > escreveu
> > >
> > > Ninguem sabe ???
> > >
> > > --- Em delphi-br@yahoogrupos.com.br, "silvano_monteiro"
> > > <[EMAIL PROTECTED]> escreveu
> > > >
> > > > Bom dia , estou com um grande problema e nao consegui
resolver ainda
> > > > Problema com passagem de parametros , estou usando
> > > > D7/DbXpress/ClientDataSet/DataSetProvider/SqlQuery
> > > >
> > > > Minha aplicacao esta em 3 camadas
> > > > Entao tenho um servidor de aplicacao (Servidor.exe) no qual
fica a
> > > > SQLQuery/DataSetProvider num DataModule
> > > >
> > > > No meu Programa Cliente (onde fica o ClientDataSet q esta
ligado ao
> > > > DSProvider do Servidor) preciso utilizar o mesmo CDS varias
vezes
> > > pra
> > > > fazer consulta no BD (em SyBase)
> > > >
> > > > O problema esta acontecendo Aleatoriamente , da a seguinte
mensagem
> > > > de Erro : "No value for parameter 'Parametro1'" ou "No value
for
> > > > parameter 'ParametroXXX'" , depende do parametro corrente
> > > >
> > > >
> > > > Estou fazendo o seguinte:
> > > >
> > > > CDSPesquisa.Close;
> > > > CDSPesquisa.CommandText := 'SELECT * FROM TABELA001 WHERE
CAMPO1
> > > > >= :PARAMETRO1';
> > > > CDSPesquisa.ParamByName('PARAMETRO1').AsString := Edit1.Text;
> > > > CDSPesquisa.Open; <-- ***Primeira vez nao da erro
> > > >
> > > > CDSPesquisa.Close;
> > > > CDSPesquisa.CommandText := 'SELECT * FROM TABELA002 WHERE
CAMPO1
> > > > >= :PARAMETRO1 AND CAMPO2 = :PARAMETRO2';
> > > > CDSPesquisa.ParamByName('PARAMETRO1').AsString := Edit1.Text;
> > > > CDSPesquisa.ParamByName('PARAMETRO2').AsString := Edit2.Text;
> > > > CDSPesquisa.Open; <-- ***As vezes aparece o ERRO AQUI
> > > >
> > > > "NO VALUE FOR PARAMETER 'XXX'"
> > > >
> > > > Ja utilizei o FetchParams
> > > > Ja dei create
> > > > CDSPesquisa.Params.CreateParam(ftString,'PARAMETRO1',ptInput);
> > > >
> > > >
> > > > Comentaram q isso poderia ser BUG do Delphi7... eu trabalhava
com o
> > > > D6 dessa forma e funcionava
> > > > Alguem sabe qual a forma correta de passar parametros sem da
esse
> > > > erro?
> > > > Sabem se é realmente Bug do D7?
> > > >
> > > > Agradeço desde já
> > > > Silvano Monteiro - Cuiabá-MT
> > > >
> > >
> >
> >
> >
> >
> >
> >
> > --
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> >
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
> >
> >
>
>
> --
> Eduardo Silva dos Santos
> DRD Sistemas.
> (27) 3218-4201
> MSN: [EMAIL PROTECTED]
> Site: http://www.drdsistemas.com/
>
------------------------------------------------------------------------------
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date: 9/8/2006
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
