[Delphi] Tray

0

Hej !

Czy mozecie mi pomoc z prawidlowym zapisem:
If ikona w tray'u:=ikona.ico then
begin
.....
end;

0

Korzystasz z jakiegoś komponentu?

0

Nie wiem do końca oco ci chodzi. A to if prędzej by tak wygladało:
if ikonawtrayu='icona.ico' then
begin

end;

0

hmmm korzystam z komponentu CoolTrayIcon, a chodzi mi o poprawne zapisanie czegos takiego:

ze jezeli w trayu znajduje sie ikona o nazwie np. ikona.ico to wtedy program niech wykona jakies tam zadanie !

0

Jeżeli do Traya wrzucasz różne ikony w zależności od jakiegoś warunku, to za każdym razem, jak zmieniasz ikonę, zapisuj do zmiennej pomocniczej jakąś wartoś (liczby od 1 do ileś odpowiadające ikonom). Potem tylko:

if IndexIkonyWTrayu = 5 //to jest ta zmienna
then RobCosTam

0

Ok. Wrzucasz na foremke TImageList i teraz ładujesz tam ikony
NP: blabla.ico i iii.ico
i teraz:
if Form1.CoolTrayIcon1.IconIndex=0 then // Czyli ikona 0 w TImageList to blabla.ico ikona 1 to iii.ico itd..
begin
......
end;

Tylko w CoolTrayIcon1 właściwość IconList ustaw na ImageList1. :-)

1 użytkowników online, w tym zalogowanych: 0, gości: 1