Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Встроить компонент в чужую форму / 4 сообщений из 4, страница 1 из 1
12.12.2010, 10:35
    #37009578
Служу россии
Служу россии
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Встроить компонент в чужую форму
Имеется сторонее окно.
имеется кнопочка.
как можно встроить в это окно свою кнопку?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.12.2010, 10:49
    #37009590
timtim
timtim
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Встроить компонент в чужую форму
например используя
Код: plaintext
1.
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.12.2010, 11:52
    #37015433
Служу россии
Служу россии
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Встроить компонент в чужую форму
Спасибо. получается.
вот только появилась другая проблема.

имеется Usercontrol
создаю его динамически.
помещаю на форму..
и вот проблема SetParent не срабатывает на него, хотя на кнопки и прочую чуш работает.

код примерно следующий
Код: plaintext
1.
2.
3.
4.
5.
6.
'hwnd1 - найденое окно
Dim uc as Usercontrol1
set uc = Controls.add("Проект1.Usercontrol1","uc",form1)
uc.visable=true
setparent(uc.hwnd,hwnd1)
что я делаю не так?(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.12.2010, 12:28
    #37015538
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Встроить компонент в чужую форму
Служу россиичто я делаю не так?(
скобки в сетпарент и визабле вместо визибле
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Встроить компонент в чужую форму / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]