ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Comparar valor entre faixa

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
VDL
Aprendiz
Aprendiz


Registrado: Sábado, 7 de Mai de 2005
Mensagens: 170

MensagemEnviada: Qui Out 13, 2011 3:24 pm    Assunto: Comparar valor entre faixa Responder com Citação

Pessoal como comparar se o valor X está entre Y e Z
Exemplo : Edit1 = 100
Edit2 = 150
Edit3 = 120
Como saber se o valor do Edit3 está entre a faixa de números do edit1 e edit3 (100 a 150)


abraço

VDL Sad
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Ghost_Rider
Colaborador
Colaborador


Registrado: Segunda-Feira, 6 de Outubro de 2003
Mensagens: 4437

MensagemEnviada: Qui Out 13, 2011 3:43 pm    Assunto: Responder com Citação

assim :

if (StrToInt(edit3.Text) > StrToInt(edit1.Text)) and (StrToInt(edit3.Text) < StrToInt(edit2.Text) then
ShowMessage('valor entre faixa');
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
VDL
Aprendiz
Aprendiz


Registrado: Sábado, 7 de Mai de 2005
Mensagens: 170

MensagemEnviada: Sex Out 14, 2011 8:40 am    Assunto: Responder com Citação

Valeu Ghost_Rider

Muito obrigado


abraço

VDL Smile
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
joemil
Moderador
Moderador


Registrado: Quinta-Feira, 25 de Março de 2004
Mensagens: 9099
Localização: Sinop-MT

MensagemEnviada: Sex Out 14, 2011 9:13 am    Assunto: Responder com Citação

ou entao (pra valores inteiros):

if Valor in [inicio..fim] then
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
GustavoToyota
Profissional
Profissional


Registrado: Domingo, 9 de Outubro de 2011
Mensagens: 605
Localização: Sorocaba - SP

MensagemEnviada: Sex Out 14, 2011 11:12 am    Assunto: Responder com Citação

joemil escreveu:
ou entao (pra valores inteiros):

if Valor in [inicio..fim] then

Este método é muito limitado. Só utilize se for com números pequenos.
Tem a função InRange na unit Math, mas se for colocar a unit na uses só para usar essa função então é melhor utilizar o método do Ghost_Rider/joemil.

Abraços
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
johnny-walker
Moderador
Moderador


Registrado: Sábado, 4 de Outubro de 2003
Mensagens: 10653
Localização: Contagem/MG - BRAZIL

MensagemEnviada: Sex Out 14, 2011 11:25 pm    Assunto: Responder com Citação

Neste caso no máximo que vc pode utilizar é para um tipo byte de no máximo 255 elementos, nõa mais do que isto.

de uma olhada neste link que vc vai compreender o pq do operador in aceitar somente 255 elementos.

http://www.activedelphi.com.br/forum/viewtopic.php?t=64925&postdays=0&postorder=asc&highlight=conjunto&start=0


bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB