apa kabar dunia

hanya ingin menyapa dunia maya ...
just wanna say hello word

Tutorial PowerBuilder: Array (uas)

Tutorial PowerBuilder : array (UAS)
Pada kesempatan kali ini saya akan mencoba untuk memperbaiki kesalahan yang telah saya lakukan saat uas kemarin (jum’at 13/02/08) :).
Kita akan coba membuat sebuah aplikasi untuk menampilkan daftar mahasiswa dan menentukan nilai akhir yang diperoleh dari uts dan uas (lihat desain form pada gambar)
Baiklah mari kita coba ….
Pertama buat form seperti gambar, yaitu terdiri dari :
Buat Enam buah statictext yaitu untuk membuat judul form, nim mahasiswa, nama mahasiswa nilai uts, nilai uas dan nilai akhir.
Buat lima buah single line edit untuk menginput nim, nama, nilai uts, nilai uas, dan nilai akhir. Untuk nilai akhir merupakan penjumlahan dari nilai uts dan nilai uas dibagi 2.
Buat sebuah listbox untuk menampilkan daftar mahasiswa.
Nah kalau semua telah di buat sekarang kita akan coba untuk membuat command button dan perintahnya. Disini kita akan membuat lima buah command button, yaitu untuk perintah entry baru, simpan, tampil nilai tertinggi dan keluar. Untuk nilai tertinggi kita akan tampilkan pada messagebox.
Ok kita deklarasikan dulu variablenya kita gunakan variable global
int i=1,nuts,nuas,nakhir,max
int auts[5], auas[5],anilai[5]
string nim,nama
string anim[5], anama[5]
Setelah itu kita buat command button yang pertama yaitu command button untuk perintah entry baru. Kita beri nama cmd_baru dan text nya kita isi BARU. Untuk perintahnya kita ketikan
lb_1.reset()
jika perlu kita juga bisa tambahkan perintah berikut:
txt_nim.text=""
txt_nama.text=""
txt_uts.text=""
txt_uas.text=""
txt_nilai.text=""
lalu kita buat command button kedua yaitu untuk perintah simpan kita isi propertinya dan kita ketikan
nim=txt_nim.text
nama=txt_nama.text
nuts=integer(txt_uts.text)
nuas=integer(txt_uas.text)

nakhir= (nuts + nuas) / 2
txt_nilai.text=string(nakhir)

anim[i]=nim
anama[i]=nama
auts[i]=nuts
auas[i]=nuas
anilai[i]=nakhir

txt_nim.text=""
txt_nama.text=""
txt_uts.text=""
txt_uas.text=""
txt_nilai.text=""
i=i+1
setelah itu kita buat command button yang ketiga yaitu untuk perintah tampil, setelah propertinya diisi kita kerikan perintah:
for i=1 to 5
lb_1.additem((anim[i]) + " " + (anama[i]) + " " + (string(auts[i]))+" "+(string(auas[i]))+" "+(string(anilai[i])))
next
disini kita hanya batasi 5 buah saja.
Command button yang ke empat adalah untuk perintah nilai pertinggi dan perintahnya adalah
max=anilai[1]
for i=1 to 5
if ((anilai[i])>max) then
max=anilai[i]
else
max=max
end if
next
messagebox("Pesan","Nilai Tertinggi adalah"+" "+string(max))
dan yang terakhir adalah command button untuk keluar atau close perintahnya sebagai berikut:
close(w_d080)
selesai sudah … tapi saying pas kemarin ujian nggak kayak gini jawabannya jadi yaa… gitu deck. Maklum loadingnya suka agak lama…

Latihan PowerBuilder 8.0 : ARRAY 2

Latihan Powerbuilder 8.0: ARRAY

