rango de numeros con sentencia 'if' ?

[chinopom]

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

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;

Cual seria la estructura correcta para poder hacer esto???
gracias

[*Caro*]

Hola chinopom y bienvenido, te falta poner parentesis y el ; esta demas

Código Delphi [-]
  ..............................
  n1 := strtoint(edit1.Text);
  if (n1 > 0) and (n1 < 50) then
    label1.Font.Size := label1.Font.Size + 2;

Saluditos

[chinopom]

Ok muchas gracias amigo me ayudaste mucho!

[ecfisa]

Hola.

Otra forma:

  ...
  n1:= StrToInt(Edit1.Text);
  if n1 in [1..49] then 
  ...

Saludos.

[chinopom]

Empezado por ecfisa

Hola.

Otra forma:

  ...
  n1:= StrToInt(Edit1.Text);
  if n1 in [1..49] then 
  ...

Saludos.

Ok muchas gacias por tu respuesta... lo voy a poner en prativa
gacias