Home arrow News - Articles arrow Behind the Scene arrow Membuat Aplikasi SIG dengan MapObjects Bagian II: Fungsi-fungsi Lanjutan
 
  XnRnXZvLpO www.danielhp.com
Membuat Aplikasi SIG dengan MapObjects Bagian II: Fungsi-fungsi Lanjutan PDF Print E-mail
Written by Administrator   
Thursday, 26 July 2007
Article Index
Membuat Aplikasi SIG dengan MapObjects Bagian II: Fungsi-fungsi Lanjutan
Page 2
Page 3
Page 4
Page 5
Page 6
Page 7

e.      ChartRenderer

 

Masih tentang menampilkan nilai field, jika pada rendering-rendering sebelumnya digunakan untuk memperlihatkan nilai satu field, maka rendering tipe ChartRenderer ini dapat digunakan dengan menyajikan nilai beberapa field secara langsung. Nilai-nilai dari beberapa field ini akan disajikan dalam bentuk grafik (chart ). Ada dua tipe grafik yaitu batang/bar dan lingkaran/pie. Selain membandingkan dengan nilai dengan field yang lain dalam satu record, bentuk charnya juga memungkinkan kita untuk membandingkan dengan nilai pada record yang lain. Dalam bentuk bar akan terlihat dari panjangnya bar, sedang dalam bentuk pie akan terlihat dari besarnya lingkaran.

 

Seharusnya chart renderer digunakan untuk membandingkan beberapa field yang sejajar, seperti misal jumlah_penduduk_kulit_putih, jumlah_penduduk_kulit_hitam ,jumlah_penduduk_asi, dan sebagainya. tetapi karena dalam contoh data mexico tidak ada field yang sejajar untuk ditampilkan, maka untuk contoh berikut digunakan field P_urban90,  P_ing_lang, P_empl_sec. Dengan warna masing-masing adalah merah, kuning, dan hijau. Contoh yang pertama bertipe Bar. Terlihat pada property ChartType. Dan contoh yang kedua hanya mengubah isi property ini dengan nilai moPie. Hasil kedua contoh dapat dilihat pada gambar 26 dan 27.

 

   Dim L1 As MapObjects2.MapLayer

         Set L1 = New MapObjects2.MapLayer

         L1.GeoDataset = dc.FindGeoDataset("states")

         L1.Symbol.Color = moWhite

         Dim cd As New ChartRenderer

         cd.DrawBackground = True

         cd.FieldCount = 3

         cd.Field(0) = "P_urban90"

         cd.Field(1) = "P_ing_lang"

         cd.Field(2) = "P_empl_sec"

         cd.ChartType = moBar

         cd.Color(0) = moRed

         cd.Color(1) = moYellow

         cd.Color(2) = moGreen

         L1.Renderer = cd

         Map1.Layers.Add L1

 

Gambar 26. Contoh hasil ChartRenderer tipe Bar

 

Gambar 27. Contoh hasil ChartRenderer tipe Bar

 

 

 


Last Updated ( Sunday, 13 April 2008 )
 
< Prev   Next >
 
 
(C) 2012 daniel hary prasetyo
Free Joomla Template designed by funky-visions.de
 

articles (a-z order)