separar y comparar valores en un edit

[jocey]

hola a toda la familia del club, yo necesito entrar dos valores en un edit

ej: 98 - 100 , osea separados por el signo - , despues saber si un tercer valor X se encuentra entre 98 y 100, basandome en el ej, que puse....

por favor si no me hago entender me disculpan, me lo diden y lo arreglo.

saludos a todo Jocey

[*Caro*]

Hola jocey, te pongo un ejemplo.

Código Delphi [-]
var
 num1, num2 : Integer;
 PosGuion, X : Integer;
begin
 X := 60 ;
 PosGuion := Pos('-', Edit1.Text);

 num1 := StrToInt(Trim(Copy(Edit1.Text, 1, PosGuion-1)));
 num2 := StrToInt(Trim(Copy(Edit1.Text, PosGuion+1, Length(Edit1.Text))));

 if (X>=num1) and (X<=num2) then
  showmessage('esta en medio');

Saluditos

[jocey]

vi su ejemplo, muy bueno.... excelente.. muchas gracias, justo lo que necesitaba...

saludos