Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Systray sample problem
Message
De
01/04/2003 14:50:55
 
 
À
28/03/2003 21:07:09
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00770935
Message ID:
00772622
Vues:
17
Resource files residing where the EXE is located:
1. VFP8RENU.dll
2. VFP8R.dll
3. GDIPLUS.dll
4. FOXTOOLS.fll

The menu does not popup when the icon in the systray is clicked/dblclicked/rclicked. I have no problem testing the EXE on my Win2K Pro machine. I followed the sample line by line. The main program is as follows:
set classlib to frameworkclass
set classlib to systray additive

oSysTrayMonitor = createobject('systraymonitor') && frameworkclass

oSysTray = newobject('systray','systray.vcx')
oSysTray.IconFile = 'SysTray.ico'
oSysTray.TipText  = 'SysTray Test'
oSysTray.MenuText = 'systray.mpr'
oSysTray.MenuTextIsMPR = .t.
oSysTray.AddIconToSystray()
read events

*-- systray.mpr snippet
DEFINE POPUP shortcut SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF shortcut PROMPT "Open Systray Monitor"
DEFINE BAR 2 OF shortcut PROMPT "\-"
DEFINE BAR 3 OF shortcut PROMPT "E\<xit"
ON SELECTION BAR 1 OF shortcut oSysTrayMonitor.ShowMonitor()
ON SELECTION BAR 3 OF shortcut clear events
>What kind of problem? Please be as detailed as possible, since I don't have Citrix Metaframe here to test on.
>
>-Tom
>
>
>
>This post is provided "AS-IS" with no warranties, and confers no rights.
ramil
~~ learning to stand still
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform