[pasca]Problem z graph (wybor)

Witam, mam pewien problem, otóż. Chce zrobić coś takiego:
Co chcesz zebym narysowal? Prostokat czy koło? i gdy się wpisze coś w tedy coś się pokarze, ale muszę to wpisywać w oknie tekstowym, a nie w graficznym, da radę coś z tym zrobić?

Da. Jeżeli w trybie tekstowym to Readln lub Read, ewentualnie ReadKey. I koniecznie poczytaj podstawy.

Napisałem, że właśnie wybiera w polu tekstowym (czyli readln), a ja chce żeby to pobieralo w trybie graficznym, zebym nie przalaczal sie na konsole.

Mówimy o Free Pascalu i jego unicie Graph? bo jeśli tak, to zrobiłem kiedyś zamienniki readkey/keypressed dla trybu graficznego w oknie. ale mogę to na jutro wygrzebać dopiero...

Dokładnie chodzi mi to, że jak jest taki np. kod w tekstowym:
var a:real;
begin
writeln('podaj wieksza od 10');
readln(a);
if a>10
...
end.

Jak to zainicjowac w trybie graficznym, że by nie musiec przelaczac sie na konsloe txt