Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Графика и игры
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 27.12.2010, 20:34
kirman kirman вне форума
Прохожий
 
Регистрация: 01.08.2010
Сообщения: 15
Репутация: -2
По умолчанию У меня творится что-то странное

Уважаемые!
У меня творится что-то странное...
Написал программку, последовательность действий которой:
1. Открыть картинку
2. Нажать на любую область этой картинки(если белый пиксел - дальше, другой - стоп)
3. Выбрать из появившихся вокруг клика панелек панельку нужного цвета, и залить ту область, где кликнули выбраным цветом...
Программно всё вроде правильно, но почему-то на выбранные красный, зелёный и синий цвет - заливает чёрным цветом, а жёлтый - вообще не заливает((

Программа: http://www.rapidshare.ru/1716336
Ответить с цитированием
  #2  
Старый 27.12.2010, 21:10
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Пунк 2.4. правил форума читал?
Ну и 4.1. заодно.
Ответить с цитированием
  #3  
Старый 27.12.2010, 21:16
kirman kirman вне форума
Прохожий
 
Регистрация: 01.08.2010
Сообщения: 15
Репутация: -2
По умолчанию

каюсь. простите. исправлюсь.
как изменить, если что?
Ответить с цитированием
  #4  
Старый 27.12.2010, 21:18
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Цитата:
Сообщение от kirman
каюсь. простите. исправлюсь.
как изменить, если что?
Модераторам придется испавлять.Насчет проги - сейчас гляну.
Ответить с цитированием
  #5  
Старый 27.12.2010, 21:27
kirman kirman вне форума
Прохожий
 
Регистрация: 01.08.2010
Сообщения: 15
Репутация: -2
По умолчанию

спасибо большое!
Ответить с цитированием
  #6  
Старый 27.12.2010, 21:52
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Странно, по отдельности все работает.Но как слепить вместе - нет...
Проблема где-то в области .Bitmap
Нашел)))Картинка автоматом воспринимается как ч/б.Смени картинку на цветную.
Вот :
PHP код:
procedure TForm1.Button1Click(SenderTObject);
begin 
if openpicturedialog1.Execute then 
image1
.Picture.LoadFromFile (openpicturedialog1.FileName);
Image1.Picture.Bitmap.Monochrome:=false;
end

Последний раз редактировалось Konrad, 27.12.2010 в 22:07.
Ответить с цитированием
  #7  
Старый 27.12.2010, 21:56
kirman kirman вне форума
Прохожий
 
Регистрация: 01.08.2010
Сообщения: 15
Репутация: -2
По умолчанию

вот-вот...
а из-за чего может такое быть?
Ответить с цитированием
  #8  
Старый 27.12.2010, 22:03
kirman kirman вне форума
Прохожий
 
Регистрация: 01.08.2010
Сообщения: 15
Репутация: -2
По умолчанию

я понял!!!
у меня битмап был сохранён через пэинт как монохромный рисунок.
из-за этого и весь сыр-бор.
Konrad, спасибо, что откликнулся!!
Ответить с цитированием
  #9  
Старый 27.12.2010, 22:07
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,721
Репутация: 52347
По умолчанию

Небольшая подсказка - глубина цвета картинки.
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
  #10  
Старый 27.12.2010, 22:09
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Вобщем допиши Image1.Picture.Bitmap.Monochrome:=false;
после открытия рисунка, мало ли

Кстати, идея довольно неплохая, вот только панельки можно поменьше.
А так норм.
И кода не много

Как расскрасска для детей - в самый раз.
Вот только еще дописать функцию "Отменить".
И игра готова. - грузи картинку, которая нравится и расскрашивай.

Та и новые цвета добавить - 3 строки кода

Последний раз редактировалось Konrad, 27.12.2010 в 22:15.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 06:06.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter