Menu Tray

Pedros
2002-06-08 13:51
Pedros
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

Pozostało 580 znaków

ReNe
2002-06-08 14:30
ReNe
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;

Pozostało 580 znaków

Pedros
2002-06-08 14:34
Pedros
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

Pozostało 580 znaków

ozyrys
2002-06-08 15:00
ozyrys
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

Pozostało 580 znaków

Pedros
2002-06-08 15:23
Pedros
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

Pozostało 580 znaków

ozyrys
2002-06-08 15:42
ozyrys
0

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

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

Pozostało 580 znaków

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