Принадлежат ли точки заштрихованной области?

[TonyF]

Есть текстовый файл, из которого значения типа:
х у
2 3
4 5
6 7

передаются в стринггрид.

procedure TForm1.Button2Click(Sender: TObject);
var
   f:TextFile;
   k,x,y:integer;
   s:String;
 begin
   AssignFile(f, 'file.txt');
   Reset(f);
   readln(f,s);
   k:=0;
   while not eof(f) do
       begin
         Readln(f,x,y);
         StringGrid1.Cells[0,k]:=IntToStr(x);
         StringGrid1.Cells[1,k]:=IntToStr(y);
         inc(k);
   end;
   CloseFile(f);
 end;

А требуется (что как раз таки не получается совсем....) вывести только те числа, что будут принадлежать (заштрихованной) серой области



Вот не знаю даже как написать это условие, имея параболу и прямую, что идет под 45 градусов.
Буду рад любой помощи, если таковая будет. Добрый отзыв обещаю

[Zer0]

И снова я

   while not eof(f) do
       begin
         Readln(f,x,y);
         if (y>2*(x-1)*(x-1)-2) and (y<x) then begin //здесь определяем формулу параболы и прямой
            StringGrid1.Cells[0,k]:=IntToStr(x);
            StringGrid1.Cells[1,k]:=IntToStr(y);
            inc(k);
        end;
   end;

[TonyF]

ты мой спаситель!
Теперь хоть форму записи эту вспомнил) Сейчас допишемс