Setelah kita berkenalan tentang apa itu array, selanjutnya kita akan coba berlatih dengan menggunakan array. Disini kita akan coba membuat sebuah program dengan array dimana nilai arraynya kita inputkan. Lalu kita juga akan mencoba bagaimana agar jumlah inputanya kita batasi. Dan disini juga kita akan coba mencari nilai terbesar dan nilai terkecil dari array tersebut. Bingung? Ok jangan bingung bingung we can do it…
Pertama kita buka powerbuilder dan pastikan kita berada di form windows. Lalu kita buat sebuah listbox untuk menampilkan nilai dari array. Setelah itu kita buat sebuah single line edit yang berguna untuk input kita berinama txt_input. Lalu kita buat enam buah command button, command button pertama kita gunakan untuk input dan kita berinama cmd_input. Command button kedua kita gunakan untuk menampilkan data kita berinama cmd_tampil. Command button ketiga kita gunakan untuk mencari nilai maksimal kita beri nama cmd_max. command button keempat kita gunakan untuk mencari nilai minimum kita berinama cmd_min. command button yang kelima kita gunakan untuk reset kita berinama cmd_reset dan command button yang terakhir kita gunakan untuk close program kita berinama cmd_close. ( banyak sekali ngetiknya jadi pegel jari hehe …)
Sebelum kita ketik powerscript kita ketikan deklarasikan variabelnya terlebih dahulu. Variabel sebaiknya dibuat pada variabel global, kita ketik

int i=1
int x[10]
int max,min

Setelah itu … kita coba ketikan powerscriptnya. Powerscript untuk command button input kita ketik:

x[i]=integer(txt_input.text)
i=i+1
txt_input.text=""

namun jika kita ingin membatasi jumlah nilai yang diinputkan maka script nya adalah:

//input
if (i>5) then
messagebox("Pesan","tidak boleh input lebih dari 5")
else
x[i]=integer(txt_input.text)
i=i + 1
txt_input.text=""
end if

dengan script diatas, jika kita jalankan program maka inputnya tidak akan bisa lebih dari 5 jika kita inputkan lebih dari lima maka akan muncul pesan “tidak boleh input lebih dari 5”.

Powerscript untuk menampilkan nilai array adalah:
for i=1 to 5
lb_1.additem(string(x[i]))
next

dengan powercript tersebut maka kita akan menampilkan 5 buah elemen array

powerscript berikutnya adalah untuk mencari nilai maksimum / terbesar dari elemen array yang kita miliki, berikut scriptnya:
max=x[1]
for i=1 to 5
if ((x[i])>max) then
max=x[i]
else
max=max
end if
next

lb_1.additem(string(max))

