Autor Beitrag
Flamefire
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 1207
Erhaltene Danke: 31

Win 10
Delphi 2009 Pro, C++ (Visual Studio)
BeitragVerfasst: Do 13.09.07 16:11 
Ich versuche das Fenster einer fremden Anwendung auszublenden.
Gegeben ist die PID, die mit dieser Fkt. in ein FensterHandle umgewandelt werden sollte:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
function GetWindowPID(sPID:Cardinal):HWND;
var nexthandle:HWND;
    pid:Cardinal;
begin
  result:=0;
  NextHandle:=GetWindow(Application.Handle,GW_HWNDFIRST);
  While NextHandle > 0 do begin
    GetWindowThreadProcessId(NextHandle,@pid);
    if(sPID=pid) then begin
      result:=NextHandle;
      break;
    end;
    NextHandle:=GetWindow(NextHandle,GW_HWNDNEXT);
  end;
end;

und mit der fkt wird das fenster versteckt:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
function mhidewindow(Handle:HWND):boolean;
begin
  if(Handle<>0) then begin
    ShowWindow(Handle, SW_HIDE);
    result:=true;
  end else result:=false;
end;


aber es passiert nichs (handles alle ungleich 0)

was mache ich falsch?

edit: ok so geths: man muss vorher testen ob der titel der richtige ist...