Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Stefan Wuebbe
  Where is Stefan Wuebbe?
 Hamburg
 Germany
 Stefan Wuebbe
 To: David David
  Where is David David?
 
 Iowa - Kazakhstan
 David David
 Tags
Subject: RE: DBF 2 Editbox
Thread ID: 373615 Message ID: 373641 # Views: 47 # Ratings: 2
Version: Visual FoxPro 9 Category: Forms
Date: Sunday, March 24, 2013 5:04:06 PM         
   


> Sir I have modified your codes as
>
>
> #DEFINE CRLF CHR(10)
> LOCAL lcString 
> SELECT myalias
> lcString=""
> SCAN 
>  lcString=m.lcString+TRIM(names)+CRLF
> ENDSCAN 
> thisform.edit1.value=m.lcString
> 

>
> It works fine but I need more help
> No I want to show data as
>
> abcsg
> dgeag
>
> hrhhge
> xdyage
>
> loeage
> gereg
>
> One extra row or chr(13)after every EVEN row as above.


#DEFINE CRLF CHR(10)
LOCAL lcString 
lcString=""
SCAN 
	lcString=m.lcString+TRIM(names)+CRLF + IIF(RECNO()%2=0, CRLF, "")
ENDSCAN
Thisform.edit1.value=m.lcString



hth
-Stefan

ENTIRE THREAD

DBF 2 Editbox Posted by David David @ 3/24/2013 7:22:08 AM
RE: DBF 2 Editbox Posted by Anders Altberg @ 3/24/2013 11:46:07 AM
RE: DBF 2 Editbox Posted by David David @ 3/24/2013 12:51:28 PM
RE: DBF 2 Editbox Posted by Anders Altberg @ 3/24/2013 2:12:12 PM
RE: DBF 2 Editbox Posted by David David @ 3/24/2013 4:22:47 PM
RE: DBF 2 Editbox Posted by Stefan Wuebbe @ 3/24/2013 5:04:06 PM
RE: DBF 2 Editbox Posted by Koen Piller @ 3/24/2013 6:24:12 PM
RE: DBF 2 Editbox Posted by Stefan Wuebbe @ 3/25/2013 11:51:37 AM
RE: DBF 2 Editbox Posted by Anders Altberg @ 3/24/2013 7:25:57 PM