Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Italics etc in memos
Message
 
 
À
13/12/2001 06:19:34
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Divers
Thread ID:
00593171
Message ID:
00594048
Vues:
36
I use to do the following for reports when I need the normal text:
loText = CREATEOBJECT("RichText.RichTextCtrl.1")
SELECT InfoMemo FROM MyTable INTO CURSOR MyCursor READWRITE &7 works only in VFP 7!
SCAN
loText.TextRTF = MyCursor.InfoMemo
REPLACE MyCursor.InfoMemo WITH loText.Text
ENDSCAN
REPORT FORM MyReport TO PRINTER PROMPT PREVIEW NOCONSOLE
RELEASE loText
USE IN MyCursor

>Denis,
>
>If you're using Microsoft's RTF control, then you could try the following:
>
>*-- get only the text without all the formating codes
>lcText = ThisForm.oleRtfControl.text
>
>
>HTH
>>Hilmar, thanks a lot. I have it working. I wonder if there a function to convert the RTF text in the memos to standard text - as needed in some basic reports. And if the memos are transfered to Word, is it poss. to translate the memo text from RTF to normal word stuff. Many thanks.
Christian Isberner
Software Consultant
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform