Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Runtime Graphs
Message
From
12/01/1999 07:49:51
 
 
To
11/01/1999 14:57:12
General information
Forum:
Visual FoxPro
Category:
Pictures and Image processing
Title:
Miscellaneous
Thread ID:
00174783
Message ID:
00174978
Views:
23
>Can anyone tell me how to incorporate graphic charts in runtime VFP5.0a distributions?
>
>In FPW2.6 we created the original graphic layout using the Wizard and saved it to a graphic file. Then we called UPDATEGRPH in GENGRAPH.APP with the file opened and positioned at the desired record. The appropriate version of MSGRAPHn.EXE was distributed with the application EXE for viewing.
>
>Thanks for your help!
>
>Allen
Hi Allen.

Provided you have a seed graph that you can modify, code like this should work to modify the graph:
   SELECT GraphDat 
   cGraphString = "" 

 * Build tab-delimited string of field names: 

   FOR iCounter = 1 TO FCOUNT("GraphDat")
       IF UPPER(ALLTRIM(FIELD(iCounter))) <> "REGN_CD" THEN
          cGraphString = cGraphString  + FIELDS(iCounter) ; 
                       + IIF(iCounter < FCOUNT("GraphDat"),CHR(9),chr(13)) 
       ENDIF
   ENDFOR 

 * Concatenate the data, converting numeric fields to character: 

   SCAN 
      FOR iCounter = 1 TO FCOUNT("GraphDat")
          IF UPPER(ALLTRIM(FIELD(iCounter))) <> "REGN_CD" THEN
             cGraphString = cGraphString  + IIF(TYPE(Fields(iCounter))='C',; 
                            EVALUATE(FIELDS(iCounter)) ; 
                           ,str(EVALUATE(FIELDS(iCounter)),16,2); 
                                ); 
                          + IIF(iCounter < FCOUNT("GraphDat"),CHR(9),CHR(13)) 
          ENDIF
      ENDFOR 
   ENDSCAN 
   SELECT Graph 
   APPEND GENERAL Graph DATA cGraphString 
   UNLOCK
Graphdat, obviously, contains the data necessary to modify the graph.

Marcia
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform