E2035 Not enough actual parameters????? не могу понять в чем ошибка

[Gagarik]

Нужно спозиционировать относительно Image1

x:=a*cos(t)*(1+cos(t)) + Image1.Width/4;
y:=a*sin(t)*(1+cos(t)) + Image1.Height/2;

[Вадим Мошев]

[Pascal Error] Unit1.pas(38): E2035 Not enough actual parameters

Эта ошибка означает, что "недостаточно фактических параметров", то есть в функцию передаётся меньше параметров, чем требуется на самом деле.
Например, пусть где-то есть функция, которая находит сумму трёх чисел:

funcion f(x, y, x: integer): integer;
begin
f:=x+y+x;
end;

А программе было обратились к этой функции так:

//... какой-то код
f(1,2);
//... какой-то код

Такая программа не скомпилируется и появится сообщение об ошибке: [Pascal Error] Unit1.pas(xxx): E2035 Not enough actual parameters
где xxx - номер строки, где произошла ошибка (эта строка в Делфи выделяется бардовым цветом).

[chertovich]

Расчерчиваете коорд. оси, и чертите от (CentrY, CentrX), именно в этом порядке

var
  CentrX, CentrY: Integer;
begin
  with PaintBox1.Canvas do
  begin
    Canvas.FillRect(ClientRect);

    CentrX := ClipRect.Right div 2;
    CentrY := ClipRect.Bottom div 2;

    MoveTo(CentrX, ClipRect.Top);
    LineTo(CentrX, ClipRect.Bottom);

    MoveTo(ClipRect.Left, CentrY);
    LineTo(ClipRect.Right, CentrY);
  end;

Еще лучше использовать компонент PaintBox, в качестве холста, потому что у него есть событие OnPaint, где и следует писать код.

[Alfa.Shadow]

Gagarik, спасибо тебе огромное! =))))) очень помог=))))