Konversi Delphi

siph".... haha setelah lama vacum untuk nge-blog, sekarang ane mau ngeshare tentang delphi. yuk mari simak :D


Dalam delphi kita mengenal tentang pengkonversian. Pengkonversian ini di tujukan untuk mengubah suatu string(tampilan) menjadi tipe datannya masing".... misalkan untuk mengkonversi string menjadi integer maka syntax-nya "StrToInt(.....)". Nah misalkan agan" bertanya "kenapa kita harus mengkonversikan ?", pertanyaan bagus(weleh" kyak ibu guru ane, hehe). Itu di karenakan Semua yg tampil, yg ada atau yg kita lihat di form itu semua bersifat string

jadi kita tidak bisa melakukan proses aritmatika. nih ane share beberapa syntax pengkonversia, sebagai berikut :D....

Type data	Konversi Program	Konversi Kelayer
Integer	StrToInt	IntToStr
Date	StrToDate	DateToStr
Time	StrToTime	TimeToStr
Real	StrToFloat	FloatToStr
Currency	StrToCurr	CurrToStr

nah tuh lumayan banyak kan.... tapi itu di balik" aja kok hehe....
Dalam pengkonversian tersebut juga berkaitan dengan variabel. nih syntax untuk ngasih variabel.
var  namavar1, namavar2 : Type_data1 ;
     namavar3,namavar4  : Type_data2 ;


nih ane beri contoh deh gan ;D
pertama sediain dulu 3 EditBox, 1 Button dan 2 Label atur seperti gambar dibawah

setelah itu ganti namanya beserta captionnya. untuk menggantinya, klik object lalu pada tabel properties ganti "name" dan "caption"nya

lalu ubah object"nya sebagai berikut :D

Object	Properties
Edit1	Name	EdData1
	Text	0
Label1	Caption	+
Edit2	Name	EdData2
	Text	0
Button1	Name	BtResult
	Caption	Result
Label2	Caption	Hasil
Edit3	Name	EdHasil
	Text	0

setelah agan ganti, klik dua kali(double click) pada button result

ket:
1 -> itu adalah pendeklarasian variabel yg akan kita gunakan dalam proses program. peletakannya memang disana(diantara procedur dan begin). kalo agan naruhnya di dalam begin, gag mau jalan gan :D
2 -> itu adalah pengkonversi string menjadi integer, karena kita akan melakukan proses aritmatika
3 -> itu adalah proses aritmatikanya
4 -> itu adalah menampilkan kembali ke layer hasil dari proses aritmatika tadi
nah begitu deh gan.... coba" aja, nanti pasti bisa kok....
kalo agan bisa yg diatas, coba buat program sederhana berikut gan, nih Downloadnya :D


udah dulu ya gan mpe disini dulu. nannti pada sesion berikutnya ane share yg laen.... :D
salam blogger agan" :)


"Selalu bekerja keras, meskipu kita gagal belumtentu kita berakhir. Mari kita berdiri lagi dan belajar dari kegagalan kita tersebut untuk mencapai ke Suksesan kita"