440 - automation error

[Лёха_Virus]

Здраствуйте!
Возникла такая проблема: при запуске моей программы на вин98 вылазит одноименная ошибка на сроке:

sett.Show , main

хотя под моей МЕ всё пашет

вызывается эта команда из меню popup формы (контекстного меню).

хотя вот такая строка из нового проекта (2 формы и кнопка) ошибки не вызывает:

Form2.Show , Form1

я добавил в проект ещё одну форму и вызываю её вместо формы sett:
Form1.Show , main

- ошибки нет. Что имеем: ошибка вылезает ещё до загрузки формы, но елси форму заменить - ошибки нет... значит всё дело в форме... но как она может вызвать ошибку,если она ещё не загружена???

не подскажете в чём трабл? я уже ничего не понимаю.
спасибо.

[Alexanbar]

Надо посмотреть, какие формы являются модальными. По-моему, если форма модальная, то та, которая из неё вызывается, должна быть модальной.

[Cyrax]

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

[Лёха_Virus]

Вот код формы, хотя ошибка вылезает ещё до выполнения загрузки... наверно форма какая-то не такая? но не модальная вроде

Код: Выделить всё

Private Sub Form_Load()
mainx = main.ScaleX(main.Left, 1, 3)
mainy = main.ScaleY(main.Top, 1, 3)
mainw = main.Width
mainh = main.Height
maintr.Value = maintransp
mainfon.BackColor = main.BackColor

celnumh = hcel
celnumw = wcel

autorunch.Value = autorun

numfonp.BackColor = numfon
numcolp.BackColor = numcol

If numtransp = 1 Then numtrans.Value = 0 Else numtrans.Value = 1
numfontl = numfont

curfonp.BackColor = curfon
curcolp.BackColor = curcol
curfontl = curfont
If curtransp = 1 Then curtrans.Value = 0 Else curtrans.Value = 1

wdfonp.BackColor = wdfon
wdcolp.BackColor = wdcol
If wdtransp = 1 Then wdtrans.Value = 0 Else wdtrans.Value = 1
wdfontl = wdfont
wdvaccol = wdvaccollikevac

vacfonp.BackColor = vacfon
vaccolp.BackColor = vaccol
If vactransp = 1 Then vactrans.Value = 0 Else vactrans.Value = 1
vacfontl = vacfont
End Sub

тут у меня погружаются параметры... ничего особенного в общем. переменные *col и *fon - colorconstants, *font - fontsconstants (если есть дайте на неё описание ), *transp - integer

не понимаю чего такого есть в ме, чего нету в 98 что такие ошибки вылазят...