- Код: Выделить всё
procedure TForm1.Button1Click(Sender: TObject);
begin
Image1.Canvas.pen.Color:=clBlue;
Image1.Canvas.LineTo(100,100)
end;
Модератор: Модераторы
procedure TForm1.Button1Click(Sender: TObject);
begin
Image1.Canvas.pen.Color:=clBlue;
Image1.Canvas.LineTo(100,100)
end;
agt.McCormick писал(а):Здравствуйте. Стоит задача написать в Lazarus программу, которая будет строить круговой график (360 градусов) по координатам из отдельного файла.
Вернуться в Обучение Free Pascal
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2