var Wnd: THandle;
...
Wnd:=FindWindow(nil,'TextFile');
if Wnd=0 then
WinExec(PChar(CDir+'\TextMemo.exe'),SW_SHOWNORMAL)
else
ShowWindow(Wnd,SW_SHOWDEFAULT)
Идейно, этот кусок должен запрещать повторный вызов из текущей программы внешнего приложения TextMemo.exe, а если оно уже запущено — разворачивать его окно в исходное состояние.
В целом, все так и получается. Одно "но": если приложение TextMemo.exe было на момент вызова функции ShowWindow минимизировано, то оно сначала разворачивается, но потом перестает реагировать на кнопку минимизации ВООБЩЕ.
Не подскажите ли, в чем тут может быть дело? Заранее спасибо.