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

Delphi Sources



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

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #16  
Старый 29.03.2012, 12:14
sandysman sandysman вне форума
Новичок
 
Регистрация: 27.03.2012
Сообщения: 60
Репутация: 10
По умолчанию

У меня ноль понимания куда их вставлять, пробовал перед private ругается в саму прогу тоже, в справочнике делфи не нашел про них ниче, как ими пользоваться?
Ответить с цитированием
  #17  
Старый 29.03.2012, 12:56
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

вставить в private и нажать Ctrl+Shift+C

добавлено позже
в справке все есть: message (directive)
__________________
Пишу программы за еду.
__________________

Последний раз редактировалось NumLock, 29.03.2012 в 13:12.
Ответить с цитированием
Этот пользователь сказал Спасибо NumLock за это полезное сообщение:
sandysman (29.03.2012)
  #18  
Старый 29.03.2012, 13:13
sandysman sandysman вне форума
Новичок
 
Регистрация: 27.03.2012
Сообщения: 60
Репутация: 10
По умолчанию

С этим я уже разобрался, но щелчок мыши определяется только по если я по форме щелкаю, с треком не получается, пытался поставить условие когда мышь на попадает на трэкбар то выводится сообщение в лэйбл, но пока без результатно.
Ответить с цитированием
  #19  
Старый 29.03.2012, 13:30
Аватар для YVitaliy
YVitaliy YVitaliy вне форума
Местный
 
Регистрация: 14.12.2011
Сообщения: 481
Версия Delphi: Borland Delphi7
Репутация: 17
По умолчанию

А почему не подошел мой вариант с добавлением ссответствующих свойств к трэкбару?
Вложения
Тип файла: rar TTrackBar.rar (2.3 Кбайт, 3 просмотров)
Ответить с цитированием
Этот пользователь сказал Спасибо YVitaliy за это полезное сообщение:
sandysman (29.03.2012)
  #20  
Старый 29.03.2012, 13:54
sandysman sandysman вне форума
Новичок
 
Регистрация: 27.03.2012
Сообщения: 60
Репутация: 10
Радость

Цитата:
Сообщение от YVitaliy
А почему не подошел мой вариант с добавлением ссответствующих свойств к трэкбару?
он
он подошел все по норме, просто когда я передвигаю трекбар, или щелкаю чтобы он передвинулся музыка прерывается, вот я и подумал разделить твою подсказку. Ее выполнять на нажатие мыши, а на отпуск клавиши проигрывать песню, вот мне и показались не плохим вариантом эти процедуры для реализации.
Ответить с цитированием
  #21  
Старый 29.03.2012, 14:06
sandysman sandysman вне форума
Новичок
 
Регистрация: 27.03.2012
Сообщения: 60
Репутация: 10
По умолчанию

Цитата:
Сообщение от YVitaliy
Тогда просто добавь это свойство ему. Или создай аналогичный сласс:
Код:
type
 TTrackBar=class(ComCtrls.TTrackBar)
 private
 public
    property OnMouseDown;
    property OnMouseUp;
 end;
Правда, возможно, процедуру TrackBar1MouseDown придется создавать вручную, и в конструкторе формы прописывать
Код:
TrackBar1.OnMouseDown:=TrackBar1MouseDown;
Или внести соответствующие коррективы в файл .dfm
Я запутался, типо вот таким макаром можно можно к объектам прибавлять свойства, ну к примеру если в trackbar нету muosedown можно это событие создать и он будет его распознавать? но ведь не достаточно просто написать mousedown, получается что в самой процедуре все равно надо будет писать какие-нибудь условия прежде чем вставлять координаты globalpos и localpos которые были в примере?
Ответить с цитированием
  #22  
Старый 29.03.2012, 14:11
Аватар для YVitaliy
YVitaliy YVitaliy вне форума
Местный
 
Регистрация: 14.12.2011
Сообщения: 481
Версия Delphi: Borland Delphi7
Репутация: 17
По умолчанию

TTrackBar является потомком типа TWinControl, а в нем все эти методы прописаны. Просто разработчики подумали, что для трэкбара эти свойства лишние, вот и не добавили их ему. А так, трэкбар наследует большинство свойств от родителя - TWinControl. Ты лучше скачай мой пример в последнем моем посте. Установи компонент, он появится во вкладке Samples.
Ответить с цитированием
Этот пользователь сказал Спасибо YVitaliy за это полезное сообщение:
sandysman (29.03.2012)
  #23  
