Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Clearing Tag, Tag2 in .frx , but retaining Landscap/Port
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
FoxPro 2.x
Divers
Thread ID:
00496784
Message ID:
00496830
Vues:
19
Tom:

To build on what I said and what Nick said, I have a program that I run that "fixes" all the FRX's in my project before it builds an EXE. The only special things I need in my reports are the possibility of Legal-Size paper and/or Landscape orientation. My program opens each FRX and does the following:
use (ReportFile) exclusive
locate for objtype=1 and objcode=53
if not eof()
  if not empty(tag) or not empty(tag2) or not empty(expr) 
    newexpr=""
    if "PAPERSIZE=5"$expr
      newexpr=newexpr+iif(empty(newexpr),"",chr(13)+chr(10))+"PAPERSIZE=5"
    endif
    if "ORIENTATION=1"$expr
      newexpr=newexpr+iif(empty(newexpr),"",chr(13)+chr(10))+"ORIENTATION=1"
    endif
    replace tag with "", tag2 with "", expr with newexpr
  endif
endif
Hope this helps...

--Brad
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform