Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Macro expansion
Message
 
 
À
08/09/2001 20:21:58
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
00554002
Message ID:
00554797
Vues:
27
>Neither the code nor the memo field contents changed between VFP6(sp5) and VFP7. All I did was to recompile it under version 7. I can guarantee it compiled and worked just fine under VFP6. The memo field is simply a list like the one I showed in the original post. Whoever originally put it in clearly just typed the first line, hit enter, typed the next line etc.

I believe you that it works. The question is, why does it work? Neither Sergey nor I could make this work without removing the semi-colon/carriage return/line feed, and yet it works in your app under VFP6. So I'm wondering if you can you make it work under VFP6 outside of the app.

Try this: Run the little program below under VFP6 and see if you get the syntax error or not.
IF USED( "myTable")
   USE IN myTable
ENDIF 
IF FILE( "myTable.dbf")
   ERASE myTable.dbf
ENDIF
CREATE TABLE myTable ( cField1 c(10), cMemo M)
LOCAL lcMemo
lcMemo = [cField1 :15 :h="The Field",  ;] + ;
         CHR(13) + CHR(10) + ;
         [cMemo :25 :h="The Memo"]
INSERT INTO myTable ;
   ( cField1, cMemo) ;
   VALUES ;
   ( "AAAAA", lcMemo)
LOCAL lcx
lcx = cMemo  && Store the memo field in a memvar.
?lcx         && Display the memvar - should be two lines.
BROWSE FIELDS &lcx  && Syntax error occurs here.
USE IN myTable
I get the syntax error in both VFP6 and VFP7. What results do you get?
Rick Borup, MCSD

recursion (rE-kur'-shun) n.
  see recursion.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform