- Код: Выделить всё
- 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 градусов) по координатам из отдельного файла.
 AmericanPie.zip
 AmericanPie.zip
Вернуться в Обучение Free Pascal
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1