Mungkin bahan ini cukup dasar, tapi bagi yang gres mencar ilmu niscaya bahan ini sangat berguna. Oleh alasannya itu silahkan menyimak bagi anda yang membutuhkan :-).
Nah kasusnya disini yakni dikala kita memiliki edit box (yang secara default bernilai STRING) yang notabene selalu kita jadikan kolom input pastinya akan salah kalau kita secara gamblang memakai edit box tersebut untuk operasi aritmatika (contoh: editbox1.text + editbox2.text), sebenarnya teknik ini tidak hanya sanggup diterapkan pada editbox saja akan tetapi komponen yang lain macam combo box pun bisa.
Ok to the point saja, disini aku menciptakan sebuah projek, hanya ada satu form dan dilam form tersebut ada 3 edit box dan 1 button.
editbox1 dan editbox2 sebagai kolom inputan, sedangkan editbox3 sebagai media output (menampilkan hasil) dan button1 sebagai validator (tempat aku menyimpan coding perhitungan).
Makara teknik yang aku gunakan disini yakni memakai perintah INTtoSTR dan STRtoINT. Biar aku jelaskan dulu, perintah INTtoSTR ini akan mengkonversi tipe data integer menjadi string sedangkan perintah STRtoINT akan mengkonversi tipe data string menjadi integer.
Telah aku bahas diatas bersama-sama editbox secara default akan bernilai string sehingga jikalau kita pribadi melaksanakan perhitungan maka Delphi akan merespon error. Sehingga dengan teknik yang sudah dijelaskan pada paragraf sebelumnya tipe data akan diubah menjadi integer.
Berikut ini yakni teladan penulisan syntax-nya:
procedure TForm1.Button1Click(Sender: TObject);
begin
edit3.Text:=inttostr(strtoint(edit1.Text)+strtoint(edit2.Text));
end;
Command/syntax diatas ditulis pada component Button1 pada Event OnCLick.
Catatan:
Jika dengan memakai INTtoSTR dan STRtoINT Delphi masih merespon error, maka gunakan FloatToSTR ataupun STRtoFloat. Penulis meengasumsikan tipe data INT (Integer) terlalu kecil sehingga tidak bisa menampung data konversi, itulah mengapa dipakai FLOAT.
Sumber http://farihinmuhamad.blogspot.comOk to the point saja, disini aku menciptakan sebuah projek, hanya ada satu form dan dilam form tersebut ada 3 edit box dan 1 button.
Makara teknik yang aku gunakan disini yakni memakai perintah INTtoSTR dan STRtoINT. Biar aku jelaskan dulu, perintah INTtoSTR ini akan mengkonversi tipe data integer menjadi string sedangkan perintah STRtoINT akan mengkonversi tipe data string menjadi integer.
Telah aku bahas diatas bersama-sama editbox secara default akan bernilai string sehingga jikalau kita pribadi melaksanakan perhitungan maka Delphi akan merespon error. Sehingga dengan teknik yang sudah dijelaskan pada paragraf sebelumnya tipe data akan diubah menjadi integer.
Berikut ini yakni teladan penulisan syntax-nya:
procedure TForm1.Button1Click(Sender: TObject);
begin
edit3.Text:=inttostr(strtoint(edit1.Text)+strtoint(edit2.Text));
end;
Command/syntax diatas ditulis pada component Button1 pada Event OnCLick.
Catatan:
Jika dengan memakai INTtoSTR dan STRtoINT Delphi masih merespon error, maka gunakan FloatToSTR ataupun STRtoFloat. Penulis meengasumsikan tipe data INT (Integer) terlalu kecil sehingga tidak bisa menampung data konversi, itulah mengapa dipakai FLOAT.
