Cum să eliminați pictograma din tava de sistem

cum să eliminați o pictogramă din tava de sistem

kol-prog în tava a terminat (sau a terminat) locul de muncă, iar pictograma a rămas
(este îndepărtată dacă îl împingeți în ea). Cum să eliminați pictograma programat.






Munca intensă a programelor scurte și a icoanelor în tava este nemeryano-rău.
kol170 delphi5,7 win98

Activ. Dar dacă rămâne, atunci există ceva de genul unei încălcări a accesului la ieșire.

TrayIcon.Activate: = False; Nu se potrivește.
Acesta trebuie să fie dintr-un alt proces (program) .Pe acest punct, eu știu doar ce pictograma programului din tree.Soglasen din stânga, care în mod corect, dar sunt usloviya.Vse cu prima mea, dar nu doresc să se adapteze, este necesar să se rapid, mai ales ca programul, lăsând pictograma Uneori se oprește rănile intervalului de timp și a acestui defect






curățați un alt program.
Mulțumită în avans.

Un program extraterestru? Dacă da, spune-mi cum. Sunt oarecum interesat de problema inversă: unele programe destul de inteligente nu știu cum să-și restabilească icoana în tavă atunci când exploratorul cade.

sa dovedit așa
procedura TForm1.Button1Click (expeditor: PObj);
var
# xA0; hWnd. THandle;
# xA0; R. TRect;
# xA0; I. Integer;
începe
# xA0; hWnd: = FindWindow ("Shell_TrayWnd", NIL);
# xA0; hWnd: = FindWindowEx (hWnd, 0, "TrayNotifyWnd", NIL);
# xA0; GetWindowRect (hWnd, R);
# xA0; pentru I: = 1 la R.Right - R.Left nu
# xA0; # xA0; # xA0; SendMessage (hWnd, WM_MOUSEMOVE, 0, I + (R.Bottom - R.Top) div 2 shl 16);
se încheie;

Memorie: 0,72 MB
Durată: 0.071 sec







Articole similare

Trimiteți-le prietenilor: