FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
rango de numeros con sentencia 'if' ?
Buenas tardes comunidad, apenas ando empezando en esto de delphi y me he quedado atorado
lo que quiero hacer es decirle a Delphi que cuando un numero capturado por el usuario este en un rango por decir de 0 a 50 la fuente del label1 cambie de tamaño... intente con ete codigo pero obvio esta mal escrito Código:
procedure TForm1.Button1Click(Sender: TObject); var n1: integer; begin n1 := strtoint(edit1.Text); if n1 > 0 and n1 < 50; begin label1.Font.Size := label1.Font.Size + 2; end; gracias |
#2
|
||||
|
||||
Hola chinopom y bienvenido, te falta poner parentesis y el ; esta demas
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#3
|
|||
|
|||
Ok muchas gracias amigo me ayudaste mucho!
|
#4
|
||||
|
||||
Hola.
Otra forma: Código:
... n1:= StrToInt(Edit1.Text); if n1 in [1..49] then ...
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#5
|
|||
|
|||
Cita:
gacias |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
TrackBar con rango ?? | NeoNew | Varios | 4 | 13-03-2009 20:03:02 |
filtrar por rango | Max_E. | Conexión con bases de datos | 2 | 22-11-2008 03:14:24 |
Rango de Semanas en un mes | Caro | Varios | 6 | 13-09-2007 01:31:00 |
rango valido | FGarcia | Varios | 2 | 28-04-2006 01:51:01 |
Rango de impresion | JulioGO | Impresión | 2 | 27-08-2004 00:33:07 |
|