Jak zrobić aby mój program wykrył pojawienie się nowego okna na pulpicie, i jak na to zareagować.
I tak pewnie nikt nie wie, ale jakby to będę wdzięczny (dozgonnie ?) ;-)
A tak w ogóle to dużo prezętów na Mikołaja. :d
Jak zrobić aby mój program wykrył pojawienie się nowego okna na pulpicie, i jak na to zareagować.
I tak pewnie nikt nie wie, ale jakby to będę wdzięczny (dozgonnie ?) ;-)
A tak w ogóle to dużo prezętów na Mikołaja. :d
wieczorem rzuce ci listning bo teraz czasu nie mam.............
--
kto skasował moje konto????
kto skasował moje konto????
Troche OT ale odpowiem.
Adam kazal zrobic sobie konto na forum takie same jak na 4p z tym samym haslem!
Posluchales?
--
Ozzy jest fajny...
var
Form1: TForm1;
h,i:integer;
x,y,z:integer;
P,w,r:Integer;
implementation
function EnumWindowProc(uchwyt:HWnd;P:Pointer):boolean;stdcall;
var
winname,cname:array[0..144]of char;
begin
result:=true;
if getwindowtext(uchwyt,winname,144)>0 then
begin
if iswindowvisible(uchwyt)=true then
form1.listbox1.items.add(strpas(winname)); //jezeli okno jest widoczne to dodaj do listbox1
if iswindowvisible(uchwyt)=false then // jezeli okno nie jest widoczne to dodaj do listbox2
form1.listbox2.items.add(strpas(winname));
end;
end;
to wszystko trzeba tylko co jakiś czas sprawdzać w pewnych odstępach czasu.........to wszystko [glowa]
--
kto skasował moje konto????