| Вопрос: VB6, событие к добавленному программно контролу | Добавлено: 18.09.06 17:06 |
Автор вопроса:  -АлександР- | Web-сайт: sham.clan.su
|
| Ответы | Всего ответов: 39 |
|
Номер ответа: 16 Автор ответа:  LamerOnLine ICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #16 | Добавлено: 21.09.06 11:18 |
|
Нашёл на vbrussians статью про сабкласстнг. Там говорится, что SubClass - это контрол
Ссылку в студию. Занесем в раздел юмора. Нет, с пути ты явно сбился 
2HACKER цитирую аффтара Да load пробовал, хочется чего-то нового попробовать, узнать... вот и решил Add юзать
Выводы делай сам 
|
||
|
Номер ответа: 17 Автор ответа: -АлександР-Вопросов: 55 Ответов: 1008 |
Web-сайт: Профиль | | #17 | Добавлено: 21.09.06 16:52 |
|
Ссылку в студию. Занесем в раздел юмора. Нет, с пути ты явно сбился
2HACKER цитирую аффтара http://www.vbrussian.com/Article.asp?ID=87 Цитирую: Можно сидеть самому отлавливать системные сообщения, но это отсылает нас, нет не туда, куда ты подумал, а в глубины Win32 API, а в этот подвал мне порой лезть неохота. Для этого дела есть более удобная вещь, написанная, кстати, на Visual Basic, а именно элемент управления Subclass (http://www.softcircuits.com) И он действительно там есть, весит 22кб.
|
||
|
Номер ответа: 18 Автор ответа: -АлександР-Вопросов: 55 Ответов: 1008 |
Web-сайт: Профиль | | #18 | Добавлено: 21.09.06 18:49 |
|
А код в 13 посте никто не хочет мне объяснить?
Все сделал - по аналогии, такое ощущение, что он для labelов работает, а для textboxов - нет |
||
|
Номер ответа: 19 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #19 | Добавлено: 21.09.06 21:10 |
|
Выводы делай сам
ясн, ну сорр, вывод аффтару нех делать
|
||
|
Номер ответа: 20 Автор ответа: CyRax  Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #20 | Добавлено: 22.09.06 00:26 |
|
Но код, несмотря обильное наличие комментариев, я не понял: как ты добился события с помощью таймера?
События по таймеру? Гы-гы, низко ты мой талант ценишь
ну сабклассинг это ещё понятно, хотя смутно, что-то от sub и class, а враппер это чё такое?
Ну вообще механизм класса навешивается на механизм системных сервисов и залезть "под" класс означет спуститься в подвал операционной системы и остаться один на один с оконными API
|
||
|
Номер ответа: 21 Автор ответа: CyRax Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #21 | Добавлено: 22.09.06 00:29 |
|
Можно сидеть самому отлавливать системные сообщения, но это отсылает нас, нет не туда, куда ты подумал, а в глубины Win32 API, а в этот подвал мне порой лезть неохота.
Оказывается у этой фразы уже копирайт есть. Не поверите - сам сочинил
спуститься в подвал операционной системы и остаться один на один с оконными API
|
||
|
Номер ответа: 22 Автор ответа: CyRax Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #22 | Добавлено: 22.09.06 00:29 |
|
http://www.vbrussian.com/Article.asp?ID=87
Заношу в радел юмор.
|
||
|
Номер ответа: 23 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #23 | Добавлено: 22.09.06 11:56 |
|
И он действительно там есть, весит 22кб.
Если каким-то горе-аффтарам не хватило фантазии озаглавить свой аццкий криатифф - это же не значит что понятие Subclass ограничивается одним ламерским контролом. На самом деле там все жутко просто. Система тебе упрощает работу - тебе остается только обрабатывать нужные тебе сообщения и передавать их дальше, стандартной оконной процедуре. Примерно так же организуется Apartment поток, только там еще нужно самому организовать цикл выборки сообщений. |
||
|
Номер ответа: 24 Автор ответа: -АлександР-Вопросов: 55 Ответов: 1008 |
Web-сайт: Профиль | | #24 | Добавлено: 22.09.06 20:58 |
|
Ладно с сабклассингом...
Двух зайцев не поймаешь, мне бы хотя бы с враппером, здорово было бы: Private WithEvents DemoTxtBox As TextBox
Простой до безобразия код, но не работает.
Public Property Let MkEqu(DemoTxtBox2 As Object) Set DemoTxtBox = DemoTxtBox2 End Property Sub DemoTxtBox_Change() Form1.Caption = "0" End Sub CyRax, помоги please, ... Что нужно? Dim myTxtBox() As New Vrapper ...'потом myTxtBox(numLab).MkEqu() = textWidt(numLab) Может все-таки нельзя для текстбоксов так делать? |
||
|
Номер ответа: 25 Автор ответа: -АлександР-Вопросов: 55 Ответов: 1008 |
Web-сайт: Профиль | | #25 | Добавлено: 24.09.06 12:00 |
|
Да... Прошу прощения за глупый вопрос. Я разобрался: numLab = numLab + 1
А надо:topLab = topLab + 600 myTxtBox(numLab).MkEqu = textWidt(numLab) topLab = topLab + 600
myTxtBox(numLab).MkEqu = textWidt numLab = numLab + 1 Вот так, из-за одной мелочи не работала вся конструкция. Простите за беспокойство... Спасибо всем за внимание и за помощь, ЛОЛ'у и СуRax'у!
|
||
|
Номер ответа: 26 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #26 | Добавлено: 24.09.06 18:09 |
|
ну блин всамом начале говорил, маасив контролов и не ебб всем мозги, а тут .Add controls и сабклассинг, хорошо что асмовские вставки не предлагали итп ))
|
||
|
Номер ответа: 27 Автор ответа: -АлександР-Вопросов: 55 Ответов: 1008 |
Web-сайт: Профиль | | #27 | Добавлено: 24.09.06 21:28 |
|
ну блин всамом начале говорил, маасив контролов и не ебб всем мозги, а тут .Add controls и сабклассинг, хорошо что асмовские вставки не предлагали итп А чем ты недоволен?
)) |
||
|
Номер ответа: 28 Автор ответа: CyRax Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #28 | Добавлено: 25.09.06 06:34 |
|
А чем ты недоволен?
Посмотри на звёзды. Что важняка не узнал? Раздуваем щёки-с.
|
||
|
Номер ответа: 29 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #29 | Добавлено: 25.09.06 16:16 |
|
http://basicproduction.nm.ru/LblCstm.zip
Тоже из серии "Дело было вечером, делать было нечего..." или ты тоже из тех кто попадает под девиз Не ищем легких путей?
Нет, ну когда делать нечего, действительно, почему мы не показать мускулы ума. Но когда такие варианты приминяются в программах, обычно ни до конца не доводятся... горя от ума это называется.. |
||
|
Номер ответа: 30 Автор ответа: -АлександР-Вопросов: 55 Ответов: 1008 |
Web-сайт: Профиль | | #30 | Добавлено: 25.09.06 16:22 |
| Умник, а как ты по-другому сможешь определить события контрола в модуле класса?... | ||