Page 66 - 6370
P. 66
end.
4. Відкривають проект нового вікна форми File > New >
Form і вставляють на нього дві кнопки ТButton і два
об’єкти класу TImage .
Рисунок 44 – Дизайн проекту з двома обєктами класу
TImage .
5. У розділ uses модуля, що супроводжує щойно долучену
форму дописують Unit_N.
6. Задля пробної програми створюють процедуру
опрацювання події OnClick кнопки Button4:
procedure TForm3.Button4Click(Sender:
TObject);
var
L: array of integer;
R: array of integer;
begin
figure_point(Image1,10,10,l,r);
68
