DENNISDBASE
Programmer
Hi - I wanted to have my memo fields 'tabbed' five spaces to the right. I tried the MLINE() function and had trouble with replacing the desired result in the memo fields.
I tried the following code and it made everything work just the way I wanted it to.
*-Make sure that the memo field 'TAB STOP' property is set to .t.
*-My test file (mtest.dbf) has one record (mtest) which is a MEMO field
*-I created a form to test this (mtest.s)
*-On this form I show the memo field which has 10 lines all starting at the left most position.
*-I put a command on the form with this code:
PRIVATE vlines
vlines = MEMLINES(mtest.mtest)
DO WHILE vlines >= 0
KEYBOARD '{TAB}'
KEYBOARD '{DNARROW}'
KEYBOARD '{HOME}'
vlines = vlines - 1
ENDDO
thisform.Refresh
Wala - Now all lines are tabbed just the way I want
Don't know if this will help someone or not
I tried the following code and it made everything work just the way I wanted it to.
*-Make sure that the memo field 'TAB STOP' property is set to .t.
*-My test file (mtest.dbf) has one record (mtest) which is a MEMO field
*-I created a form to test this (mtest.s)
*-On this form I show the memo field which has 10 lines all starting at the left most position.
*-I put a command on the form with this code:
PRIVATE vlines
vlines = MEMLINES(mtest.mtest)
DO WHILE vlines >= 0
KEYBOARD '{TAB}'
KEYBOARD '{DNARROW}'
KEYBOARD '{HOME}'
vlines = vlines - 1
ENDDO
thisform.Refresh
Wala - Now all lines are tabbed just the way I want
Don't know if this will help someone or not