OK, deu pra entender.. Mas agora ficou melhor ainda... Fui na outra empresa que trabalho levei os fontes no pendrive e compilei...... e BINGO... o problema sumiu.. kkkkkkkkk vai entender......... Com o D6 da o problema que não existia, agora com o D7 ta normal.......
[]s Luiz Escobar ----- Original Message ----- From: Joao Morais To: delphi-br@yahoogrupos.com.br Sent: Saturday, November 08, 2008 2:04 PM Subject: Re: [delphi-br] HELP!!! LISTBOX (index out off bounds (-1)), meio sem noção... 2008/11/8 Luiz Escobar <[EMAIL PROTECTED]>: > Certo até ai eu sei, mas porque cargas dágua, funcionava antes e parou agora > (não tem item vazio, quando chega nesta linha...) e com o debug incluido na > aplicação ele funciona normalmente, basta eu incluir o debug e pronto ta > tudo certo... sem ele da o erro e antes de mudar o icone da aplicação > funcionava... é de deixar qualquer um louco.... Podem haver vários fatores, ainda mais em se tratando de componente visual, que pode responder a algum evento de uma forma enquanto está em execução, e de outra quando você acompanha pelo debug. Eu por exemplo tenho algumas bibliotecas impossíveis de debugar porque o passo-a-passo entra em loop por causa de eventos como o invalidate. A propósito minha dica ficou errada. Ao invés de Count >= 0, é ItemIndex >= 0, que significa você ler um item apenas quando *houver* um item selecionado. -- Joao Morais > > > ----- Original Message ----- > From: Joao Morais > Sent: Friday, November 07, 2008 6:28 PM > > 2008/11/7 Luiz ESCobar <[EMAIL PROTECTED]>: >> L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); <<<--- aqui da o >> erro... >> // POREM repito, com o debug incluido não da o erro... >> // e só deu o problema depois que troquei o icone da aplicação, vai >> entender..... > > Você não pode ler o "item atual" de uma lista vazia. Portanto: > > if LB_CC.Count >= 0 then > L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); > > -- > Joao Morais > > > ------------------------------------ > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > > > [As partes desta mensagem que não continham texto foram removidas]
