E N D
BORLAN DELPHI Apa itu Borland delphi ??? Borland Delphi 7 merupakan bahasa pemrograman berbasis Windows. Delphi 7 dapat membantu untuk membuat berbagai macam aplikasi yang berjalan di sistem operasi Windows, mulai dari sebuah program sederhana sampai dengan program yang berbasiskan client/server atau jaringan. Delphi, termasuk aplikasi yang dapat digunakan untuk mengolah teks, grafik, angka, database dan aplikasi web.
Berikut ini sebagian kecil dari banyak kelebihan Borland Delphi 7:Berbasis Object Oriented Programming (OOP). Setiap bagian yang ada pada program dipandang sebagai suatu object yang mempunyai sifat sifat yang dapat diubah dan diatur. Satu file .exe.(file komputer yang diakhiri dengan ekstensi “. Exe” atau dikenal sebagai file eksekusi.) Setelah program dirancang dalam IDE (Intergrated Development Environment) Delphi, Delphi akan mengkompilasinya menjadi sebuah file executable tunggal. Program yang dibuat dapat langsung didistribusikan dan dijalankan pada komputer lain tanpa perlu menyertakan file DLL dari luar. Ini merupakan sebuah kelebihan yang sangat berarti.Borland Delphi 7 hadir bersama Borland Kylix 3 yang berbasiskan Linux, sehingga memungkinkan programmer untuk membuat aplikasi multi-platform.
CONTOH PROGRAM BORLAND DELPHIKALKULATOR SEDERHANA 2. Pada button “ –“ klik 2x dan paste code berikut : b1:integer; b2:integer; jml:integer; begin b1:=StrToInt(Eb1.Text); b2:=StrToInt(Eb2.Text); jml:=b1-b2; //operasi pengurangan Ejml.text:=FloatToStr(jml); end; 1. Klik 2x pada button “ + “,kemudian paste kode berikut : b1:integer; b2:integer; jml:integer; begin b1:=StrToInt(Eb1.Text); b2:=StrToInt(Eb2.Text); jml:=b1+b2; ///operasi penambahan Ejml.text:=FloatToStr(jml); End;
4. Pada operasi perkalian,paste code berikut : b1:integer; b2:integer; jml:integer; begin b1:=StrToInt(Eb1.Text); b2:=StrToInt(Eb2.Text); jml:=b1*b2; Ejml.text:=FloatToStr(jml); end; 3. Klik 2 x pada button “ / “, kemudian paste code berikut : b1:integer; b2:integer; jml:integer; begin b1:=StrToInt(Eb1.Text); b2:=StrToInt(Eb2.Text); jml:=b1 div b2; Ejml.text:=FloatToStr(jml); end; 6. Sedangkan untuk button “KELUAR” anda hanya tinggal menambahkan code berikut “ close ; “ tanpa tanda kutip. 5. Untuk button “ulang” paste lagi code berikut : begin Eb1.Text:='0'; Eb2.Text:='0'; Ejml.Text:='0'; end;