seguinte..
pega a apostila em www.micrologos.com.br/mc_clienteservidor.zip e faz como esta
la q funciona
abração
--
[]´s
Bruno Lichot
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
