|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
04.01.2012, 22:41 | #1 |
Форумчанин
Регистрация: 05.12.2011
Сообщений: 102
|
нестандартная кнопка
Можно ли создать не квадратную или прямоугольную кнопку а 6-ти угольную например? в Delphi
Последний раз редактировалось Devolarium; 04.01.2012 в 22:51. |
05.01.2012, 03:04 | #2 |
Веб-дизайнер
Форумчанин
Регистрация: 11.08.2011
Сообщений: 305
|
Встречал такое с помощью дополнительных компонентов. В теории можно, могу посоветовать разобраться с прорисовкой компонента rkSmartTabs (вкладки хрома). Хороший пример как нарисовать нестандартную форму и обработать ее события.
|
05.01.2012, 08:05 | #3 |
Форумчанин
Регистрация: 23.08.2011
Сообщений: 171
|
Я вообще делал так. Ставил компонент TImage, загружал в него картинку нашей кнопки, а потом проверял координаты щелчка мышкой у пользователя (Если координаты мышки в момент щелчка принадлежат к "Image'вой кнопке", то значит делаем нужные действия), в итоге получалась вполне рабочая кнопка
Каждый день узнаю новое...
|
05.01.2012, 12:48 | #4 |
instagram
Участник клуба
Регистрация: 24.05.2008
Сообщений: 1,451
|
HexButton
|
05.01.2012, 13:52 | #5 |
Пользователь
Регистрация: 03.03.2010
Сообщений: 89
|
Нехочется плодить новую тему про кнопки, поэтому решил спросить здесь.
Интересует вот такой вопросик. Как бы реализовать увеличение, либо уменьшение значения по такому алгоритму. Допустим юзер нажал на кнопку и отпустил - значение увеличилось. Но если он её удерживает нажатой то значение постоянно увеличивается. Пример в принципе не интересует, просто в теории нужна реализация. |
05.01.2012, 16:35 | #6 |
Форумчанин
Регистрация: 05.12.2011
Сообщений: 102
|
beegl при запуске hexbutton ошибка вылетает(
|
05.01.2012, 16:43 | #7 |
Форумчанин
Регистрация: 05.12.2011
Сообщений: 102
|
Anton911 можешь небольшой пример кода дать, как отлавливать место куда тыкнул пользователь на картинке
|
05.01.2012, 20:03 | #8 |
Далеко не
Участник клуба
Регистрация: 11.08.2011
Сообщений: 1,512
|
procedure Tfrm.fonMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);/////x,y и ест координаты "тыка" begin shiwmessage('По горизонтали: '+inttostr(x)+'По вертикали: '+inttostr(y)); end; Последний раз редактировалось Кольша; 05.01.2012 в 20:06. Причина: _|_ |
05.01.2012, 22:07 | #9 | |
Пользователь
Регистрация: 03.03.2010
Сообщений: 89
|
Цитата:
|
|
06.01.2012, 17:50 | #10 | |
Форумчанин
Регистрация: 23.08.2011
Сообщений: 171
|
Цитата:
Глобальная переменная: Код:
Код:
Код:
Но эта функция была подстроена под мои координаты, вы можете сами переделать функцию под свои нужды. Код:
Код:
Код:
Каждый день узнаю новое...
Последний раз редактировалось Anton911; 06.01.2012 в 18:06. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Нестандартная гистограмма | MaxxVer | Microsoft Office Excel | 5 | 17.11.2011 11:11 |
Нестандартная форма | ZvEr_HaCkEr | Общие вопросы Delphi | 16 | 27.08.2010 05:17 |
Нестандартная сортировка | DJOV | Microsoft Office Excel | 5 | 10.09.2009 01:17 |
Нестандартная авторизация | krot98 | Работа с сетью в Delphi | 7 | 09.12.2008 22:09 |
Нестандартная форма | Лубышев | Общие вопросы Delphi | 7 | 28.01.2008 20:33 |