Menu Tray

0

I stalo sie to juz moj setnu post w koncu w milym towarzystwie i czas szybko leci. Ale mam taki oto problem hmm... : mam komponent CoolTrayIcon i chce aby czasami pokzywala sie ikonka w trayu a czasmi formularz. Mam memo i w OnFormCreate wpisuje cos takiego

memo1.Lines.LoadFormFile('jakis tamplik');
if Memo1.Lines.Strings[0]='tray' then
minimalizuj sie
else
pokaz formularz

Mam nadzieje ze za bardzo nie namieszalem hmm... i znajdzie sie ktos kto mi pomoze :-) --pozdrawiam PEDROS {hello}
Delphi6

0

CoolTrayIcon1.ShowMainForm; *pokazuje
CoolTrayIcon1.HideMainForm; *kryje

jednak żebo zminimalizoowac forme od razu przy uruchamianiu (uruchamianie w trayu) zmień wartość StartMinimized na True

w OnCreate CoolTrayIcon1.StartMinimized:=True;

0

Wiem jak ukryc i pokazac forme ale podczas uruchomienia programu jest to niemozliwe. A gdy wezme start minimized to jak zrobie aby pokazac forme gdy bedzie mi to potrzbne--pozdrawiam PEDROS {hello}
Delphi6

0

Długo głowkowalem ale wymyslilem sposub (troche dziwny ale zawsze ;P) :

Wartosc StartMinimalized w Cooltray'u daj na true

W project soutce daj :
Application.ShowMainForm := false;

Wstaw Timera z intervalem 5 a w procedurze OnTimer daj :
if Memo1.Lines.Strings[0] &lt&gt 'tray' then
CoolTrayIcon1.ShowMainForm;

Wyjasninie : na poczatku forma jest ukryta , po 5ms Timer sprawdza czy w Memo1 pierwsza linijka rozni sie od 'tray' jezeli tak to pokazuje forme...jezeli nie to nic nie robi !

Jak by cos nie dzialalo to pisz !!--Ozyrys Pozdrawiam {hello}
Delphi 6

0

Dzieki Ozyrys. Dziala ten kodzik {brawo} . W sumie to nie bylo takie rudne, wystarczylo wpasc na pomysl. A mi sie nie udalo :( --pozdrawiam PEDROS {hello}
Delphi6

0

Pedros napisał:
.... A mi sie nie udalo :(

Cóż od tego jest właśnie forum :) --Ozyrys Pozdrawiam {hello}
Delphi 6

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