BS>Since you head your question "PASCAL", here is a Pascal reply - Hope Gary
BS>won't say we are too far off-topic.
BS>I like to treat all entries as strings, filtering bad keystrokes, and
BS>converting them to numbers only when I know that will work. Here is an
BS>example. To avoid re-writing the validation code for each field, we make a
BS>function of it. You can use it again and again in program after program.
BS>PROGRAM Temp;
BS>USES crt, DOS;
BS>Function GetInteger(var Num : LongInt ; x, y : Integer) : boolean ;
BS>I use a similar technique when reading from a file. This allows you to 
issue
BS>explicit messages about what is wrong, instead of just crashing.
BS>You can modify this idea to meet your specific needs. Good luck.
Thank you very much,
Finally i found the solution, and you know what, i slove the first
problem by addition some command to your Function.
rellay it's very interesting.
so, the good luck come with me in this point.
with my BestRegrads
                        Majed Al-Haj
               ---------------------------------
               E-Mail:Majed.al-haj@jetnetbbs.com
---
 þ OLXWin 1.00a þ --T-A+G-L-I+N-E--+M-E-A+S-U-R+I-N-G+--G-A+U-G-E--
---------------