یک dll برای ساخت نمودارهای حرفه ای و بسیار زیبا

[hossein-khoshseyar]

با این dll هرچی نمودار بخواین بکشین از دو بعدی و سه بعدی گرفته تا ... و انواع گیج و.... می تونین استفاده کننین

لطفا اگه بدردتون خورد تشکر کنید

[safacon]

سلام
میشه با مثال طریقه استفاده از این dll رو توضیح بدی؟

[hossein-khoshseyar]

سلام
میشه با مثال طریقه استفاده از این dll رو توضیح بدی؟

دوست عزیز انشالله چند روز دیگه یه مثال کامل برات می زارم . فعلاٌ چند روز سرم شلوغه

[hossein-khoshseyar]

اینم مثالش دوست عزیز
یه پروژه جدید ایجاد کن dll رو اضافه کن و بیار روی فرم و اسمش رو بزار chart_p



Imports ChartDirector

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim value As Double = 6.5

Dim m As AngularMeter = New AngularMeter(200, 100)
m.setRoundedFrame()
Dim img As String
img = "0"
If img = "0" Then
m.setBackground(Chart.goldColor, &H0, -2)
ElseIf img = "1" Then
m.setBackground(Chart.silverColor(), &H0, -2)
ElseIf img = "2" Then
m.setBackground(Chart.metalColor(&H9898E0), &H0, -2)
ElseIf img = "3" Then
m.setBackground(m.patternColor2("wood.png"), &H0, -2)
ElseIf img = "4" Then
m.setBackground(m.patternColor2("marble.png"), &H0, -2)
Else
m.setBackground(&HEEBBEE, &H0, -2)
End If

m.setMeter(100, 235, 210, -24, 24)

m.setScale(0, 10, 1)

m.addZone(0, 6, &H99FF99, &H808080)
m.addZone(6, 8, &HFFFF00, &H808080)
m.addZone(8, 10, &HFF3333, &H808080)

m.addTitle2(Chart_p.Bottom, "OUTPUT POWER LEVEL<*br*>", "Arial Bold", 10)

m.addPointer(value, &H80000000)

Chart_p.Image = m.makeImage()
End Sub
End Class