|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.05.2017, 16:46 | #1 |
Новичок
Джуниор
Регистрация: 25.05.2017
Сообщений: 1
|
Инициализация графического режима, программирование эффекта движения - PascalABC.NET
Построить 3 различные геометрические фигуры, и заполнить различными образцами штриховки внутренние области. Реализовать алгоритм кругового движения этих фигур с разной скоростью.
Вот часть программы, которая рисует круг,и он движется по кругу, у меня не получается сделать для прямоугольника и эллипса. program Circle2; uses crt,graphABC; var x, y, r1, r2, i, n :integer; begin //clrscr; LockDrawing; r1:=50; r2:=20; n:=50;for i:=0 to n do begin Window.Clear; x:=trunc(320+r1*cos(6.28*(i/n))); y:=trunc(240-r1*sin(6.28*(i/n))); SetPenColor(clgreen); setBrushColor(clgreen); Circle (x,y,r2); SetPenColor(clred); Redraw; Sleep(50); end; end. |
25.05.2017, 17:16 | #2 |
Забанен
Форумчанин Подтвердите свой е-майл
Регистрация: 01.11.2006
Сообщений: 420
|
Смотрите в папке примеров, разработчики PascalABC.NET
специально для Вас их прикрепили к среде программирования. \PABCWork.NET\Samples\Graphics\ABCO bjects\gr_Move_Param.pas И не стесняйтесь читать справку, она вызывается кнопкой F1.
Если ничто другое не помогает, прочтите, наконец, инструкцию! Аксиома Кана
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
как процедуру идля текстового режима переделать для графического режима | sanchoys | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 29.05.2013 20:44 |
Инициализация графического режима | gylayko | Помощь студентам | 2 | 27.02.2012 13:24 |
инициализация графического режима в Паскале | Dimanduc | Помощь студентам | 11 | 26.05.2010 17:49 |
Жужжание монитора при переключении графического режима. | Levsha100 | Компьютерное железо | 6 | 11.02.2010 13:22 |
Проблема инициализайии графического режима в BorlandC++ под ДОС | Anatol_rus | Общие вопросы C/C++ | 0 | 01.04.2009 22:33 |