Jump to content
Software FX Community

Re: Series Legend Position Not Working


User (Legacy)

Recommended Posts

Juan, 

It looks like I have version 4.4.15.0

Sean Harasin

"Juan Cegarra" <JuanC@softwarefx.com> wrote in message

news:DE0379D14694D211B4CE00609770710D04B673@sftfx-221.wamnet.net...

> Please check the version of the ChartFX IE server component

>

> \Program Files\CfxIE4\Server\CfxIESrv.dll

>

> Regards,

>

> Juan Cegarra

> Software FX, Inc.

> http://support.softwarefx.com

>

> -----Original Message-----

> From: Lost Sailor [ mailto:sharasin@mbakercorp.com]

> Posted At: Thursday, February 24, 2000 7:18 AM

> Posted To: Server

> Conversation: Series Legend Position Not Working

> Subject: Re: Series Legend Position Not Working

>

>

> No,

> It seems that the service pack is only avaliable to registered users. I

> am

> using the trial edition.

>

> Sean Harasin

> "Juan Cegarra" <JuanC@softwarefx.com> wrote in message

> news:DE0379D14694D211B4CE00609770710D04B614@sftfx-221.wamnet.net...

> > Are you using the latest ChartFX IE Service Pack ?

> >

> > Regards,

> >

> > Juan Cegarra

> > Software FX, Inc.

> > http://support.softwarefx.com

> >

> >

> > -----Original Message-----

> > From: Lost Sailor [ mailto:sharasin@mbakercorp.com]

> > Posted At: Tuesday, February 22, 2000 10:20 AM

> > Posted To: Server

> > Conversation: Series Legend Position Not Working

> > Subject: Re: Series Legend Position Not Working

> >

> >

> > Yes, I am using the include file. I checked for TGFP_BOTTOM and the

> > value

> > is &H102&.

> > I have tried using other positions as well as TGFP_BOTTOM, however the

> > legend is always shown on the right.

> >

> > Sean Harasin

> >

> > "Juan Cegarra" <JuanC@softwarefx.com> wrote in message

> > news:DE0379D14694D211B4CE00609770710D04B15E@sftfx-221.wamnet.net...

> > > Are you including our INC file ?

> > > If so, can you open CfxIE.inc in a text editor and check if

> > TGFP_BOTTOM

> > > is defined ?

> > >

> > > It should be defined as

> > >

> > > Const TGFP_BOTTOM = &H102&

> > >

> > > Regards,

> > >

> > > Juan Cegarra

> > > Software FX, Inc.

> > > http://support.softwarefx.com

> > >

> > >

> > > -----Original Message-----

> > > From: Lost Sailor [ mailto:sharasin@mbakercorp.com]

> > > Posted At: Sunday, February 20, 2000 1:43 PM

> > > Posted To: Server

> > > Conversation: Series Legend Position Not Working

> > > Subject: Series Legend Position Not Working

> > >

> > >

> > > I am using the code below to setup my chart. I am using

> > > Chart1.SerLegBoxObj.Docked = TGFP_BOTTOM

> > > to position the series legend, but it doesn't seem to be working for

> > me.

> > > I read KB article 1342029, and it seemed to say that this was a

> known

> > > problem with some builds of the software.

> > > I am using the Trial Edition of CFXIE 2k, that I downloaded about 10

> > > days

> > > ago. Is this version affected by the bug, or am I doing something

> > > wrong?

> > >

> > > Thanks,

> > > Sean Harasin

> > >

> > >

> > > Dim Chart1

> > > Set Chart1 = Server.CreateObject ("ChartFX.Webserver.4")

> > > Chart1.Axis(AXIS_Y).AutoScale = True

> > > Chart1.Title(CHART_RIGHTTIT) = TitleBlock 'Right Border

> Information

> > > Chart1.Title (CHART_TOPTIT) = title 'Top Title

> > > Chart1.Title(CHART_LEFTTIT) = YAxisLabel 'Left Title

> > > Chart1.Grid = True 'Grid On

> > > Chart1.ToolBar = True 'Toolbar On

> > >

> > > Chart1.Gallery = LINES 'Chart Type = Line

> > > Chart1.Chart3D = False '2D Chart

> > > Chart1.AllowEdit = False 'Restrict Data Editor

> > > Chart1.AllowDrag = False 'Restrict Points From Being Moved

> > > Chart1.RGBBk = RGB(255,255,255) 'White BackGround

> > > Chart1.RGB2DBk = RGB(255,255,255)

> > > Chart1.Border = True

> > > Chart1.MarkerStep = 5 'Display a marker at every 5

> points.

> > > (Looks Cleaner Than Default)

> > > Chart1.Printer.Compress = True

> > > Chart1.SerLegBox = True 'Show Series Legend

> > > Chart1.SerLegBoxObj.Docked = TGFP_BOTTOM 'Why Doesn't This Work?

> > >

> > >

> > >

> > > 'Define Fields of the result set to display

> > > 'Fields 0 and 1 are the same no matter how many values we are

> looking

> > > for

> > > Chart1.DataType(0) = 0 'date x-axis

> > > Chart1.DataType(1) = -2 'time not used for display

> > > For intLoopCount = 2 To intLimit

> > > If intLoopCount < intLimit Then Chart1.DataType(intLoopCount)

> =

> > 2

> > > Else

> > > Chart1.DataType(intLoopCount) = -2 End If

> > > Next

> > >

> > > 'Pass data to chart object

> > > Chart1.AdoResultset objRecSet

> > >

> > > For intLoopCount = 2 To intLimit-1

> > > Select Case intLoopCount

> > > Case "2"

> > > Chart1.Series(0).MarkerShape = MK_CIRCLE

> > > Chart1.Series(0).LineStyle = CHART_SOLID

> > > Case "3"

> > > Chart1.Series(1).MarkerShape = MK_RECT

> > > Chart1.Series(1).LineStyle = CHART_SOLID

> > > Case "4"

> > > Chart1.Series(2).MarkerShape = MK_NONE

> > > Chart1.Series(2).LineStyle = CHART_SOLID

> > > Case "5"

> > > Chart1.Series(3).MarkerShape = MK_NONE

> > > Chart1.Series(3).LineStyle = CHART_DOT

> > > Case "6"

> > > Chart1.Series(4).MarkerShape = MK_NONE

> > > Chart1.Series(4).LineStyle = CHART_DASHDOT

> > > Case "7"

> > > Chart1.Series(5).MarkerShape = MK_NONE

> > > Chart1.Series(5).LineStyle = CHART_DASHDOTDOT

> > > Case "8"

> > > Chart1.Series(6).MarkerShape = MK_NONE

> > > Chart1.Series(6).LineStyle = CHART_DASH

> > > End Select

> > > Next

> > >

> > >

> > > Dim NewMin, NewMax, Range

> > > NewMin = Int((Chart1.Axis(AXIS_Y).Min - 1))

> > > NewMax = Int((Chart1.Axis(AXIS_Y).Max + 1))

> > > Range = Int((NewMax - NewMin) / 10)

> > >

> > > Chart1.Axis(AXIS_Y).Min = NewMin

> > > Chart1.Axis(AXIS_Y).Max = NewMax

> > > Chart1.Axis(AXIS_Y).STEP = Range

> > > Chart1.Axis(AXIS_Y).AdjustScale

> > >

> >

>

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...