Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.04.2015, 16:39   #1
gringo123
Новичок
Джуниор
 
Регистрация: 26.04.2015
Сообщений: 2
По умолчанию Рисование в Паскале АВС мышка

Помогите пожалуйста нарисовать компьютерную мышь в паскале
Изображения
Тип файла: jpg post-687031-1375917963.jpg (28.0 Кб, 152 просмотров)
gringo123 вне форума Ответить с цитированием
Старый 26.04.2015, 16:45   #2
newerow1989
Я самый любопытный
Участник клуба
 
Аватар для newerow1989
 
Регистрация: 24.07.2012
Сообщений: 1,949
По умолчанию

Тут с MoveTo, LineTo, Ellipse не отделаешься...
С запрограммированным приветом, Неверов Евгений!
Сайт: http://newerow1989.ru
[Паскаль] [Delphi]
newerow1989 вне форума Ответить с цитированием
Старый 26.04.2015, 17:29   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

А почему нет? Акуратненько вычислить сопряжения и можно. Дуги еще. Только нудно все это
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 26.04.2015, 17:32   #4
newerow1989
Я самый любопытный
Участник клуба
 
Аватар для newerow1989
 
Регистрация: 24.07.2012
Сообщений: 1,949
По умолчанию

Не только нудно, но и ОЧЕНЬ долго
С запрограммированным приветом, Неверов Евгений!
Сайт: http://newerow1989.ru
[Паскаль] [Delphi]
newerow1989 вне форума Ответить с цитированием
Старый 27.04.2015, 11:50   #5
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

есть программки, где просто рисуешь мышкой (как в Paint), а программа выдаёт код на Паскале для данного рисунка.
Даже тут на форуме давали ссылки на такие программы.

Внимание. Код для графики на Turbo Pascal и PascalABC отличается!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 27.04.2015, 13:03   #6
gringo123
Новичок
Джуниор
 
Регистрация: 26.04.2015
Сообщений: 2
По умолчанию

Если попадется на глаза, отпишитесь пожалуйста
gringo123 вне форума Ответить с цитированием
Старый 27.04.2015, 13:16   #7
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
Сообщение от gringo123 Посмотреть сообщение
Если попадется на глаза, отпишитесь пожалуйста
нашёл поиском по форуму. я говорил про ЭТО


___

а ещё на форуме была тема "[Мини-игра] Робо тир". Там в комплекте есть программа Lines
Цитата:
Lines - программа, созданная нами в первую очередь и являющаяся чем-то вроде редактора графики для будущей игры. Так как мы были жестко ограничены заданием (использование стандартных методов Canvas'а), то ни о каких Photoshop'ах речи быть не могло. Пришлось создавать свой собственный редактор графики, который, к тому же, сохранял бы созданную картинку в виде кода.

Последний раз редактировалось Serge_Bliznykov; 27.04.2015 в 13:19.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 27.04.2015, 15:36   #8
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Если бы меня запрягли такую ересь рисовать, то я бы взял АБЦ (фу-фу-фу) там в графике есть что-то вида LoadFromFile. А потом попиксельно сохранял бы.. Было бы ужасно, но зато гемора меньше
Poma][a вне форума Ответить с цитированием
Старый 27.04.2015, 15:38   #9
Вадим Мошев

Старожил
 
Аватар для Вадим Мошев
 
Регистрация: 12.11.2010
Сообщений: 8,568
По умолчанию

Я думаю, что необязательно рисовать точь-в-точь. Ведь некоторые элементы этой мыши можно "аппроксимировать" уже существующими графическими примитивами...
Вадим Мошев вне форума Ответить с цитированием
Старый 27.04.2015, 15:43   #10
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

А где вообще проблема? 8 отрезков, 2 эллипса, 1 эллиптическая дуга и 9 круговых. Еще и осевая симметрия в помощь ТС. К тем MoveTo, LineTo, Ellipse еще и Arc или их аналоги
Цитата:
Ведь некоторые элементы этой мыши можно "аппроксимировать" уже существующими графическими примитивами...
Не некоторые, а все без исключения
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Последний раз редактировалось Аватар; 27.04.2015 в 15:46.
Аватар вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
2 программки (массивы) на паскале АВС Кутяшка Фриланс 7 29.05.2014 12:04
Рисование в Паскале АВС Gomer_alkAn Паскаль, Turbo Pascal, PascalABC.NET 5 23.01.2012 14:04
Задания в Паскале АВС Jenny_19 Паскаль, Turbo Pascal, PascalABC.NET 1 21.11.2011 19:27
Мышка в Паскале. IDE = TP7 Qousio Помощь студентам 3 04.05.2009 12:53
Вычислить параметр треугольника АВС в паскале. Freeman_DR Паскаль, Turbo Pascal, PascalABC.NET 4 26.10.2008 21:11