Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Changing Font in MSGraph.Chart.8
Message
From
04/08/1999 08:50:59
 
 
To
03/08/1999 09:47:28
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Miscellaneous
Thread ID:
00249150
Message ID:
00249668
Views:
35
but if my graph is in OleBound control than I don't have any property like Axes..

here is my code below :
#DEFINE CRLF CHR(13)+CHR(10)
#DEFINE TAB CHR(9)
thisform.mousepointer = 99
SET SAFETY OFF

*!* DECLARING ARRAYS
decl lArName[100],lArYards[100],lArAmount[100], lArContVal[100],lArConper[100]

lcData = "FinGrCust1"

select fldname from &lcData into Array lArName
select fldvalue from &lcData into Array lArvalue


store "" to mdata1,mdata2,mdata3
ctr = alen(lArName)
lnMax = Thisform.Bsspin1.Value
for ctr = 1 to lnMax
mdata2 = mdata2 + lArName[ctr]+ TAB + lArValue[ctr] + CRLF
endfor
mdata3 = mdata1 + mdata2
create cursor too (gen1 g)
SET SAFETY ON
append blank
append general gen1 class "msgraph.chart" DATA mdata3
thisform.lockscreen = .F.
ThisForm.Oleboundcontrol1.visible = .T.
ThisForm.Oleboundcontrol1.controlsource = "gen1"
thisform.refresh

Please correct it..!!
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform