Hogyan tegyük egy ikon a tálcán a Delphi

Tedd az alkalmazás ikonjára a tálca segítségével Delphi nem olyan nehéz feladat. Ez hasznos a menü megjelenítéséhez, valamint, hogy elrejtse a kérelmet, ha van csak egy ikon, amellyel kezelheti az alkalmazást.

Ez különösen hasznos lenne, hogy a programok futnak sokáig felhasználói beavatkozás nélkül (háttér feladatokat, amelyek általában a számítógépen futó egész nap).

Elhelyez egy ikon a tálcán

By the way, hozzon létre egy alkalmazás fut a tálcán ikon meglehetősen egyszerű - csak egy funkciót API Shell_NotifyIcon szükség, hogy ezt a feladatot.

ShellAPI funkció nyilvánították, és a modul azt két paramétert. Az első paraméter - a zászló, amely azt jelzi, hogy az ikon adunk ebben az időben, vagy eltávolítjuk, és a második paraméter egy mutató egy szerkezetet TNotifyIconData. amely információt tárol az ikonra (fogantyú ikonok megjelenítése elemleírásokat ha lebeg az egérmutatót az ikon, a kilincs, hogy üzeneteit egy ikont, és az üzenet típusát kell küldeni az ablak).

Először adja ShellAPI a uses a formában, majd ezeket a sorokat:

Aztán OnCreate eljárás TrayIconData kell inicializálni az adatstruktúra és hívja Shell_NotifyIcon funkciók:

Szél paramétere TrayIconData jelzi ablakban kap üzeneteket a ikon. HICON meghatározza az ikon is megjelenik a tálcán. A mi esetünkben - az alkalmazás ikonjára. szTip tartalmaznak tooltip megjelenítendő szöveget, ha lebeg a kurzort ikon (egyenként legfeljebb 64 karakter). UFlags paraméter készlet a kérelem feldolgozására üzeneteket.

Ha elindítja a projektet most, látni fogja az alkalmazás ikonjára a tálcán, de semmi nem történik, ha rákattint az egérrel.

Ha bezárja az alkalmazást, akkor el kell távolítani a ikont a tálcán:

És végül, hogy mi ikon reagál az egér eseményeket, valamint a pop-up menüben akkor létre kell hozni egy üzenetet kezelő folyamatra, és adjunk hozzá TPopupMenu komponens az űrlapon, és hozzon létre menüpontok benne.

Nos, ez minden! Gyors és egyszerű: van egy csipetnyi, van egy pop-up menü és egy ikon a tálcán.