- Код: Выделить всё
Unload frmStart
DoEvents
FormGeneral.Show
Для второго окна стоит свойство
- Код: Выделить всё
ShowInTaskBar=True.
Если я делаю точку останова на открытии окна, а затем продолжаю - то все отображается нормально.
Unload frmStart
DoEvents
FormGeneral.Show
ShowInTaskBar=True.
d3drm писал(а):поставь DoEvents также после FormGeneral.Show
Do While (Timer < Start + 0.005)
DoEvents
Loop
FormGeneral.oMSComm.PortOpen = True
Сейчас этот форум просматривают: AhrefsBot, Google-бот и гости: 87