Popup stopper

Tags:    delphi

<< < 12 > >>
Hej. Jeg har lavet et program, der stopper popups nemt og sikkert, men jeg mangler lige en ting... Og det er at når man minimerer programmet skal den ligge nede ved uret sammen med f.eks. messenger og winamp ikonerne.

Hvordan gør jeg det og skal jeg bruge en dll?



Besøg: http://www.interflare.tk



13 svar postet i denne tråd vises herunder
2 indlæg har modtaget i alt 2 karma
Sorter efter stemmer Sorter efter dato
Du kan bruge cool tray icon. Sæt propertien minimize to tray til true!

http://torry.net/vcl/system/trayicons/trayicon.zip



-------------------------------------------------------
Jonas (Decko)
http://www.growyourownshit.com/users/Decko
-------------------------------------------------------



Den 07-05-04 22:47 skrev Jonas (Decko) følgende:
-----------------------------------------------------------------------------
Shafh...det er nemere at bruge cool tray icon.






-------------------------------------------------------
Jonas (Decko)
http://www.growyourownshit.com/users/Decko
-------------------------------------------------------
--------------------------------------------------------------------------


Kan du så ikke lige ligge koden ud her? Ellers skal vi alle, ind finde alt det der ikke er normalt skilme det fra hendanden og lave det.


Og hvorfor er din hjemmeside enlig en banan frukt side? Bare nyskerrig? :D :P



Theis F. Hinz
(Shafh)
Theisf@stofanet.dk


E = MC2

[Redigeret d. 08/05-04 17:46:19 af Shafh]

[Redigeret d. 08/05-04 17:46:41 af Shafh]



Det virker ikke..
Kan det skyldes at jeg kører uregistreret i mit Delphi?

(Jeg kan heller ikke installere Indy komponenterne)


Besøg: http://www.interflare.tk



uses
..., ShellAPI;

const
WM_ICONTRAY = WM_USER + 1; // User-defined message

type
...

var
...
NotifyIconData : TNotifyIconData;

implementation

procedure TForm1.FormCreate(Sender: TObject);
begin
with NotifyIconData do begin
hIcon := Icon.Handle;
StrPCopy(szTip, Application.Title);
Wnd := Handle;
uCallbackMessage := WM_ICONTRAY;
uID := 1;
uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;
cbSize := sizeof(TNotifyIconData);
end;
Shell_NotifyIcon(NIM_ADD, @NotifyIconData);
end;



Det virker ikke..
Kan det skyldes at jeg kører uregistreret i mit Delphi?

(Jeg kan heller ikke installere Indy komponenterne)


Besøg: http://www.interflare.tk


Hvilken version af delphi har du???





-------------------------------------------------------
Jonas (Decko)
http://www.growyourownshit.com/users/Decko
-------------------------------------------------------



Hasan.
Kan du forklare hvordan at man får et ikon frem. Den kode, får bare den til at lave et usynligt... Øv. Og hvordan gør jeg sådan at hvis jeg klikker starter det...
Og hvordan, at jeg kan havde det kørende der nede når jeg lukker formen?




Theis F. Hinz
(Shafh)
Theisf@stofanet.dk


E = MC2



Shafh...det er nemere at bruge cool tray icon.






-------------------------------------------------------
Jonas (Decko)
http://www.growyourownshit.com/users/Decko
-------------------------------------------------------




Og hvorfor er din hjemmeside enlig en banan frukt side? Bare nyskerrig? :D :P



Theis F. Hinz
(Shafh)
Theisf@stofanet.dk


E = MC2


Det er blandt andet hamp planter..ikke bananer!






-------------------------------------------------------
Jonas (Decko)
http://www.growyourownshit.com/users/Decko
-------------------------------------------------------



[quete] Hvilken version af delphi har du???

Jeg bruger 7.

Besøg: http://www.interflare.tk



[quete] Hvilken version af delphi har du???

Jeg bruger 7.

Besøg: http://www.interflare.tk


7 Personal???




-------------------------------------------------------
Jonas (Decko)
http://www.growyourownshit.com/users/Decko
-------------------------------------------------------



<< < 12 > >>
t