| Вопрос: Код в форму | Добавлено: 22.12.03 01:21 |
Автор вопроса:  cresta
|
|
Есть форма frm1. В рантайм создается форма frmCopy: Dim frmCopy as Form Set frmCopy=New Frm1 frmCopy.Show Такой вопрос: Можно ли средствами VB или API добавить код в frmCopy, такой, которого нет в frm1? Ну к примеру: Public Sub Snd() Beep End Sub Или доступен только код frm1? Заранее спасибо за совет. |
| Ответы | Всего ответов: 13 |
|
Номер ответа: 1 Автор ответа:  Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #1 | Добавлено: 22.12.03 01:31 |
|
Можно, наверно, написать код и в frm1, но сделать его недоступным, если он вызывается не в копии... |
||
|
Номер ответа: 2 Автор ответа: crestaВопросов: 117 Ответов: 1538 |
Профиль | | #2 | Добавлено: 22.12.03 02:22 |
| Недоступным для просмотра или для исполнения? | ||
|
Номер ответа: 3 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #3 | Добавлено: 22.12.03 15:36 |
|
Конечно, для исполнения, при чем здесь просмотр? Что-то вроде: Dim frmCopy as Form Set frmCopy=New Frm1 frmCopy.Tag="1" frmCopy.Show Public Sub Snd() If frmCopy.Tag="1" Then Beep End If End Sub |
||
|
Номер ответа: 4 Автор ответа:  Cooller Вопросов: 10 Ответов: 28 |
Профиль | | #4 | Добавлено: 23.12.03 01:59 |
|
Комманда какая-то была в VB которая исполняла код(т.е. допустим A$="beep") Комманда A$ и динамик пищит пииииииип |
||
|
Номер ответа: 5 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #5 | Добавлено: 23.12.03 06:00 |
|
Это что за диво такое? :O Все, что могу вспомнить из этой области - DRAW из QB с его VARPTR, но там DRAW было интерпретатором... |
||
|
Номер ответа: 6 Автор ответа:  CyRax  Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #6 | Добавлено: 23.12.03 06:33 |
| Что то типа CallByName | ||
|
Номер ответа: 7 Автор ответа:  CyRax Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #7 | Добавлено: 23.12.03 06:37 |
| Как сделать что-бы показывало онлайн в ICQ? | ||
|
Номер ответа: 8 Автор ответа: crestaВопросов: 117 Ответов: 1538 |
Профиль | | #8 | Добавлено: 23.12.03 15:15 |
| frmCopy.Tag="1" возможно и выход, но всё-таки, как можно вписать код в рантайм? Чтобы недоступно было и для просмотра тоже | ||
|
Номер ответа: 9 Автор ответа:  АлександрРазработчик Offline Client ICQ: 204034 Вопросов: 106 Ответов: 1919 |
Профиль | | #9 | Добавлено: 23.12.03 18:14 |
|
cresta, ты поищи в архиве рассылок код. Там было что-то типа: пишешь комманды VB в текстовом файле и пускаешь его на исполнение... Извини если что не сказал или не упомянул... |
||
|
Номер ответа: 10 Автор ответа: crestaВопросов: 117 Ответов: 1538 |
Профиль | | #10 | Добавлено: 23.12.03 20:50 |
| Понял, спасибо! | ||
|
Номер ответа: 11 Автор ответа:  crestaВопросов: 117 Ответов: 1538 |
Профиль | | #11 | Добавлено: 23.12.03 22:55 |
Посмотрел первые 50 топиков - чить не умер, еле жив остался. Ну что стоило при компиляции справки поставить галочку FullTextSearch ???? А код так и не нашел
|
||
|
Номер ответа: 12 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #12 | Добавлено: 24.12.03 14:43 |
|
Cresta, я в создании CHM не сильно разбираюсь, подскажи, где эта галка.. |
||
|
Номер ответа: 13 Автор ответа: crestaВопросов: 117 Ответов: 1538 |
Профиль | | #13 | Добавлено: 24.12.03 20:35 |
HTML Help WorkShop - закладка Project(это где 4 закладки-Project,Contents,Index,Help). Далее Change Project Options(верхняя кнопка на тулбаре слева). Выскакивает окно Options c четырьмя закладками(General,Files,Compiler,Merge Files) - закладка Compiler. Далее на этой закладке второй снизу чекбокс - Compile full-text search Information. Пометил его и вперед, компилировать. Можно и готовую справку сделать Decompile, установить галочку и снова Compile. И в файле .chm появится закладка поиск. Я так и сделал, но это когда всю справку просмотрел и ничего не нашел  . А потом и с поиском ещё раз ничего не нашел. Кайф!!!
|
||
Страница: 1 |