← →Romul
(2002-02-14 13:22)
[2]
begin
Hndl:=FindWindow(nil, "Prog");
if Hndl=0 then WinExec(PChar("C:\Project1.exe"), sw_ShowNormal);
if Hndl<>0 then
begin
if IsIconic(Hndl) then
ShowWindow(Hndl, SW_SHOWNORMAL)
else
BringWindowToTop(Hndl);
end;
end;Вот этот кусок делает следующее (при нажатии на Button из некой проги), если другая программа не загружена, то загружает ее, далее, если она не свернута, то переносит ее на передний план, а если свернута, то первая форма из которой должна вторая прога открываться просто теряет фокус, и никакого развертывания из таскбара не происходит. Может я чего не правильно делаю?
Как проверить свернуто ли окно Найти похожие ветки
← →