ChartDirectorPie Source


Deprecated: The each() function is deprecated. This message will be suppressed on further calls in /kunden/macsw.de/webseiten/monkeybreadsoftware-video/rbformat/rbcode.php on line 244
Class App
Inherits Application
// Constants
Const kFileQuitShortcut = Ctrl+Q
Const kFileQuit = E&xit
Const kEditClear = &Delete
End Class

Class Window1
Inherits Window
// Controls
ControlInstance
Sub ValueChanged() Handles Event
update
End Sub
End ControlInstance
ControlInstance
Sub ValueChanged() Handles Event
update
End Sub
End ControlInstance
ControlInstance
Sub ValueChanged() Handles Event
update
End Sub
End ControlInstance
ControlInstance
End ControlInstance

// Event implementations
Sub Open()
update
End Sub

// Methods
Protected Sub Update()
dim c as new CDPieChartMBS(Canvas1.Width,canvas1.Height)
dim data(2) as Double
dim labels(2) as string

data(0)=Slider1.Value
data(1)=Slider2.Value
data(2)=Slider3.Value

labels(0)="a"
labels(1)="b"
labels(2)="c"

c.setData data,labels
c.setPieSize Canvas1.Width/2, canvas1.Height/2, 200

dim t as CDTextBoxMBS
t=c.addTitle("Our first chart!", "timesbi.ttf",15, &hFFFFFF)
t.setBackground &h0000cc, 0, c.glassEffect(c.kReducedGlare)

c.set3D 20

c.setExplode 1, 50

c.setTransparentColors

canvas1.Backdrop=c.makeChartPicture
End Sub
End Class



Watch other Xojo videos:

ThumbnailMBS Xojo Plugins 21.1

(English)

23:12 minutes
ThumbnailInstalling a Xojo Web App Server

(English)

28:19 minutes
ThumbnailMBS Plugin Installation Win

(English)

22:03 minutes
ThumbnailMBS Plugin Installation Mac

(English)

25:17 minutes
ThumbnailXDC 2020 MBS Plugins Presentation

(English)

38:59 minutes
ThumbnailMBS Plugins @ MBS 2019

(English)

42:28 minutes




Links
MBS FileMaker Plugins

Start Chat