Hi Majed!
06 Dec 97 12:52, Majed Al-Haj wrote to All:
MAH> and such as make the program just accept in ID rank just 5 digit
MAH> and in the NAME rank accept in the reading just 40 char..
Try something like this:
program test;
uses dos,strings,crt;
var
chi:char;
hello:string[3];
counter:integer;
begin
WriteLn('Please Enter thingy');
Counter := 1;
while counter  4 do
begin
chi := ReadKey;
hello := hello + chi;
Write(chi);
counter := counter + 1;
end;
writeln;
writeln('Entered = ',hello);
end.
--
JamesB //
[I don't suffer from insanity.. I enjoy every moment of it]
--- FMailX 1.22
---------------