Something like

lnStart = Thisform.Edit1.SelStart
lcCrLf = CHR(13) + CHR(10)

lnOccurence = OCCURS(lcCrLf, LEFT(Thisform.Edit1.Text, lnStart))

lcCommand = STREXTRACT(lcCrLf + Thisform.Edit1.Text, lcCrLf ,lcCrLf, lnOccurence + 1,2) 

>
>for instance:
>
>

>LIST[CR&LF]
>DISP MEMO[CR&LF]
>LIST ALL FOR;[CR&LF]
>empty(client_id)[CR&LF]
>BROWSE[CR&LF]
>PACK[CR&LF]
>

>
>on keypress RETURN I'd like to grab the code near to left side and process it.. Exactly as the same behavior of VFP's command line window