Pessoal,

Descobrimos o problema, na verdade é só atualizar o D7 pois isso é um dos
100 bugs corrigidos no Update 1.

Marcelo. 

-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de José Henrique (Zote)
Enviada em: quarta-feira, 4 de janeiro de 2006 16:21
Para: delphi-br@yahoogrupos.com.br
Assunto: RE: [delphi-br] Re: Problema com ntdll.dll - Urgente

É uma propriedade do combo, acho que Style ou algo do tipo que não aceita.
Uma solução??!! No lugar de '' use ' ' aqui funcionou ou altere a
propriedade...

Abraço

--
José Henrique (Zote)

-----Original Message-----
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of marcelloassouza
Sent: quarta-feira, 4 de janeiro de 2006 16:04
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Re: Problema com ntdll.dll - Urgente

Pessoal, complementando o problema abaixo depois de dar mais umas fuçadas,
percebi que o que ocorre é o seguinte:

Me parece que no delphi 7 o componente combobox não aceita textos em branco
pois é justamente quando eu tento passar um valor de uma posição do combobox
que está em branco que ocorre o erro. Quando o combobox está com todos os
itens preenchidos não ocorre o erro.

Agora como validar se o item é vazio ou não??? Notar abaixo na minha função
que a variável que recebe o valor de cada item da combo é do tipo String.

Att,

Marcelo.



--- Em delphi-br@yahoogrupos.com.br, "marcelloassouza" 
<[EMAIL PROTECTED]> escreveu
>
> Pessoal,
> 
> Temos vários projetos aqui na empresa, mas somente um estou tendo
um 
> problema com a ntdll.dll.
> 
> Os projetos estavam em D5 e agora estamos migrando para D7. Em D7 
> funcionava muito bem.
> 
> 
> Será que alguém poderia me ajudar????
> 
> Desde já agradeço!!!
> 
> O erro que recebo é:
> 
> Access Violation at address 7C912FFC in module 'ntdll.dll'. Write
of 
> adress 004050E1
> 
> O estranho é que nem o try except resolve...
> 
> 
> 
> Segue a função onde está dando o erro:
> 
> procedure ValidaCombo( Sender: TObject ); var
>   lChar : string ;
>   lCont : Integer ;
>   
> begin
> 
>     If ( Sender as TComboBox ).Text = '' Then
>        Exit ;
> 
>     ( Sender as TComboBox ).Text := UpperCase( ( Sender as TComboBox 
> ).Text );
> 
>     For lCont := 0 To ( Sender as TComboBox ).Items.Count - 1 do
>     Begin
> 
>         //Linha onde ocorre o erro
>         lChar := ( Sender as TComboBox ).Items.Strings[lCont] ;
> 
>         If UpperCase( lChar ) = UpperCase( ( Sender as TComboBox 
> ).Text ) Then
>            Exit ;
> 
>     End ;
> 
>     Application.MessageBox('Valor do campo invalido, favor
selecionar 
> um valor da lista', 'Mensagem do Sistema', MB_OK);
>     ( Sender as TComboBox ).Text := '' ;
>     ( Sender as TComboBox ).SetFocus ;
>     ( Sender as TComboBox ).DroppedDown := True ;
> 
> end;
> 
> 
> Att,
> 
> Marcelo.
>






--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>


 
Links do Yahoo! Grupos




 



Received: (qmail 27778 invoked by uid 0); 4 Jan 2006 16:04:24 -0200
Received: from 216.155.203.226 by poseidon.bludata.com.br (envelope-from
<[EMAIL PROTECTED]
>, uid 0) with qmail-scanner-1.25 
 (clamdscan: 0.85/974. spamassassin: 3.0.2.  
 Clear:RC:0(216.155.203.226):SA:0(-2.4/5.0):. 
 Processed in 8.324709 secs); 04 Jan 2006 18:04:24 -0000
X-Qmail-Scanner-Mail-From:
[EMAIL PROTECTED]
via poseidon.bludata.com.br
X-Qmail-Scanner: 1.25 (Clear:RC:0(216.155.203.226):SA:0(-2.4/5.0):.
Processed in 8.324709 secs)
Received: from unknown (HELO n6a.bullet.dcn.yahoo.com) (216.155.203.226)
  by poseidon.bludata.com.br with SMTP; 4 Jan 2006 16:04:16 -0200
Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
DomainKey-Signature: a=a-sha1; q=s; c=fws; s=tel; d=hoogrupos.com.br;
        
b=DZnJ9JUoSuu8OdExQwbHSi9YBdm8NWu8ZsXzAWHakUqodSB2Bfjkr3Z8ObSrsCRNxNp2EsmYZm
7nxGne7R6ulfZg2QfcwB3wXDyiRLsQnL0xnQ8Mye/5ivhTNKnPtf;
Received: from [216.155.201.65] by n6.bullet.dcn.yahoo.com with NNFMP; 04
Jan 2006 18:04:15 -0000
Received: from [66.218.66.58] by mailer2.bullet.dcn.yahoo.com with NNFMP; 04
Jan 2006 18:04:15 -0000
Received: from [66.218.66.61] by mailer7.bullet.scd.yahoo.com with NNFMP; 04
Jan 2006 18:04:15 -0000
X-Yahoo-Newman-Property: groups-email
X-Sender: [EMAIL PROTECTED]
X-Apparently-To: delphi-br@yahoogrupos.com.br
Received: (qmail 7488 invoked from network); 4 Jan 2006 18:04:14 -0000
Received: from unknown (66.218.66.216)
  by m35.grp.scd.yahoo.com with QMQP; 4 Jan 2006 18:04:14 -0000
Received: from unknown (HELO n5a.bullet.scd.yahoo.com) (66.94.237.39)
  by mta1.grp.scd.yahoo.com with SMTP; 4 Jan 2006 18:04:14 -0000
Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
Received: from [66.218.69.3] by n5.bullet.scd.yahoo.com with NNFMP; 04 Jan
2006 18:04:06 -0000
Received: from [66.218.66.67] by mailer3.bullet.scd.yahoo.com with NNFMP; 04
Jan 2006 18:04:06 -0000
To: delphi-br@yahoogrupos.com.br
Message-ID: <[EMAIL PROTECTED]>
In-Reply-To: <[EMAIL PROTECTED]>
User-Agent: eGroups-EW/0.82
X-Mailer: Yahoo Groups Message Poster
X-Originating-IP: 66.94.237.39
X-eGroups-Msg-Info: 1:12:0:0
X-Yahoo-Post-IP: 200.204.175.106
From: "marcelloassouza" <[EMAIL PROTECTED]>
X-Yahoo-Profile: marcelloassouza
Sender: delphi-br@yahoogrupos.com.br
MIME-Version: 1.0
Mailing-List: list delphi-br@yahoogrupos.com.br; contact
[EMAIL PROTECTED]
Delivered-To: mailing list delphi-br@yahoogrupos.com.br
List-Id: <delphi-br.yahoogrupos.com.br>
Precedence: bulk
List-Unsubscribe: <mailto:[EMAIL PROTECTED]>
Date: Wed, 04 Jan 2006 18:04:06 -0000
Subject: [delphi-br] Re: Problema com ntdll.dll - Urgente
Reply-To: delphi-br@yahoogrupos.com.br
Content-Type: text/plain; charset=O-8859-1
Content-Transfer-Encoding: quoted-printable
X-Spam-Checker-Version: SpamAssassin 3.0.2 (2004-11-16) on 
        poseidon.bludata.com.br
X-Spam-Level: 
X-Spam-Status: No, score=.4 required=0 tests=L,BAYES_00 
        autolearn=available version=0.2

Pessoal, complementando o problema abaixo depois de dar mais umas 
fuçadas, percebi que o que ocorre é o seguinte:

Me parece que no delphi 7 o componente combobox não aceita textos em 
branco pois é justamente quando eu tento passar um valor de uma 
posição do combobox que está em branco que ocorre o erro. Quando o 
combobox está com todos os itens preenchidos não ocorre o erro.

Agora como validar se o item é vazio ou não??? Notar abaixo na minha 
função que a variável que recebe o valor de cada item da combo é do 
tipo String.

Att,

Marcelo.



--- Em delphi-br@yahoogrupos.com.br, "marcelloassouza" 
<[EMAIL PROTECTED]> escreveu
>
> Pessoal, 
> 
> Temos vários projetos aqui na empresa, mas somente um estou tendo 
um 
> problema com a ntdll.dll.
> 
> Os projetos estavam em D5 e agora estamos migrando para D7. Em D7 
> funcionava muito bem.
> 
> 
> Será que alguém poderia me ajudar????
> 
> Desde já agradeço!!!
> 
> O erro que recebo é:
> 
> Access Violation at address 7C912FFC in module 'ntdll.dll'. Write 
of 
> adress 004050E1
> 
> O estranho é que nem o try except resolve...
> 
> 
> 
> Segue a função onde está dando o erro:
> 
> procedure ValidaCombo( Sender: TObject );
> var
>   lChar : string ;
>   lCont : Integer ;
>   
> begin
> 
>     If ( Sender as TComboBox ).Text = '' Then
>        Exit ;
> 
>     ( Sender as TComboBox ).Text := UpperCase( ( Sender as 
> TComboBox ).Text );
> 
>     For lCont := 0 To ( Sender as TComboBox ).Items.Count - 1 do
>     Begin
> 
>         //Linha onde ocorre o erro
>         lChar := ( Sender as TComboBox ).Items.Strings[lCont] ;
> 
>         If UpperCase( lChar ) = UpperCase( ( Sender as 
> TComboBox ).Text ) Then
>            Exit ;
> 
>     End ;
> 
>     Application.MessageBox('Valor do campo invalido, favor 
selecionar 
> um valor da lista', 'Mensagem do Sistema', MB_OK);
>     ( Sender as TComboBox ).Text := '' ;
>     ( Sender as TComboBox ).SetFocus ;
>     ( Sender as TComboBox ).DroppedDown := True ;
> 
> end;
> 
> 
> Att,
> 
> Marcelo.
>






-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>


 
Links do Yahoo! Grupos




 






-- 
<<<<< 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]
 
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

 


Responder a