|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.04.2013, 20:32 | #1 |
Новичок
Джуниор
Регистрация: 06.04.2013
Сообщений: 3
|
Закручивающийся квадрат на 1/5 длины его стороны
Помогите пожалуйста как сделать так чтобы квадрат закручивался на 1/5 длины его стороны
пример: http://www.opita.net/files/images/FullScreen.jpg однако там он закручивается не на 1/5 вот что удалось написать но там квадрат просто крутится ((( Код:
|
06.04.2013, 20:44 | #2 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,291
|
Код на дельфи (но идея понятна):
Код:
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
|
06.04.2013, 21:01 | #3 |
Новичок
Джуниор
Регистрация: 06.04.2013
Сообщений: 3
|
затрудняюсь если честно перевести это для для Pascal ABC
кстати вот пример на си, правда там уменьшается на 1.7 стороны http://www.opita.net/node/301 |
06.04.2013, 21:07 | #4 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,291
|
У меня нет Pascal ABC под рукой.
Изменить нужно 2 строчки. Примерно так: Код:
Пожалуйста
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
Последний раз редактировалось BDA; 06.04.2013 в 21:34. |
06.04.2013, 21:28 | #5 |
Новичок
Джуниор
Регистрация: 06.04.2013
Сообщений: 3
|
большое спасибо всё работает =)
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Нарисовать произвольный треугольник,зная его стороны(pascal) | reprain | Помощь студентам | 1 | 07.10.2012 22:55 |
Расчёт S и P треугольника через его стороны и/или углы | Matrix6993 | Общие вопросы Delphi | 6 | 23.02.2012 00:07 |
Замена длины слова его позицией | Nezaam | Помощь студентам | 2 | 08.01.2011 11:29 |
Нужно отрисовать текст с левой стороны(LeftMargin) и сделать его вертикальным - Компонент RxLib | Михаил Юрьевич | Общие вопросы Delphi | 1 | 08.08.2009 22:16 |
нарисовать квадрат с длиной стороны 100 пикселей, используя процедуру linerel(x,y:integer) | Кася_ | Помощь студентам | 6 | 23.02.2009 19:13 |