(frmRelatClientesInativos.Components[i]) as TCheckBoxex)
ou
TCheckBox(frmRelatClientesInativos.Components[i])
Na pratica é a mesma coisa.
Eduardo Castro Alves
Analista de Sistemas
-----Original Message-----
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of [> Mutuka <]
Sent: quarta-feira, 19 de abril de 2006 16:32
To: delphi-br@yahoogrupos.com.br
Subject: RE: [delphi-br] Erro de "List index out of bounds"
faz assim:
for i := 0 to frmRelatClientesInativos.ComponentCount - 1 do
begin
if (frmRelatClientesInativos.Components[i] is TCheckBox) then
begin
if (frmRelatClientesInativos.Components[i]) as TCheckBoxex).Checked then //aqui estava o erro rsrs...
begin
Print(05, 'Filtro(s):');
Break;
end;
end;
end;
Eduardo Alves <[EMAIL PROTECTED]> escreveu:
for i := 0 to frmRelatClientesInativos.ComponentCount - 1 do
begin
if (frmRelatClientesInativos.Components[i] is TCheckBox) then
begin
if (TCheckBox(frmRelatClientesInativos.Components[i]).Checked) then //aqui esta o erro ...
begin
Print(05, 'Filtro(s):');
Break;
end;
end;
end;
Eduardo Castro Alves
Analista de Sistemas
-----Original Message-----
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Filipe Colaneri
Sent: quarta-feira, 19 de abril de 2006 13:17
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Erro de "List index out of bounds"
Esse erro acontece qdo. se tenta acessar um índice de alguma coisa que não existe. Por exemplo, você acessar a posição 11 de um vetor com 10 posições...
No Delphi tem uns esquemas de que se por exemplo vc tiver controles dentro de painéis, ele não reconhece como controles do Form, mas sim do painel e tal, dê uma olhada nisso.
Espero ter ajudado.
[]'s
Welson Avelar <[EMAIL PROTECTED]> escreveu:
Opa, na boa ?!
Bom, eu estou executando o seguinte loop:
for i := 0 to frmRelatClientesInativos.ComponentCount - 1 do
begin
if (frmRelatClientesInativos.Components[i] is TCheckBox) then
begin
if (TCheckBox(Components[i]).Checked) then
begin
Print(05, 'Filtro(s):');
Break;
end;
end;
end;
Ele é usado pra imprimir quais filtros foram selecionados num relatório. Tudo bem. Acontece que quando ele faz a verificação "if (TCheckBox(Components[i]).Checked) then", levanta a exceção "Project MPlan.exe raised exception class EListError with message 'List index out of bounds (1)'. Process stopped. Use Step or Run to continue.". E independe de essa condição ser falsa ou verdadeira. Sempre que sai da condição anterior, levanta essa exceção.
Eu acredito que esse loop esteja certo, mas estou em dúvida quanto as condições.
Uma outra coisa: quando estou debugando, e marco ambas as condições, quando posiciono o mouse sobre a primeira condição, me aparece um hint escrito "illegal _expression_ in condition", ou seja, nada de True ou False. Já na segunda condição me mostra mesmo se está True ou False.
[]'s.
=================================
"Nunca ande pelo caminho traçado, pois ele conduz somente até onde os outros já foram."
Alexander Graham Bell
=================================
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
<www.geminisistemas.com.br>
Juiz de Fora - Minas Gerais
=================================
---------------------------------
Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por: PUBLICIDAD
var lrec_target="_blank";var lrec_URL=new Array(); lrec_URL[1]="http://br.ard.yahoo.com/SIG=12fd7854j/M=399886.8024024.9168515.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1145467290/A=3503032/R=0/SIG=1542m34g9/*http://lt.dell.com/lt/lt.aspx?CID=11982&LID=329182&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs"; var lrec_flashfile="http://br.i1.yimg.com/br.yimg.com/i/br/ads7/130406_y300x250_abr11_dhs_dimension5150.swf?clickTAG=_javascript_:LRECopenWindow(1)"; var lrec_altURL="http://br.ard.yahoo.com/SIG=12fd7854j/M=399886.8024024.9168515.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1145467290/A=3503032/R=1/SIG=1542m34g9/*http://lt.dell.com/lt/lt.aspx?CID=11982&LID=329182&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs"; var lrec_altimg="http://br.i1.yimg.com/br.yimg.com/i/br/ads7/130406_y300x250_abr11_dhs_dimension5150.gif"; var
lrec_width=300;var lrec_height=250;
---------------------------------
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 Termos do Serviço do Yahoo!.
---------------------------------
Yahoo! Acesso Grátis
Internet rápida e grátis. Instale o discador agora!
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por: PUBLICIDAD
var lrec_target="_blank";var lrec_URL=new Array(); lrec_URL[1]="http://br.ard.yahoo.com/SIG=12fdi82i4/M=399886.8024024.9168515.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1145473984/A=3503032/R=0/SIG=1542m34g9/*http://lt.dell.com/lt/lt.aspx?CID=11982&LID=329182&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs"; var lrec_flashfile="http://br.i1.yimg.com/br.yimg.com/i/br/ads7/130406_y300x250_abr11_dhs_dimension5150.swf?clickTAG=_javascript_:LRECopenWindow(1)"; var lrec_altURL="http://br.ard.yahoo.com/SIG=12fdi82i4/M=399886.8024024.9168515.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1145473984/A=3503032/R=1/SIG=1542m34g9/*http://lt.dell.com/lt/lt.aspx?CID=11982&LID=329182&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs"; var lrec_altimg="http://br.i1.yimg.com/br.yimg.com/i/br/ads7/130406_y300x250_abr11_dhs_dimension5150.gif"; var lrec_width=300;var
lrec_height=250;
---------------------------------
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 Termos do Serviço do Yahoo!.
Leandro...
[> Mutuka <]
---------------------------------
Yahoo! Messenger com voz - Instale agora e faça ligações de graça.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< 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]
Yahoo! Grupos, um serviço oferecido por: | |
|
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 Termos do Serviço do Yahoo!.