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

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

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 20.10.2007, 13:42   #1
Timpi
Пользователь
 
Аватар для Timpi
 
Регистрация: 20.10.2007
Сообщений: 29
Вопрос Вопрос по TColorDialog

Доброе время суток!

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

Если подскажите ещё парочку нужных функций данного компанента буду благодарен .
Timpi вне форума Ответить с цитированием
Старый 20.10.2007, 14:14   #2
_Dmitry
Участник клуба
 
Аватар для _Dmitry
 
Регистрация: 02.09.2007
Сообщений: 1,193
По умолчанию

Кидаем диалог на форму, его имя по умолчанию будет ColorDialog1.
Образец использования:
Код:
 
var
  c: TColor;
...............
if ColorDialog1.Execute then
  c:=ColorDialog1.Color;
открываем диалог и проверяем как он отработал, если все ОК, то цвет будет в параметре ColorDialog1.Color

Последний раз редактировалось _Dmitry; 20.10.2007 в 14:20.
_Dmitry вне форума Ответить с цитированием
Старый 20.10.2007, 15:08   #3
mutabor
Телепат с дипломом
Старожил
 
Аватар для mutabor
 
Регистрация: 10.06.2007
Сообщений: 4,929
По умолчанию

Вообще диалог выбора цвета это довольно хитрая штука, прилагаю проект граф. редактора, сильно недоделанный, но как образец для начала сойдет.
Вложения
Тип файла: rar paint.rar (13.4 Кб, 15 просмотров)
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог
mutabor вне форума Ответить с цитированием
Старый 20.10.2007, 16:58   #4
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

В стандартной поставке Дельфи есть то, что вам нужно - готовый редактор:
D:\Borland\Delphi7\Demos\Doc\Graphe x
mihali4 вне форума Ответить с цитированием
Старый 20.10.2007, 17:35   #5
Timpi
Пользователь
 
Аватар для Timpi
 
Регистрация: 20.10.2007
Сообщений: 29
По умолчанию

Спасибо! Помогло!

Но это решение вопроса 2..
Поэксперементировав я решил и первый:
Код:
 
var
c: TColor;
...............
ColorDialog1.Color:=с;
if ColorDialog1.Execute then
c:=ColorDialog1.Color;
При условии, что переменная "с" определена выделяется нужный цвет.
Timpi вне форума Ответить с цитированием
Старый 20.10.2007, 17:42   #6
Timpi
Пользователь
 
Аватар для Timpi
 
Регистрация: 20.10.2007
Сообщений: 29
По умолчанию

Цитата:
Сообщение от mutabor Посмотреть сообщение
Вообще диалог выбора цвета это довольно хитрая штука, прилагаю проект граф. редактора, сильно недоделанный, но как образец для начала сойдет.
Цитата:
Сообщение от mihali4 Посмотреть сообщение
В стандартной поставке Дельфи есть то, что вам нужно - готовый редактор:
D:\Borland\Delphi7\Demos\Doc\Graphe x

спасибо, но для зачёта предпочитаю сделать своё, а для расширения своих знаний и умений посмотрю готовые.
Timpi вне форума Ответить с цитированием
Старый 20.10.2007, 18:24   #7
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Цитата:
Сообщение от Timpi Посмотреть сообщение

спасибо, но для зачёта предпочитаю сделать своё, а для расширения своих знаний и умений посмотрю готовые.
Самый правильный ответ из всех возможных... Пять с плюсом!
mihali4 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вопрос наверное про функции, а так точно даже не знаю про что. (Вопрос начинющего #6) Albert2008 Общие вопросы Delphi 4 21.08.2008 15:33
вопрос по сокетам и общение как в ICQ.Сложный вопрос... Руслантус Общие вопросы C/C++ 2 12.08.2008 21:10
TObject *Sender sergei64_89 Общие вопросы C/C++ 1 06.06.2008 13:36
Вопрос о КПК N!ckeL Свободное общение 3 05.06.2008 22:06
Вопрос по VS C++ Arthur Общие вопросы C/C++ 2 19.01.2008 18:34