Лидеры рейтинга

ID: 226425

Konstantin Shvetski

Мастер-Эксперт

978

Россия, Северодвинск


ID: 401284

Михаил Александров

Академик

416

Россия, Санкт-Петербург


ID: 259041

Алексеев Владимир Николаевич

Мастер-Эксперт

405

Россия, пос. Теплоозёрск, ЕАО


ID: 137394

Megaloman

Мастер-Эксперт

329

Беларусь, Гомель


ID: 400669

epimkin

Профессионал

119


ID: 165461

Лангваген Сергей Евгеньевич

Советник

77

Россия, Московская обл.


ID: 400484

solowey

Профессор

67


8.1.6

02.01.2021

JS: 2.2.2
CSS: 4.2.0
jQuery: 3.5.1


 
   
Просмотр сообщений мини-форумов - Alena
• Pascal / Delphi / Lazarus
Вопрос № 188756 ушел в рассылку

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

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


Автор вопроса: Alena (Посетитель)
Дата отправки вопроса: 31.01.2016, 17:56
• Pascal / Delphi / Lazarus
Вопрос № 188751 ушел в рассылку

Уважаемые эксперты! Пожалуйста, ответьте на вопрос:
Помогите, пожалуйста, задать регион в лазарусе:
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...


Автор вопроса: Alena (Посетитель)
Дата отправки вопроса: 31.01.2016, 01:40