MDI окна

@nurmizmat · Регистрация: 10.04.2010

Author24 — интернет-сервис помощи студентам

Вот вчера начал работать в VB6.0. Создал MPI - главное окно и дочерние окна. Объясните, плиз, почему при открытии окон в главной форме, они смещаются (вправо и вниз). Мне нужно, чтобы дочерние окна открывались точно внутри главного. Что нужно сделать? И как сделать, чтобы после запуска нельзя было изменять размеры главного окна? Спасибо!

Добавлено через 7 часов 45 минут

Visual Basic

Const WM_NCLBUTTONDOWN = &HA1
Const HTCAPTION = 2
 
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Function ReleaseCapture Lib "user32" () As Long
 
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, x As Single, Y As Single)
Call ReleaseCapture
Call SendMessage(hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0&)
End Sub

код для сдвига формы хватая мышкой за любое место формы.
а как двигать родительскую форму? чтобы при этом дочернее окно двигалось вместе с ним.

@axinfernis · 10.05.2010, 17:33

1 . Чтобы окно открывалась в нутри MDI
В свойствах дочернего окна ну жно установить MDIChild True

2 Чтобы нельзя было изминять размеры окна BorderStyle fixset Single

@nurmizmat · 10.05.2010, 17:56 **[ТС]**

со всеми вопросами разобрался. все работает.

@axinfernis 1411 / 773 / 66 Регистрация: 10.05.2010 Сообщений: 4,264 Записей в блоге: 2
	10.05.2010, 17:33	2
	1 . Чтобы окно открывалась в нутри MDI В свойствах дочернего окна ну жно установить MDIChild True 2 Чтобы нельзя было изминять размеры окна BorderStyle fixset Single 0

@nurmizmat 1 / 1 / 2 Регистрация: 10.04.2010 Сообщений: 36
	10.05.2010, 17:56 [ТС]	3
	со всеми вопросами разобрался. все работает. 0