|
Вопрос # 4 185/ вопрос открыт / |
|
Всем привет! У меня проблемма, хочу сделать игровой проект "Dartc" но не могу понять какие же рисунки взять для него, он бывает двух видов круговой до 10 очков и зональный до 60, круговой проще, рисунки друг на друга тупо накладывать, но как сделать рисунки круглыми и вообще можно ли вставить в делфи круглый рисунок, мучаюсь второй вечер помогите чем нибудь, заранее очень благодарен!!!
 |
Вопрос задал: HEJY (статус: Посетитель)
Вопрос отправлен: 19 мая 2010, 19:07
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: Кириченко Сергей
Здравствуйте, Рыков Илья Иванович!
Вот такой ответ на ваш вопрос предлагает Михаил Феленов - "Библия Delphi":
Приложение: Переключить в обычный режим-
- procedure TForm1.FormPaint(Sender: TObject);
- begin
- Canvas.BrushCopy
- (rect(0,0,Image1.Width,Image1.Height),
- Image1.Picture.Bitmap,
- rect(0,0,Image1.Width,Image1.Height),
- Image1.Picture.Bitmap.Canvas.Pixels[1,1]);
- end;
 |
Ответ отправил: Кириченко Сергей (статус: 1-ый класс)
Время отправки: 19 мая 2010, 19:59
Оценка за ответ: 5
Комментарий к оценке: мммм, не понял, растолкуй плиз
|
Мини-форум вопроса
Всего сообщений: 7; последнее сообщение — 30 мая 2010, 10:19; участников в обсуждении: 4.
|
|
Кириченко Сергей (статус: 1-ый класс), 19 мая 2010, 21:54 [#1]:
Код приведенный выше взят с книги Михаил Феленов - "Библия Delphi"страница 382;
|
|
Егор (статус: 10-ый класс), 20 мая 2010, 02:04 [#2]:
Кириченко: что-то я тоже не понял. это код для чего? у меня этой книги нет (и у вопрошающего тоже, я так думаю). пояснения требуются
иначе хрень какая-то
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
Ерёмин А.А. (статус: *Администратор), 20 мая 2010, 08:48 [#3]:
Цитата (HEJY):
мммм, не понял, растолкуй плиз
А за что тогда оценка 5?
|
|
|
Кириченко Сергей (статус: 1-ый класс), 20 мая 2010, 09:44 [#4]:
Эта процедура перерисует на Canvas содержимое Image1 (если там находится рисунок *.bmp и сделает прозрачными все пикселы рисунка которые идентичны Image1.Picture.Bitmap.Canvas.Pixels[1,1].
Таким образом если в Image1 загрузить прямоугольный рисунок Дартса Однородное поле на фоне уберется и получится круглый рисунок.
|
|
|
HEJY (статус: Посетитель), 29 мая 2010, 15:51 [#5]:
я уже решил сделать это проект иначе с помощью Shape начало есть а вот как дальше не могу понять помогите уважаемые эксперты((
|
|
|
Егор (статус: 10-ый класс), 29 мая 2010, 16:09 [#6]:
так ты что хочешь получить в итоге? круглую форму? или форму обычную, прямоугольную, но на ней круглый рисунок?
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
|
HEJY (статус: Посетитель), 30 мая 2010, 10:19 [#7]:
форма обычная прямоугольная, но на ней расположены 10 круглых объектов, ну тоесть не совсем круглых все равно у Shape Circle контур прямоуголной фигуры(((
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
