ďťż

sunsetting

photo

Kiedyś miałem fajny kawałek kodu który zapisywał mi do memo nazwy wszystkich otwartych okien. Niestety nie mogę tego znaleźć. Może mógłby ktoś pomóc? Robię trojana i potrzebuje to bo chcę zrobić opcję wyłączenia procesów, ale najpierw chciałbym wiedzieć co jest otwarte. I moglbym np. zobaczyć czy jakaś strona jest otwarta i zrobić zrzut ekranu

http://delphi.cartall.com.pl/frames.htm

Cytat: Jak zrobić listę otwartych okien w Windows?

Oto przykładowy kod wykorzystujący funkcje WinAPI:

function EnumWindowsProc(WHandle: HWND; LParM: LParam): Boolean;StdCall;Export;
var Title,ClassName:array[0..128] of char;
sTitle,sClass,Linia:STRING ;
begin
Result:=True;
GetWindowText(wHandle, Title,128);
GetClassName(wHandle, ClassName,128);
sTitle:=Title;
sClass:=ClassName;
if IsWindowVisible(wHandle) then
begin
Linia:=sTitle+' '+sClass+' '+IntToHex(wHandle,4);
Form1.Listbox1.Items.Add(Linia);
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
EnumWindows(@EnumWindowsProc,0);
end;

Na formie powinien być komponent typu TListBox. Zostanie on wypełniony listą aktywnych okien.

Źródło informacji: Sławomir Świder
Dzieki. Strona tez sie przyda
  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • kazimierz.htw.pl