Code: Alles auswählen
space = 255
*Adresse = AllocateMemory(space)
GetModuleFileName_(0,*Adresse, space)
progname$ = GetFilePart(PeekS(*Adresse))
AddSysTrayIcon(1, WindowID(), ExtractIcon_(0,progname$,0))
Code: Alles auswählen
space = 255
*Adresse = AllocateMemory(space)
GetModuleFileName_(0,*Adresse, space)
progname$ = GetFilePart(PeekS(*Adresse))
AddSysTrayIcon(1, WindowID(), ExtractIcon_(0,progname$,0))