Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How do I save editbox
Message
From
09/11/2012 01:16:09
 
 
To
08/11/2012 09:42:31
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01556676
Message ID:
01556765
Views:
41
thanks for the insight dorris
k

>You treat memo fields, at least on forms, much like you treat any other field. They will scatter to memvar (scatter memo memvar) and can be replaced at will (Replace mymemo with m.editboxtext). Aint a whole bunch special about 'em.
>
>
>
>>in the following code memonote is a memo field that is displayed and allowed edit
>>
>>How and where do i save the changes that are made in edit???
>>
>>save changes to my field memonote
>>
>>many thanks
>>k
>>
>>
>>strtofile(memonote,'m.txt')
>>LOCAL oFrm
>>
>>oFrm= CREATEOBJECT("Note")
>>oFrm.Edit1.Value = filetostr('m.txt') 
>>
>>oFrm.Show(1)
>>
>>************************************
>>DEFINE CLASS Note AS Form
>>
>>	ADD OBJECT Edit1 AS EditBox WITH ;
>>		Height= 470, ;
>>		Left= 16, ;
>>		ReadOnly= .f., ;
>>		TabIndex= 2, ;
>>		Top= 16, ;
>>		Width= 530, ;
>>		Value= ""
>>ENDDEFINE
>>
>>Public Event MouseWheel As MouseWheelEventHandler
>>
>>
>>PROCEDURE Object.MouseWheel
>>LPARAMETERS nDirection, nShift, nXCoord, nYCoord
>>
>>PROCEDURE edit1.MouseWheel
>>		LPARAMETERS nDirection, nShift, nXCoord, nYCoord
>>		
>>		
>>	ENDPROC
>>
>>
>>oFrm.hide(1)
>>
Previous
Reply
Map
View

Click here to load this message in the networking platform