Здравствуйте, shmelina, Вы писали:

[Skip]

S>Показывается окно так:
S> ShowWindow(Form.Handle, SW_SHOWNOACTIVATE);
S> Form.Visible := True;

S>Первый показ происходит правильно, остальные — нет. Эксперименты с использование метода тыка не помогли.

Заменяем сие на это:

  SetWindowPos (Form.Handle, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE or SWP_NOACTIVATE or SWP_SHOWWINDOW);
  Form.Visible := True;