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: Koen Piller
  Where is Koen Piller?
 Santpoort-Zuid
 Netherlands
 Koen Piller
 Tags
Subject: RE: DBF 2 Editbox
Thread ID: 373615 Message ID: 373687 # Views: 32 # Ratings: 0
Version: Visual FoxPro 9 Category: Forms
Date: Monday, March 25, 2013 11:51:37 AM         
   


> >
> >
> >
> > #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 **


Yes, it's slightly easier that way, isn't it, and applies to surprisingly many scenarios, like SQL Order-By Into-Cursor aliases, Create-Cursor->Append-From, XmlAdapter results and so forth.
I was assuming we could have talked about the slightly more complex ordered-alias solution that Anders already provided when the OP has one.



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