Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Extract text from General field and place in binary Memo
Message
 
À
16/12/2003 16:14:00
Jay Johengen
Altamahaw-Ossipee, Caroline du Nord, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Divers
Thread ID:
00859653
Message ID:
00859766
Vues:
25
This message has been marked as the solution to the initial question of the thread.
Jay,

Try this:
use (yourtable)
local oForm
oForm = Createobject('_Form',(GeneralFieldname))
lctext=oForm.myOLe1.OBJECT.Content.Text
oForm.release
REPLACE (memofield) WITH lctext
Return
*----------------
Define Class _Form As Form
	PROCEDURE iNIT
		LPARAMETERS pGenFieldName
		this.addobject('myOLe1',"OleBoundControl")
		this.myole1.ControlSource = ALIAS()+'.'+pGenfieldName
	ENDPROC
Enddefine
>I have a word document placed into a General field, but want the contents (text) copied over to a Memo field. I can manually double-click on the contents of the the General field, highlight all the text and then copy/paste into the Memo field, but I want to do it progmatically. Can this be done? Thanks!
>
>Regards, Renoir
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform