<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.6000.16850" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial size=2>Ufa... encontrei !!</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>éra o &amp; mesmo.... </FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>e eu estava tentando &amp;&amp;..</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>Obrigado.</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<BLOCKQUOTE 
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
  <DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
  <DIV 
  style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B> 
  <A title=claudio@dpreferencial.com.br 
  href="mailto:claudio@dpreferencial.com.br">claudio@dpreferencial.com.br</A> 
  </DIV>
  <DIV style="FONT: 10pt arial"><B>To:</B> <A title=saopaulo-pm@mail.pm.org 
  href="mailto:saopaulo-pm@mail.pm.org">saopaulo-pm@mail.pm.org</A> </DIV>
  <DIV style="FONT: 10pt arial"><B>Sent:</B> Wednesday, July 08, 2009 1:36 
  PM</DIV>
  <DIV style="FONT: 10pt arial"><B>Subject:</B> [SP-pm] Problemas numa 
  comparação</DIV>
  <DIV><BR></DIV>
  <DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
  <DIV><FONT face=Arial size=2>Pessoall, Boa tarde!</FONT></DIV>
  <DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
  <DIV><FONT face=Arial size=2>Como sempre, estou precisando de um 
  HELP!!!</FONT></DIV>
  <DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
  <DIV><FONT face=Arial size=2>Estou passando um sistema de Delphi para Perl 
  </FONT></DIV>
  <DIV><FONT face=Arial size=2>e </FONT><FONT face=Arial size=2>não tenho 
  consiguido achar&nbsp;indicação&nbsp; </FONT></DIV>
  <DIV><FONT face=Arial size=2>para desenvolver este trecho do 
  código.</FONT></DIV>
  <DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
  <DIV><FONT face=Arial size=2>É uma comparação feita como entre Bytes como 
  Boolean.</FONT></DIV>
  <DIV><FONT face=Arial 
  size=2>________________________________________________________________</FONT></DIV>
  <DIV><FONT face=Arial 
  size=2>________________________________________________________________</FONT></DIV>
  <DIV><FONT face=Arial size=2>Segue o trecho do código:</FONT></DIV>
  <DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
  <DIV><FONT face=Arial size=2>Procedure Ver_Conteudo;</FONT></DIV>
  <DIV><FONT face=Arial size=2>&nbsp;&nbsp; const BITS: array[0..7] of Byte = 
  (1,2,4,8,16,32,64,128);</FONT></DIV>
  <DIV><FONT face=Arial size=2>&nbsp;&nbsp; Res:&nbsp;&nbsp; 
  Boolean;</FONT></DIV>
  <DIV><FONT face=Arial size=2>Begin</FONT></DIV>
  <DIV><FONT face=Arial size=2>&nbsp;&nbsp;&nbsp; </FONT></DIV>
  <DIV><FONT face=Arial size=2>&nbsp; Res := Boolean ( BITS[1] and 6 
  );&nbsp;&nbsp; &nbsp;//&nbsp;Este é o trecho que me interessa, &nbsp;este 
  resultado dá true.</FONT></DIV>
  <DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
  <DIV><FONT face=Arial size=2>&nbsp; if (Res) Then ShowMessage('True') else 
  ShowMessage('False');</FONT></DIV>
  <DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
  <DIV><FONT face=Arial size=2>End;</FONT></DIV>
  <DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
  <DIV><FONT face=Arial size=2>
  <DIV><FONT face=Arial 
  size=2>________________________________________________________________</FONT></DIV>
  <DIV><FONT face=Arial 
  size=2>________________________________________________________________</FONT></DIV>
  <DIV>&nbsp;</DIV>
  <DIV>Qualquer ajuda/ luz,&nbsp;ajuda muito...</DIV>
  <DIV>&nbsp;</DIV>
  <DIV>desde já agradeço a todos.</DIV>
  <DIV>&nbsp;</DIV>
  <DIV>Abs</DIV>
  <DIV>&nbsp;</DIV>
  <DIV>Claudio H.Binaghi<BR><A 
  href="mailto:claudio@dpreferencial.com.br">claudio@dpreferencial.com.br</A><BR>5511 
  3288.4840<BR></FONT></DIV></DIV>
  <P>
  <HR>

  <P></P>_______________________________________________<BR>SaoPaulo-pm mailing 
  list<BR>SaoPaulo-pm@pm.org<BR>http://mail.pm.org/mailman/listinfo/saopaulo-pm</BLOCKQUOTE></BODY></HTML>