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)