Страница: 1 |
Может я чего не понял? Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long 'Это в модуле формы Private Sub MDIForm_Load() За это спасибо! Но меня больше интересует как сделать чтобы у меня работало 1. showdialog ( вызывалось модальное окно) 2. не делался вызов дважды одной формы Ты просто один паблик дим сделай: Всмысле Public OpenOnce as Boolean А потом... в МДАЙ form_load или frmMDI.Show vbModal , frmMain Millenium а более подробно можно. Страница: 1 |
Вопрос: создание mdi приложений
Добавлено: 22.01.03 13:30
Автор вопроса: NEZNAYKA | ICQ: 158275909
Здравствуйте! Подскажите пожалуйста для начинающего программиста как создавать mdi приложения или хотя бы ссылки на статьи по этой теме. Может с кем то можно пообщаться на эту тему через ICQ или Mail. Буду очень благодарен. ICQ:158275909 mail: sergey_zp@mail.zp.ua
Ответы
Всего ответов: 4
Номер ответа: 1
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #1
Добавлено: 23.01.03 05:52
===
Можно воспользоваться стандартными средствами
Создаёшь MDI и SDI формы.
В SDI форме свойство MDIChild=True
Для перехода к окну свойств кликни на форме и нажми F4.
===
Или можно воспользоваться API-функцией SetParent
Здесь не забудь MDI форму сделать стартовой.
Для этого в меню "Проект" выбери "Project1 Параметры..."
И в падающем списке "Запускаемый Объект:" выбери MDIForm1
SetParent Form1.hWnd, MDIForm1.hWnd
Form1.Show
End Sub
Номер ответа: 2
Автор ответа:
NEZNAYKA
ICQ: 158275909
Вопросов: 5
Ответов: 17
Профиль | | #2
Добавлено: 23.01.03 19:03
Номер ответа: 3
Автор ответа:
Millenium
ICQ: 629966
Вопросов: 118
Ответов: 903
Web-сайт:
Профиль | | #3
Добавлено: 09.02.03 16:18
OpenOnce=False
Номер ответа: 4
Автор ответа:
NEZNAYKA
ICQ: 158275909
Вопросов: 5
Ответов: 17
Профиль | | #4
Добавлено: 10.02.03 19:01