sedangkan powerscript berikutnya adalah untuk mencari nilai terkecil dari elemen array yang kita miliki, adalah
min=x[1]
for i=1 to 5
if ((x[i])

min=x[i]
else

min=min

end if

next

lb_1.additem(string(min))
untuk reset kita ketikan
lb_1.reset()

sedangkan untuk close kita ketik
close(w_array)

selesai sudah ……. Sekarang kita coba jalankan. Kita coba inputkan angka 10, 15, 26, 5, 25 kita coba tampilkan satu – satu. Bagaimana hasilnya …..
selamat mencoba ….( maaf buru buru ada kuliah lagi ….)

presented to mr Deny Martha S.T.

presented by Dian Heryana

Latihan PowerBuilder 8.0 : ARRAY

Latihan PowerBuilder :ARRAY
Array adalah sekumpulan variabel yang mempunyai nama yang sama namun dibedakan oleh indeks. Indeks array harus bertipe data yang menyatakan keterurutan. Indeks dapat berupa angka atau string. Jika indeks array berbentuk angka array akan disebut indexed array (vektor). Sedangkan jika indeksnya berupa string array tersebut disebut associative array.
Array dengan nama X dengan lima buah elemen dapat dibayangkan sebagai sekumpulan kotak yang terurut. Tiap kotak berisi indeks integer 1, 2, 3, 4, 5. tiap elemen array dapat ditulis :
X[1], X[2], X[3], X[4], X[5]
Angka yang terdapat didalam kurung siku disebut indeks array.
Setiap elemen array menyimpan sebuah nilai. Karena semua elemen array bertipe sama maka nilai yang disimpan oleh tiap elemen juga harus bertipe sama.

Ok. Untuk memperjelas kita coba dengan membuat sebuah aplikasi dengan menggunakan array .
Pertama pastikan kita sudah berada pada form kerja. Setelah itu kita buat sebuah listbox dengan nama defautl lb_1 untuk menampilkan elemen /nilai array. lalu kita buat single line edit untuk menginput nilai / elemen array. setelah itu kita buat sebuah command button untuk menampilkan nilai array kita beri nama cmd_tampil.
Setelah desain form yang selesai lalu kita coba untuk menuliskan powerscript nya.
Klik dua kali pada command button tampil lalu kita ketikan script berikut:

int i
int x[6]

for i=1 to 6
x[i] = i
lb_1.additem(string(x[i]))
next

maka ketika kita jalankan dan kita ketik tampil, list box akan menampilkan angka 1 2 3 4 5 6. int X[6] adalah variabel untuk membatasi jumlah array yang diinputkan, jadi jika kita tentukan misal X[6] maka array tersebut hanya akan memuat 6 buah elemen / nilai.

ok sekian dulu pengenalan tentang array. nanti kita akan sambung lagi ...

Perulangan dengan PowerBuilder 8.0 bagian 2

Perulangan dengan powerbuilder 8.0 bagian 2

(Deret 2)

Baiklah untuk pertemuan kali ini kita akan mencoba untuk berlatih membuat suatu deret (masih tentang perulangan). Kali ini kita akan membuat sebuah aplikasi yang akan menampilkan deret sebagai berikut 2 3 5 8 13 21 … n. mari kita perhatikan, deret tersebut memiliki pola : deret pertama (2) merupakan nilai awal, deret kedua (3) merupakan hasil pertambahan dari nilai awal (2) dengan nilai sebelum 2 yaitu 1. deret ketiga merupakan hasil pertambahan dari deret pertama (2) dengan deret kedua (3). Deret keempat (8) merupakan hasil pertambahan dari deret kedua (3) dengan deret ketiga (5). Begitu seterusnya ….
2 = nilai awal
3 = 2 + 1
5 = 2 + 3
8 = 3 + 5
Nah sekarang kita tinggal menentukan formula dari pola tersebut (ini yang agak memusingkan J). Baik kita coba.
Kita umpamakan deret tersebut dengan a,b,c
a = deret hasil
b = deret 1
c = deret 2
jadi
a = b + c
selanjutnya kita perlu menukar nilai dari variabel variabel tersebut
langkah selanjutnya kita perlu menukar nilai dari variabel b dengan nilai dari variabel c,
b = c
kemudian kita juga perlu meukar nilai dari variabel b dengan nilai dari variabel a,
c = a
(bingung …??? .. iya saya juga bingung menjelaskanya tapi begitulah logikanya menurut saya ... he he he ...).
Ok lah dari pada bingung bingung kita lanjut saja pada contoh aplikasi nya.
Kita jalankan powerbuilder sampai muncul form kerja. Kita beri nama w_deret
Setelah form kerja tampil kita buat sebuah list box dengan nama default lb_1. lalu kita buat sebuah single line edit untuk memasukan jumlah deret yang akan kita tampilkan disini saya berinama txt_batas. lalu kita buat sebuah command button untuk perintah menampilkan deret, kita berinama cmd_tampil dan kita beri nilai DERET atau apalah sesuai selera. Setelah itu kita tuliskan power script berikut ini:

int a,b,c,d,k
d=integer(txt_batas.text)
b=1
c=1
do until (k>=d)
k=k+1
a=b+c
lb_1.additem(string(a))
b=c
c=a
loop

coba kita jalankan jangan lupa kita beri perintah.
open(w_deret)
Lalu kita lihat hasilnya …
setelah berhasil kita bisa tambahkan pada aplikasi kita dengan command button – command button lain misal command button untuk reset, hapus dan jumlah dari deret
untuk mencari nilai jumlah kita hanya perlu menambahkan sebauh single line edit untuk menapung nilai jumlah tersebut misal kita buat sebuah single line edit dengan nama txt_jumlah. Lalu kita buat command button jumlah dan kita tuliskan power sript berikut.

//jumlah

int a,b,c,batas,jumlah,k
batas=integer(txt_batas.text)
b=1
c=1
jumlah = 0
do until (k>=batas)
k=k+1
a=b+c
lb_1.additem(string(a))
b=c
c=a
jumlah=jumlah + a
loop
txt_jumlah.text=string(jumlah)

power sript untuk reset

//reset
lb_1.reset()
txt_batas.text=""
txt_jumlah.text=""

power script untuk close

//close
close(w_deret)

itu saja latihan kita kali ini nanti kita sambung dengan latihan – latihan yang lainya. Mohon maaf dan koreksi jika ada kesalahan – kesalahan baik dalam logika berpikir, script maupun cara penyampaian. Terima kasih atas perhatian.

Bantu palestina dengan doa.
Save palestine …!!!

Dipersembahkan oleh Dian Heryana

Dipersembahkan kepada Bapak Deny Martha, S.T.

bingung

lagi bingung harus ngapain ...
jadinya yaa ... ga ngapa ngapain :(

Save Palestine

SAVE PALESTINE ... !!!

STOP WAR !!!