Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How do I reopen an SCX file.
Message
De
04/11/1998 18:31:23
George Lee
Microcomputer Engineering Services, Llc
Huntington Beach, Californie, États-Unis
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00151660
Message ID:
00154615
Vues:
22
>Hi George,
>
>>I'm having some difficulty to get these functions to work. Do I need to download Focus.DLL or is there something additionally I need to do to get this to work. Please see my post yesterday post about difficulties with the _edOpenFile API.
>
>No, these functions are part of FoxTools.FLL. All you have to do is to load the library with
>
>SET LIBRARY TO (HOME()+"FoxTools.FLL") ADDITIVE
>
>Then you can use the _ED functions just like VFP functions. Here's an example. Paste the code into a PRG file and then set up an ON KEY LABEL that executes this program. When you press this hotkey, the current text line in any edit window is displayed.
>
>* Load library
>Set Library to (Home()+"FoxTools.Fll") Additive
>
>* get current window
>wHandle = _WOnTop()
>If m.wHandle == 0
> Return
>Endif
>
>* get current line
>lnPos = _EdGetPos( m.wHandle )
>lnLine = _EdGetLNum( m.wHandle, m.lnPos )
>lnStart = _EdGetLPos( m.wHandle, m.lnLine )
>lnEnde = _EdGetLPos( m.wHandle, m.lnLine+1 ) - 1
>lcLine = _EdGetStr( m.wHandle, m.lnStart, m.lnEnde )
>lcLine = ChrTran( m.lcLine, Chr(10)+Chr(13), "" )
>
>? lcLine
>Christof

I tried that and either GPF or if I set step on I'm getting a window handle but all the positions are returning 0.

Dan
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform