Pode ser que o Yahoo acabou desconfigurando a mensagem, por isso apareceram os
espaços em branco.
[]'s
Ricardo.
"Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!"
--- Em seg, 18/5/09, Vinicius da Silva Pinto <vinic...@cnen.gov.br> escreveu:
De: Vinicius da Silva Pinto <vinic...@cnen.gov.br>
Assunto: RES: [delphi-br] Ajuda....
Para: delphi-br@yahoogrupos.com.br
Data: Segunda-feira, 18 de Maio de 2009, 15:23
????????????
Não entendi, pq os espaços em branco?????
-----Mensagem original---- -
De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br]Em
nome de Claudiney Cogo
Enviada em: segunda-feira, 18 de maio de 2009 15:15
Para: delphi...@yahoogrup os.com.br
Assunto: RES: [delphi-br] Ajuda....
Dê uma olhada nessas linhas:
FrmDm.SimpleDataSet 1.Params[ 0].AsInteger := 1;
FrmDm.SimpleDataSet 1.Params[ 1].AsDate := MCevento.Date;
Não seria correto assim?
FrmDm.SimpleDataSet 1.DataSet.Params[ 0].AsInteger := 1;
FrmDm.SimpleDataSet 1.DataSet.Params[ 1].AsDate := MCevento.Date;
Abraço
_____
Claudiney Cogo
N2 Sistemas e Soluções em Informática
Av. São Paulo, 172 - 15º Andar - Sala 1505
Fone/Fax: (44) 3029-6053 - Maringá - Paraná
<http://www.n2soluti ons.com.br/> www.n2solutions. com.br
<http://www.nfe. n2solutions. com.br/> www.nfe.n2solutions .com.br
<http://www.studion2 .com.br/> www.studion2. com.br
De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br] Em
nome de Vinicius da Silva Pinto
Enviada em: segunda-feira, 18 de maio de 2009 09:15
Para: delphi...@yahoogrup os.com.br
Assunto: [delphi-br] Ajuda....
Amigos, estou tendo um problema com um SimpleDataSet e não descubro o erro:
Em uma determinado momento do sistema eu faço uma consulta por data e tudo
corre muito bem, como neste exemplo abaixo:
FrmDm.SdsCadEventos 1.Close;
FrmDm.SdsCadEventos 1.DataSet. CommandText := 'SELECT CDEVENTO FROM
BDEVENTOS WHERE DATAEVENTO = :WDATA';
FrmDm.SdsCadEventos 1.DataSet. Params[0] .AsDate := MCevento.Date;
FrmDm.SdsCadEventos 1.Open;
Em outra hora preciso selecionar por empresa tambem, ai que estou tendo o
problema....
Estou recebendo esta mensagem de erro: "List Index out off Bounds (0)"
Como se os parametros não foram definidos
Juro que não estou enxergando o erro ou se tenho que fazer algo diferente..
FrmDm.SimpleDataSet 1.Close;
FrmDm.SimpleDataSet 1.DataSet. CommandText := 'select CDEVENTO from
BDEVENTOS WHERE CDEMPRESA = :WEMP and DATAEVENTO = :WDATA';
FrmDm.SimpleDataSet 1.Params[ 0].AsInteger := 1;
<<<<<------- ------ pelo log, o erro é nesta linha
FrmDm.SimpleDataSet 1.Params[ 1].AsDate := MCevento.Date;
FrmDm.SimpleDataSet 1.Open;
Agradeço qualquer dica ou ajuda...
Vinicius
__________ Informação do NOD32 IMON 4082 (20090518) __________
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset. com.br
[As partes desta mensagem que não continham texto foram removidas]
------------ --------- --------- ------
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
