Wczytywanie danych z przedziału

Cześć. Jak ograniczyć możliwość przypisywania danych do zmiennej ? Mam np. wprowadzić zmienną g, 0 < g < 10. Jeśli wprowadzana zmienna nie jest w podanym zakresie to chciałbym mieć możliwość wprowadzenia zmiennej ponownie.

Wczytuj do łańcucha, konwertuj na liczbę funkcją np.: Val lub StrToInt, sprawdzaj zakres i jeśli nie mieści się w przedziale nie kończ pętli - poproś o ponowne wprowadzenie liczby.