Тема: 2д графика
Показать сообщение отдельно
  #22  
Старый 22.01.2010, 23:47
Spam Spam вне форума
Прохожий
 
Регистрация: 22.01.2010
Сообщения: 17
Репутация: 10
По умолчанию

procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
DrawStar(FAngle);
end;
Ответить с цитированием