Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Looking for the Calendar control
Message
 
 
À
16/08/2011 12:01:30
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows 7
Network:
Windows 2003 Server
Database:
MS SQL Server
Divers
Thread ID:
01520826
Message ID:
01521098
Vues:
66
>>>>>>We already have Web application developed that has all needed functionality. So, my task now is much simpler. I need to display this web page in a form (I will use WebBrowser control) and I need to be able to intercept the clicks. This I'm not sure how to do, can use some help.
>>>>>
>>>>>http://www.glrsoftware.com/download/download.asp?file=FoxHTML.zip
>>>>
>>>>Can you briefly tell me what is in this class?
>>>
>>>In a nutshell, if I recall correctly.
>>>
>>>The class is a wrapper around the IE object. When a something is clicked (hyperlink or control), a post back occurs. The URL is then sent to the BeforeNavigate event of the IE object. Now, because the url is suffix with a 'VFP:' string you can intercept the post back at the FoxPro level.
>>>Just parse the command you need, preform the VFP action, and upon return the event, set the Cancel parameter to True and exit the event.
>>
>>I've downloaded the class and started with the test form, but it doesn't seem to work correctly. Say, there are links saying they control ListBox, but nothing happens when I click on them.
>
>Try running the Test.prg. At the beginning is the statement SYS(2333), which allow the form to host the ActiveX control. Also, in the Init of the IE control place the statement NODEFAULT. Forget why, but it once needed it.

Do you mean in the Refresh method of the control? In any case, your class has absolutely no code, it only the form that does it. I'll spend few more minutes on it, but I don't think it's something I can use.

The links with @@ are not recognised by VFP, e.g. the BeforeNavigate2 event simply doesn't happen.
If it's not broken, fix it until it is.


My Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform