[Форум] [Помощь] [Поиск] [Выйти] |
Добро пожаловать, User |
|
|
| ||
Я наконец-то написал свою собственную прогу. Дал друзьям. (простым людям). Типа посмотреть. ------------- Обкакан с ног до головы! Нет!!! не за то, что плохо работает. ПЛОХО ВЫГЛЯДИТ!!! Типа посмотри какой у нас Виндовоз красивый! Рюшечки, Фенечки, картиночки. Хотим ЯРЧЕ и ЭФФЕКТНЕЕ. Как раз то, чего я так избегал!!! Открыл я свой дельфи 5... С чего начать? Ну, с начала вот что сделать хочу: 1) чтоб при наведении мыши на обьект, например выскакивала рядом картинка, а при убирании мыши с обьекта- ИСЧЕЗАЛА. --- в свойствах обьектов есть такое событие, когда типа курсор ...MOVE по обьекту, тогда событие проискодит. НО КОГДА КУРСОР УХОДИТ С ОБ,ЕКТА, ЭТО НЕ ОБРАБАТЫВАЕТСЯ!!!! И событие невозможно отменить! --- Челом бью! |
| ||
самый тупой и простой способ решения проблемы: повесить прекращение обработки этого события на обработчик события OnMouseMove той формы, на которой лежит объект. |
| ||
Ну! Это я и сам допер %)) Просто если на форме есть МНОГО обьектов, то надо в Форму прописывать КАЖДое такое событие! Это первое! ---------- НО ГЛАВНОЕ! Если мышью дернуть рЕЗКо! И перескочить на другой обьект, то Форма может вообще НИХРЕНА не успеть!!! И обработается стоящая на другом обьекте мышь. и появится ЕЩЕ ода картинка, а та первая не уйдет! ---------- Я таким образом хотел Зажигать свет за кнопкой. Типа навел курсор, а за кнопкой свет засиял %))) Таких кренделей насмотрелся... ----------------- Надо что- то радикальное! |
| ||
проще нада быть))) |
| ||
ДА ЧТО- ЖА ДЕИТЦА! нихто не поможеть? --------------------- МОЖЕТ кто еще какие ЭФФЭКТЫ знаит? Выкладывайте, пожалуйста! |
| ||
убей себя |
| ||
Открыл я свой дельфи 5... С чего начать? Закрой Дельфи, купи книжку, читай книжку. |
| ||
Поставь 7-ю дельфю, или библиотеки оттуда хоть перекинь, там большинство объектов переработано. А вообще я тоже иногда загонялся красотой в программах, могу поделиться опытом. Хотя если пишешь на делфях что-то стоящее и узконаправленное, то все можно полностью написать ручками, мыши вообще не касаясь, получается не 400 Кб и выше :) а максимум 100-150, просто что-то большее писать на API слишком муторно, по крайней мере для меня, потому что я лентяй ужасный. И забей на красоту, если пишешь не для общественности скажем так :) |
| ||
Посмотри: http://www.realcoding.net/article171.html Или ещё так TYourObject = class(TAnyControl) ... private FMouseInPos : Boolean; procedure CMMouseEnter(var AMsg: TMessage); message CM_MOUSEENTER; procedure CMMouseLeave(var AMsg: TMessage); message CM_MOUSELEAVE; ... end; implementation procedure TYourObject.CMMouseEnter(var AMsg: TMessage); begin FMouseInPos := True; Refresh; end; procedure TYourObject.CMMouseLeave(var AMsg: TMessage); begin FMouseInPos := False; Refresh; end; Затем читаешь параметр FMouseInPos при прорисовке области компонента и изменяешь какое-то его свойство например подсвечиваешь... PS. Будут вопросы пиши в моей :))) гостевой http://muson.nm.ru/guest/index.dhtml |
| ||
Спасибо за реакцию. --------------------- Выкладывайте, где слить Дельфи 7. (ближайшее метро от меня находится на расстоянии 5000 км) --------------------- А, что АПИ вещь крутая я уже осознал. А это ШАГ, согласитесь! Пока ковыряюсь с тем что на поверхности плавает :) --------------------- пишите!!!!!! |
| ||
Deadman- респект! Уже слетал по адресам. А твои вирши обязательно поковыряю. ------------------ Gott- а как тебя достать- инфы мало. Тема КРАСОТЫ тебе близка, я понял. |
| ||
У меня все Delphi начиная с 5-ой :)) есть на дисках :)). PS. Отдам на временное пользование :) Тема красоты близка всем ! |
| ||
РЕЕЕЕЕВ толпы!!!!!!!!!!! Зажженые свечи и зажигалки! Красота спасет мир! Как бум перемещать биты в пакетах по 0.75 или где? |
| ||
гы... дети! ;) программы с таким интерфейсом называются идиотскими, поскольку рушат единый стил Windows... |
| ||
Согласен, я сам скины не люблю, это лишняя память, лишние тормоза и вообще... Хотя сам недавно накалякал прожку, отрисовка почти полностью вручную :) |
| ||
Gott! Ты лучче на почту отвечай. А то лазит тут, демагогию разводит. Обещал Delphi7 по аське сливать- давай! Вот я в субботу могу. Целый день могу... ------------- Во че вспомнил- в VB можно прямо на форме рисовать... и прочие эффекты... типа красота. Но это я видел давно, лет 5 назад. VB5. А что может в этом плане Дельфя 7. Не представляю. -------------- Вот тока ненадо про ламеров вспоминать. Я ведь даже не обижусь... сам в курсах... ---------- ВСЕХ СО СТАРЫМ НОВЫМ ГОДОМ!!!!!!!!!------------- УРАААААААААА!!!!!!!!!! |