Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
RightClick() in RTF-Control
Message
De
21/04/2005 11:52:59
 
 
À
21/04/2005 11:13:35
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Versions des environnements
Visual FoxPro:
VFP 6 SP5
Divers
Thread ID:
01006403
Message ID:
01007071
Vues:
21
You're welcome Gunnar :)

Sorry about yesterday. I was in the middle of "confusion", thinking which MSDN subscription should I get. So I was not in the mood to do some coding <*g&d*>

Regards

>Hello Herman
>
>Thank you much - works like a charm. i have now clue how i came up with so many lines of code - and then it didn't even work <vbg>.
>
>thank you again for your help!
>
>
>>Hi Gunnar,
>>
>>I had converted my code to VFP code. Just a few lines of code *bg*. Modify the foolowing code according to your needs
>>
>>Declare Long GetCursorPos in User32 String @cPoint
>>Declare Long ScreenToClient in User32 Long hWnd, String @cPoint
>>
>>Declare Long SendMessage in User32 as SendMessageStr ;
>>   Long hWnd, Long uMsg, Long wParam, String @lParam
>>
>>lc_Point = space(8)
>>GetCursorPos( @lc_Point )
>>ScreenToClient( ThisForm.RichEdit.hWnd, @lc_Point )
>>ThisForm.RichEdit.SelStart = SendMessageStr( ThisForm.RichEdit.hWnd, EM_CHARFROMPOS, 0, lc_Point )
>>
>>
>>HTH
Herman
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform