Walter, a idéia é colocar a diretiva envolvendo apenas o código que provoca
o warning que você conhece e quer ignorar e apenas esse. É evidente que não
se deve ignorar sem nenhum critérios todos os warnings. Ou seja, se existe
um warning que eu já conheço, que pra mim é inofensivo e eu não pretendo
alterar o código para resolve-lo, o melhor é envolver esse código com as
diretivas para limpar a minha janela de mensagens do compilador. Se não,
posso não perceber outros alertas mais importantes.

Alessandro Fernandes

> -----Mensagem original-----
> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
> nome de Walter Alves Chagas Junior
> Enviada em: quarta-feira, 19 de abril de 2006 14:13
> Para: 'delphi-br@yahoogrupos.com.br'
> Assunto: RES: [delphi-br] Muitos warnings
>
> Isto funciona mas eu não recomendaria.
>
> Warnings são pra serem analisados e não ignorados. Alguns, como os unsafes
> da vida até que vai, mas outros deve-se analisar porque aquela mensagem.
> Variáveis sendo alocadas desnecessariamente ou não sendo devidamente
> inicializadas são fontes inesgotáveis de bugs num sistema.
>
> []s
>
> Walter Alves Chagas Junior
> Projeto e desenvolvimento de sistemas
> Telemont Engenharia de telecomunicações
> Belo Horizonte - MG - Brazil
> [EMAIL PROTECTED]
> Fone: (31) 3389-8215 Fax: (31) 3389-8200
>
>
> -----Mensagem original-----
> De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> nome de Alessandro Fernandes
> Enviada em: quarta-feira, 19 de abril de 2006 12:46
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] Muitos warnings
>
>
> Daniel,
>
> Para evitar um warning indesejado basta que você delimite a área referente
> ao warning com
>
> {$WARNINGS OFF}
>   O que estiver entre essas duas diretivas não gerará o warning.
> {$WARNINGS ON}
>
> Alessandro Fernandes
>
> > -----Mensagem original-----
> > De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> Em
> > nome de Daniel Bastos
> > Enviada em: terça-feira, 18 de abril de 2006 14:26
> > Para: delphi-br@yahoogrupos.com.br
> > Assunto: Re: [delphi-br] Muitos warnings
> >
> > Eu sei que estes warings não vão influenciar no meu projeto. O
> > problema que tinha um waring parecido com este aki:
> > [Warning] QRelOssa.pas(95): Return value of function 'teste' might be
> > undefined
> >
> > Uma função assim, geraria ele:
> > function teste : boolean;
> > begin
> >   Sleep(100);
> > end;
> >
> > Só que este waring tava perdido lá no meio dos outros. Deu pau no meu
> > projeto :( Tinha muita waring pra ver essa perdida lá no meio. Perdi
> > um tempo considerável com isso :(.
> >
> > Já que não consigo retirar, tem como filtrá-las???
> >
> > Brigado pela ajuda
> > Daniel Augusto Bastos
> >
> >
> >
> >
> > Em 18/04/06, Walter Alves Chagas Junior<[EMAIL PROTECTED]>
> escreveu:
> > > Estes Warnings são inofensivos ao seu projeto :)
> > >
> > > Eles, na verdade, te intormam que estes tipos não são compativeis com
> a
> > > plataforma dotNET e que, se amanhã você resolver portar seu projeto
> para
> > o
> > > framework, eles irão dar pau ao tentar compilar estas linhas.
> > >
> > > []s
> > >
> > > Walter Alves Chagas Junior
> > > Projeto e desenvolvimento de sistemas
> > > Telemont Engenharia de telecomunicações
> > > Belo Horizonte - MG - Brazil
> > > [EMAIL PROTECTED]
> > > Fone: (31) 3389-8215 Fax: (31) 3389-8200
> > >
> > >
> > > -----Mensagem original-----
> > > De: delphi-br@yahoogrupos.com.br [mailto:delphi-
> [EMAIL PROTECTED]
> > > nome de Daniel Bastos
> > > Enviada em: terça-feira, 18 de abril de 2006 10:35
> > > Para: delphi-br@yahoogrupos.com.br
> > > Assunto: Re: [delphi-br] Muitos warnings
> > >
> > >
> > > Estes warings aparecem para mim.
> > >
> > > [Warning] BaixaItau.pas(285): Unsafe type 'ArqBaixaItau: file of
> > > TRegBaixaItau'
> > > [Warning] BaixaItau.pas(286): Unsafe type 'ArqBaixaItau: file of
> > > TRegBaixaItau'
> > > [Warning] BaixaItau.pas(292): Unsafe type 'ArqBaixaItau: file of
> > > TRegBaixaItau'
> > > [Warning] BaixaItau.pas(300): Unsafe type 'ArqBaixaItau: file of
> > > TRegBaixaItau'
> > > [Warning] BaixaItau.pas(380): Unsafe type 'ArqBaixaItau: file of
> > > TRegBaixaItau'
> > >
> > > Este é o código que gera estes warings.
> > >
> > > procedure TFrmBaixaMeuBanco.BtnOkClick(Sender: TObject);
> > > var
> > >  ArqBaixaItau : File of TRegBaixaItau;
> > >  RegBaixaItau : TRegBaixaItau;
> > >
> > > begin
> > >  AssignFile (ArqBaixaItau, 'C:\Teste\itau');
> > >  Reset (arqBaixaItau);
> > >
> > >  cdsRel.CreateDataSet;
> > >  with dtmBordero, dtmDuplicatas do
> > >    while not Eof(ArqBaixaItau) do
> > >      begin
> > >        ValorJuros      := 0;
> > >        SaldoDuplicata  := 0;
> > >        TotalJuros      := 0;
> > >        TotalValorPago  := 0;
> > >        TipoOcorrencia  := 0;
> > >
> > >        Read (ArqBaixaItau, RegBaixaItau);
> > >        if RegBaixaItau.IDENT_REG[0] = '1' then
> > >           begin
> > >             // Trecho de código muuuuuuuuuuito longo
> > >             // Basicamente estre trecho faz a baixa no banco,
> > > dependendo das informações do banco e talz.
> > >           end;
> > >      end;
> > >
> > >  Closefile(ArqBaixaItau);
> > > end;
> > >
> > >
> > > Como são muitos arquivos de retorno, de muitos bancos diferentes, gera
> > > muitos warings.
> > >
> > > Se precisar de mais detalhes, é só avisar.
> > >
> > > Obrigado a ajuda. :)
> > > Daniel A. Bastos
> > >
> > >
> > >
> > >
> > > Em 18/04/06, Rubem Nascimento da Rocha<[EMAIL PROTECTED]>
> > escreveu:
> > > > Se vc listasse o texto de cada um desses warnings pra gente
> analisar,
> > já
> > > > ajudaria.
> > > > Sds.
> > > >
> > > > >From: "Daniel Bastos" <[EMAIL PROTECTED]>
> > > > >Reply-To: delphi-br@yahoogrupos.com.br
> > > > >To: delphi-br@yahoogrupos.com.br
> > > > >Subject: [delphi-br] Muitos warnings
> > > > >Date: Tue, 18 Apr 2006 09:14:23 -0300
> > > > >
> > > > >Bom dia a todos.
> > > > >Estou atualmente atrabalhando em uma aplicação que gera remessa
> para
> > > > >alguns bancos e trata do arquivo retorno.
> > > > >Para tratar o arquivo retorno, utilizo Records.
> > > > >   TArqBanco = Record
> > > > >                             Campo1 : string[5];
> > > > >                             Campo2 : string[5];
> > > > >                             Campo3 : string[5];
> > > > >                             Campo4 : string[5];
> > > > >                       end;
> > > > >   E as instruções a seguir
> > > > >
> > > > >procedure TFrmBaixaMeuBanco.BtnOkClick(Sender: TObject);
> > > > >var
> > > > >   ArqBanco : File of TRegBanco;
> > > > >   RegBanco : TRegBanco;
> > > > >begin
> > > > >   AssignFile (ArqBanco, 'C:\MeuArquivo');
> > > > >   Reset (ArqBanco);
> > > > >
> > > > >   while not Eof(ArqBanco) do
> > > > >   begin
> > > > >      Read (ArqBanco, RegBanco);
> > > > >      // Minhas instruções
> > > > >   end;
> > > > >
> > > > >   Closefile(ArqBanco);
> > > > >end;
> > > > >
> > > > >
> > > > >A aplicação funciona direitinho, mas eu acho meio estranho que dê
> um
> > > > >warning para cada instrução destas:
> > > > >   AssignFile
> > > > >   Reset
> > > > >   Eof
> > > > >   Read
> > > > >   Closefile
> > > > >
> > > > >Porque ta danto tantos warings?
> > > > >
> > > > >Agradeço a todos
> > > >
> > > > _________________________________________________________________
> > > > MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.com.br
> > > >
> > > >
> > > >
> > > > --
> > > > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> > > >
> > > >
> > > >
> > > > Links do Yahoo! Grupos
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > >
> > >
> > > --
> > > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> > >
> > >
> > >
> > > Links do Yahoo! Grupos
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > > [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 >>>>>
> >
> >
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
> >
> >
> > --
> > No virus found in this incoming message.
> > Checked by AVG Free Edition.
> > Version: 7.1.385 / Virus Database: 268.4.3/317 - Release Date: 18/4/2006
>
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
> [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:
PUBLICIDAD


Links do Yahoo! Grupos

Responder a