Res: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi

2005-03-10 Por tôpico Stock
nao sei se te ajuda... eu tenho esta função que fiz ha muito tempo que me retorna uma sequencia de bits com zeros e uns eu a uso para erros em serie,tipo vou fazer varias validações e quero informar ao usuario onde esta o erro, ai eu atribuo um valor binario para o erro (1,2,4,8,16,32,64,128) e

RES: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi

2005-03-10 Por tôpico Gustavo Fujita
Mutuka, Faça assim, seguindo seu exemplo: var Soma: Integer; Teste: Integer; Begin Soma := 2 + 8 + 32; 42 Teste := 2; if (Soma AND Teste) = Teste then ShowMessage('SIM') else ShowMessage('NÃO'); end; Você pode facilmente transformar isso em uma função. Qualquer dúvida é

RES: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi

2005-03-10 Por tôpico Gustavo Fujita
Opa! Desculpa, me esqueci do grande detalhe! Tem que ser sempre 2 elevado a alguma coisa 2 elevado a 0 = 1; 2 elevado a 1 = 2; 2 elevado a 2 = 4 e assim por diante... (1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024, ...) []´s Gustavo Fujita -Mensagem original- De: Gabriel Ferrarini