Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Koen Piller
  Where is Koen Piller?
 Santpoort-Zuid
 Netherlands
 Koen Piller
 To: Stefan Wuebbe
  Where is Stefan Wuebbe?
 Hamburg
 Germany
 Stefan Wuebbe
 Tags
Subject: RE: DBF 2 Editbox
Thread ID: 373615 Message ID: 373645 # Views: 42 # Ratings: 0
Version: Visual FoxPro 9 Category: Forms
Date: Sunday, March 24, 2013 6:24:12 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

Stefan,

sorry,
your
iif(recno()%2-0,crlf) 
this only works correctly with natural order (no index set) I believe.
Regards,
Koen

** The coding in VFP without using mDot should be qualified as recreational **

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