Memberikan Judul Pada Grid Foxpro

Dibawah ini adalah contoh script untuk mengatur judul pada grid foxpro.

SQLEXEC(ConnHandle,"SELECT * FROM tabel_kelembagaan_kelurahan1","b")
thisform.Grid1.RecordSource="b"

with thisform.grid1
  .column1.header1.caption = 'Kode Monografi Kecamatan'
  .column1.width = 190
  .column2.header1.caption = 'Status Kepemilikan'
  .column2.width = 100
  .column3.header1.caption = 'Luas Tanah'
  .column3.width = 100
  .column4.header1.caption = 'Luas Bangunan'
  .column4.width = 100
  .column5.header1.caption = 'dibangun tahun'
  .column5.width = 100
  .column6.header1.caption = 'APBN'
  .column6.width = 100
  .column7.header1.caption = 'INPRES'
  .column7.width = 100
  .column8.header1.caption = 'APBD Provinsi'
  .column8.width = 100
  .column9.header1.caption = 'APBD Kota'
  .column9.width = 100
  .column10.header1.caption = 'Lain2 yang sah'
  .column10.width = 100
  .column11.header1.caption = 'jumlah'
  .column11.width = 100
  .column12.header1.caption = 'Bangunan Bertingkat'
  .column12.width = 100
  .column13.header1.caption = 'Kondisi Bangunan'
  .column13.width = 100
endwith

Posted in: Foxpro