|
|
|
| Проблема в следующем. Не такой уж я и писака, потому и кучи ошибок в кодах, на которые я из-за лени не вешаю обработчик...
Ну, для себя делаю мульку, не юзьверям, вот и не заморачиваюсь.
Вопрос в чем, как обойти следующую ошибку, что и где надоть написать, шобы не ругалося:
Есть форма, с подчиненной формой, на ресайзинг повешен следующий примитивный кодец:
Private Sub Form_Resize()
Me.Sfrm_Messeg.Width = Me.WindowWidth - 250
Me.Sfrm_Messeg.Height = Me.WindowHeight - 1350
End Sub
Ну, в общем, мол при изменении размеров основной формы, изменяется размер и подчиненной.
но вот трабла, при сворачивании окна, не прилично матюгается, типа того, что мол: энтот елемент управления или подчиненная хформа НУ УЖ НИ КАК не могут быть размещенны в энтом месте....
Шо куда воткнуть в коде, чтобы обойти эту траблу.
Спасибы. | |
|
| |
|
|
|
|
Private Sub Form_Resize()
On error goto err1
Me.Sfrm_Messeg.Width = Me.WindowWidth - 250
Me.Sfrm_Messeg.Height = Me.WindowHeight - 1350
exit sub
err1:
'msgbox err.description - это закомментируем
err.clear 'вместо обрвботки - очистим ошибку
End Sub
|
Типа не обрабатывать ошибку. Но куда у тебя все переместиться - тут уж извини. | |
|
| |
|
|
|
|
Типа не обрабатывать ошибку. Но куда у тебя все переместиться - тут уж извини.
|
ага, проверил, работает чудесно, ни куда ни чего не перемещается, всё возвращается на круги своя...
Спасибки агромные. | |
|
| |
|