Pascal/Turbo Pascal - limitar lo que se escribe

Buenas queria saber como se podria limitar lo que escribe el usuario??

mira la unica forma de limitar lo que el usuario ingresa leer caracter por caracter, es decir:

var
letra : char ;
palabra :integer ;

begin
repeat
letra := readkey ;
palabra := palabra + letra ;
until lenght(palabra) = 15 ; {este numero se cambia para el numero maximo de caracteres}
end .

algunos ajustes hay que hacer por ejemplo si el usuario quiere borrar lo que escribió pero son ajustes menores, espero que te haya servido adios^^

Muchas gracias yo lo necesito es en codigo FreePascal porque este codigo no me vale se modificar un par de cosas pero yo tengo entendido que no se puede sumar dos variables distintas y un lenght se utiliza con cadenas n?

Pero de todas formas muchas gracias porque yo estaba usando algo similar y utilizando el LENGHT no limito lo que escribe el usuario pero solo acepta como correcto al numero que lo igualo. Gracias ^^

Laysquad cometió un error. Declaró la variable "palabra" como integer, debe ser string.

jejeje ^^ lo siento tienen razon los dos^^, a veces escribo de forma rapida y me confundo, pero lo impòrtante fué que me entendieron la idea^^ . Saludos^^.