Уважаемые эксперты! Пожалуйста, ответьте на вопрос:
как закрасить регион в лазарусе?
Пишу:

polygon([Point(56,560),Point(56,80),Point(645,80),Point(645,290)]);

Выдает следующую ошибку:

unit12.pas(314,18) Fatal: Syntax error, ")" expected but "," found

Хотя делаю все точно по образцу:
Polygon([Point(150,300),Point(150,150),Point(210,160),Point(210,300)]);
образец на сайте http://grafika.me/node/14

Уважаемые эксперты! Пожалуйста, ответьте на вопрос:
Помогите, пожалуйста, задать регион в лазарусе:
var
Form12: TForm12;
i:integer;
Ar: array[0..19]of TPoint=((X:48;Y:660), (X:48;Y:55),(X:645;Y:55),(X:645;Y:2 90),(X:290;Y:290),(X:290;Y:550), (X:545;Y:550),(X:545;Y:435),(X:435; Y:435),(X:435;Y:535),(X:335;Y:535), (X:335;Y:335),(X:645;Y:335),(X:645; Y:650),(X:190;Y:650),(X:190;Y:190), (X:545;Y:190),(X:545;Y:155),(X:148; Y:155),(X:148;Y:660));
Rgn1: HRGN;
implementation
Uses Unit13;
{$R *.lfm}
выдает ошибки: unit12.pas(36,13) Error: Identifier not found "HRGN&qu...