hossein-khoshseyar
پنج شنبه 08 مرداد 1388, 16:30 عصر
با این dll هرچی نمودار بخواین بکشین از دو بعدی و سه بعدی گرفته تا ... و انواع گیج و.... می تونین استفاده کننین
لطفا اگه بدردتون خورد تشکر کنید
safacon
جمعه 09 مرداد 1388, 23:16 عصر
سلام
میشه با مثال طریقه استفاده از این dll رو توضیح بدی؟
hossein-khoshseyar
شنبه 10 مرداد 1388, 15:36 عصر
سلام
میشه با مثال طریقه استفاده از این dll رو توضیح بدی؟
دوست عزیز انشالله چند روز دیگه یه مثال کامل برات می زارم . فعلاٌ چند روز سرم شلوغه
hossein-khoshseyar
یک شنبه 11 مرداد 1388, 11:15 صبح
اینم مثالش دوست عزیز
یه پروژه جدید ایجاد کن 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
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.