Hogyan lehet eltávolítani az ikont a tálcán

hogyan kell eltávolítani az ikont a tálcán

kol-prog tálca kész (vagy kész) a munka, és az ikon nem
(Poke távolítható el, ha egerek) hivatkozva eltávolítása szoftver ikonra.
Intenzív munka rövid prog s ikon a tálcán nemeryannom-jó.
kol170 delphi5,7 win98

Aktív. De ha marad, akkor a kimenet valami hasonló a hibaüzenetet.

TrayIcon.Activate: = false; Ez nem alkalmas.
Meg kell lennie egy másik folyamat (program) .A ezen a ponton, csak azt tudom, amit a program ikonjára a bal tree.Soglasen hogy rendesen, de usloviya.Vse én nyers, de nem akar alkalmazkodni, meg kell, hogy gyorsan, különösen a program, így az ikon néha kilép sebek idő hiba és ezt a hibát
Ez tisztítja más prog.
Köszi előre.

Alien Program? Ha igen, mondd el, hogyan. Én most jobban érdekli ez az inverz probléma: néhány nagyon okos szoftver nem képes visszaállítani az ikonját a tálcán őszén a karmester.

ez történt
eljárás TForm1.Button1Click (Sender: PObj);
var
# XA0; HWND. THandle;
# XA0; R. TRect;
# XA0; I. Egész;
kezdődik
# XA0; hwnd: = FindWindow ( "Shell_TrayWnd", nulla);
# XA0; hwnd: = FindWindowEx (hwnd, 0, "TrayNotifyWnd", nulla);
# XA0; GetWindowRect (hwnd, R);
# XA0; I: = 1-től R.Right - R.Left do
# XA0; # XA0; # XA0; SendMessage (hwnd, WM_MOUSEMOVE, 0, I + (R.Bottom - R.Top) div 2 shl 16);
végén;

Memória: 0.72 MB
Idő: 0.071 c

Kapcsolódó cikkek