[SP-pm] Problemas numa comparação

claudio at dpreferencial.com.br claudio at dpreferencial.com.br
Wed Jul 8 09:58:52 PDT 2009


Ufa... encontrei !!

éra o & mesmo.... 

e eu estava tentando &&..


Obrigado.

  ----- Original Message ----- 
  From: claudio at dpreferencial.com.br 
  To: saopaulo-pm at mail.pm.org 
  Sent: Wednesday, July 08, 2009 1:36 PM
  Subject: [SP-pm] Problemas numa comparação



  Pessoall, Boa tarde!

  Como sempre, estou precisando de um HELP!!!

  Estou passando um sistema de Delphi para Perl 
  e não tenho consiguido achar indicação  
  para desenvolver este trecho do código.

  É uma comparação feita como entre Bytes como Boolean.
  ________________________________________________________________
  ________________________________________________________________
  Segue o trecho do código:

  Procedure Ver_Conteudo;
     const BITS: array[0..7] of Byte = (1,2,4,8,16,32,64,128);
     Res:   Boolean;
  Begin
      
    Res := Boolean ( BITS[1] and 6 );    // Este é o trecho que me interessa,  este resultado dá true.

    if (Res) Then ShowMessage('True') else ShowMessage('False');

  End;

  ________________________________________________________________
  ________________________________________________________________

  Qualquer ajuda/ luz, ajuda muito...

  desde já agradeço a todos.

  Abs

  Claudio H.Binaghi
  claudio at dpreferencial.com.br
  5511 3288.4840



------------------------------------------------------------------------------


  _______________________________________________
  SaoPaulo-pm mailing list
  SaoPaulo-pm at pm.org
  http://mail.pm.org/mailman/listinfo/saopaulo-pm
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20090708/59a1038d/attachment.html>


More information about the SaoPaulo-pm mailing list