Старый 29.03.2012, 19:37
sandysman sandysman вне форума
Новичок
 
Регистрация: 27.03.2012
Сообщения: 60
Репутация: 10
Радость

Это все просто супер, работает) такие бы штуки самому писать)
Ответить с цитированием
  #24  
Старый 30.03.2012, 06:46
sandysman sandysman вне форума
Новичок
 
Регистрация: 27.03.2012
Сообщения: 60
Репутация: 10
По умолчанию

А кто-нибудь может подсказать, графическое исполенение проги лучше делать через canvas или с начало рисовать картинки, а потом их использовать в виде кнопок, прокрутки трэка и т.д. Или можно где-нибудь просто качать скины готовые, или есть прога через которую удобно реализовать скин или анимацию кнопки и потом легко их внедрить в delphi7?
Ответить с цитированием
  #25  
Старый 30.03.2012, 08:19
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

редактор изображений:
c:\WINDOWS\system32\mspaint.exe
или можно сразу файл-ресурс создать:
c:\Program Files\Borland\Delphi7\Bin\imagedit.exe
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Этот пользователь сказал Спасибо NumLock за это полезное сообщение:
sandysman (30.03.2012)
  #26  
Старый 30.03.2012, 09:17
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

готовые скины – alphaskins
Ответить с цитированием
Этот пользователь сказал Спасибо Pyro за это полезное сообщение:
sandysman (30.03.2012)
  #27  
Старый 02.04.2012, 05:32
sandysman sandysman вне форума
Новичок
 
Регистрация: 27.03.2012
Сообщения: 60
Репутация: 10
По умолчанию

Можно ли через канву закрасить поле TRACKbar??
Ответить с цитированием
  #28  
Старый 02.04.2012, 18:42
Аватар для cotseec
cotseec cotseec вне форума
Активный
 
Регистрация: 16.07.2008
Сообщения: 353
Версия Delphi: D7,TDE06,RAD09
Репутация: 1443
По умолчанию

изменить что-то в TrackBar'e (нарисовать, поменять цвет отдельного элемента, его форму и т.д.) можно по обработке события WM_NOTFY (точнее команды NM_CUSTOMDRAW), вариант как это провернуть можно посмотреть в моем вопросе здесь на форуме, для закраски поля (если имеется в виду "основа" TrackBar'а - то, на чем находится шкала, по которой бегает ползунок) отправная точка обработка сообщения WM_ERASEBKGND (хотя никто не мешает совместить отрисовку канала и поля - но это как более простой, но менее "правильный" путь)

Последний раз редактировалось cotseec, 02.04.2012 в 18:44.
Ответить с цитированием
Этот пользователь сказал Спасибо cotseec за это полезное сообщение:
sandysman (03.04.2012)
  #29  
Старый 03.04.2012, 09:17
sandysman sandysman вне форума
Новичок
 
Регистрация: 27.03.2012
Сообщения: 60
Репутация: 10
По умолчанию

Цитата:
Сообщение от cotseec
изменить что-то в TrackBar'e (нарисовать, поменять цвет отдельного элемента, его форму и т.д.) можно по обработке события WM_NOTFY (точнее команды NM_CUSTOMDRAW), вариант как это провернуть можно посмотреть в моем вопросе здесь на форуме, для закраски поля (если имеется в виду "основа" TrackBar'а - то, на чем находится шкала, по которой бегает ползунок) отправная точка обработка сообщения WM_ERASEBKGND (хотя никто не мешает совместить отрисовку канала и поля - но это как более простой, но менее "правильный" путь)

а где можно по больше посмотреть про событие wm_notfy?, в учебниках как-то все сжато
Ответить с цитированием
  #30  
Старый 03.04.2012, 20:54
Аватар для cotseec
cotseec cotseec вне форума
Активный
 
Регистрация: 16.07.2008
Сообщения: 353
Версия Delphi: D7,TDE06,RAD09
Репутация: 1443
По умолчанию

первоисточник, русскоязычный вариант и великий и могучий
Ответить с цитированием
Этот пользователь сказал Спасибо cotseec за это полезное сообщение:
sandysman (04.04.2012)
Ответ


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

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

ВКонтакте   Facebook   Twitter