Pertemuan -1 BORLAND DELPHI • PENDAHULUAN
• Borland Delphi => Sebuah pemprograman untuk menggantikan Turbo Pascal dengan bantuan Visual. Dalam Borland Delphi terdapat IDE ( Integrated Development Environment ) • IDE ( Integrated Development Environment ) Lingkungan terpadu yaitu tempat merancang menyimpan, memeriksa kesalahan, menjalankan Program
• Delphi =>Kompiler/peterjemah bahasa Delphi ( awalnya Pascal) yang merupakan bahasa tingkat tinggi dan pemprograman berbasis objek • Sebuah Software/ Aplikasi berbasis windows dan Pemprograman berbasis objek • Pemprograman berbasis objek semua komponen yang ada merupakan objekobjek. • Ciri-ciri sebuah objek memiliki Nama, Properti dan method/Procedure
Lingkungan Terpadu Delphi
•
MENU UTAMA yang terdiri dari File, Edit, Search, View, Project, Run, Component, Database, Tools, dan Help
•
Tombol Cepat untuk menjalankan fungsi dengan cepat dan mudah dari menu utama yang sering dipakai
•
Komponen Visual Komponen yang mempergunakan suatu fungsi tertentu seperti Standardt, Additional, Win32 dam lain-lainya yang disebut dengan VCL ( Visual Component Library )
•
Object Inspector Tempat untuk memilih atau menentukan Properties, Event dari suatu Objek terdapat 2 bagian yaitu : Properties dan Event. Properties untuk menggantikan properti(kepemilikan) sebuah objek Event suatu kejadian yang dimiliki oleh sebuah objek
•
Form Form adalah tempat kita untuk merancang tampilan program atau menenpatkan obejk-objek tertentu
•
Method Method adalah suatu perintah Modul berisi beberapa kode program atau procedure yang dipakai dalam aplikasi
•
Dalam Delphi terdapat 3 File Utama 1. *.dpr File Objek yang berisi program kecil untuk mengorganisasikan sebuah fakta dan membangun form serta menjalankan Aplikasi 2. *.pas unit-unit pascal code yang terdiri banyak file 3. *.dfm file definisi form ( special pseudo code file )
Pertemuan-2 FORM & KONTROL 1. Form Form adalah tempat dimana kita dapat membuat tampilan ( user interface) dari program aplikasi
KONTROL • Kontrol Tombol yang digunakan untuk menampilkan data atau membaca data serta berinteraksi dengan program • Tombol Kontrol terdapat didalam Component Palette Standard
• Pemakai objek kontrol akan memudahkan dalam pembuatan progam aplikasi guna berinteraksi progam dengan aplikasi • Label digunakan sebagai tempat untuk menampilkan teks atau tulisan pada form • Edit Box digunakan sebagai tempat untuk mengisi atau menampilkan data • Button Dipakai untuk melakukan suatu proses/event
• Combo Box untuk menampilkan daftar pilihan dan anda dapat memilih satu pilihan dari pilihan yang ada dalam daftar. • List Box untuk menampilkan daftar pilihan tetapi hanya satu pilihan yang terlihat. • Check Box untuk menampilkan daftar pilihan tetapi dapat memilih lebih dari satu pilihan yang ada
• Radio Button untuk menampilkan daftar pilihan tetapi hanya satu pilihan yang ada • Group Box mengelompokkan kontrol-kontrol pada form menjadi satu bagian • Radio Group mengelompokkan kontrol-kontrol hanya untuk meletakkan Radio Button • Memo untuk tempat mengisi atau menampilkan data
• Panel untuk memberikan tempat bagi kontrol-kontrol yang lain dan dapat dikelompokkan menjadi satu kesatuan
Pertemuan-3 KONTROL LANJUTAN • TOOLBAR Toolbar Salah satu kontrol yang digunakan u/ meletakkan tombol. dimana Kontrol Toolbar terdapat pd Componen Palette tab Win32. • Image List Kontrol yang dipakai u/ menyimpan daftar gambar pada Tollbar. Dan harus terdapat Componen Palette tab Win32
• Progressbar Kontrol yang dipakai u/ melihat proses yang sedang berlangsung. Dan harus terdapat Componen Palette tab Win32 • Status Bat Kontrol yang dipakai sebagai tempat u/ memberikan keterangan tambahan pada Form dan harus terdapat Componen Paltte tab Win32 ex.Keterangan tanggal, Caps Lock
• Scrollbar Kontrol yang digunakan u/ menggerakkan sesuatu, menggerakkan nilai atau tampilan • Scrollbar terdapat 2 jenis yaitu 1. Vertical Scrollbar 2. Horizontal Scrollbar
• Tampilan Toolbar
JENIS DATA • Variabel Suatu tempat untuk menampung nilai yang bersifat sementara, nilai yang akan dimasukkan harus sesuai dengan tipe data dari variabel ex. Var Counter : Integer; Begin Counter := 100; End;
• Konstanta Sebuah variabel yang nilainya tetap atau tidak berubah-ubah ex. Const Jum_hari = 7; biasanya pendeklarasian sebuah konstanta dapat dilakukan pada sebuah procedure atau function • Type Data Shortstring, Boolean, Integer, Byte, Word, Real Single, Double, Currency dan Variant
• Array Sebuah variabel yang dapat menampung lebih dari satu anggota data atau elemen, Array harus menggunakan Indek untuk setiap anggotanya. ex. ArrNama[1]:= ‘ STMIK’; • Operator Dalam operator utama terdapat 3 jenis yaitu 1. Operator Operasi Aritmatika ex. +, -, * Div, Mod 2. Operator Operasi perbandingan ex. =, < , > , < = dll
3. Operator Operasi Logika ex. Not, And, Or
Pertemuan-4 MENU APLIKASI Menu digunakan untuk memudahkan user untuk Memilih program aplikasi yang dipilih. Menu dibagi 2 bagian : 1. Pull-Down 2. Pop-up Menu Pull-Down menu Menu Utama atau judul dr menunya Pop-up Menu Menu Utama yang tidak kelihatan pada form untuk melihat dg click kanan.
• Membuat Menu Utama - Pilih tombol Mainmenu letakkan pada form - Click kanan pada Mainmenu kemudian pilih Menu Designer - pada Object Inspector pilih Caption ketik FILE click - Submenu click pada FILE click kanan pilih Create Submenu, ketik PROJECT pada posisi object inspector posisi Caption, dst
• Buatlah Menu Aplikasi seperti dibawah ini
Pertemuan-5
DECISION & LOOP • Decision Percabangan merupakan pemilihan keputusan untuk eksekusi program berdasarkan kondisi yg ditetapkan. 1. If – Then Pemilihan hanya untuk satu bagian atau satu percabangan yaitu jika kondisi terpenuhi , hanya satu bagian percabangan yang dikerja kan dan jika kondisi tidak terpenuhi maka tdk ada yang dikerjakan.
• B.U : If < kondisi > Then Begin < Pernyataan > ………….. < Pernyataan > dst End; 2. If – Then – Else Pemilihan dua bagian percabangan yaitu jika kondisi terpenuhi ,maka pernyataan 1 yang dikerjakan dan jika kondisi tidak terpenuhi maka pernyataan 2 dilaksanakan.
• B.U : If < kondisi > Then Begin < Pernyataan > ………….. < Pernyataan > End Else Begin < Pernyataan > ………….. < Pernyataan > End;
3. Case Digunakan u/ percabangan yang banyak dan dapat memudahkan untuk menentukan perca bangan dalam jumlah yang banyak. • B.U : Case
Of <Ekspresi>:; <Ekspresi>:; ………………. Else End;
• Ex: Case a Of 1 : B:= 1; 2 : B:= 2; 3 : B:= 3; 4 : B:= 4; Else B:= 0 End;
• Loop Looping atau perulangan proses eksekusi secara berulang-ulang sampai kondisi yang membatasi perulangan terpenuhi Jenis Looping 1. For untuk mengetahui sampai berapa kali perulangan tersebut akan dilakukan, dimana harus memiliki nilai awal dan nilai akhir dari perulangan yang dilakukan. B.U : For < Var >:= To Do atau
For < Var >:= DownTo Do ; ex. Var Counter, A :Integer; Begin For Counter:= 1 to 5 Do A:= Counter; End;
2. While – Do digunakan jika anda belum mengetahui berapa banyak perulangan yang akan dilakukan. Perulangn ini akan berhenti jika kondisi telah bernilai Salah( False) , jadi selama kondisi masih bernilai benar (True) perulangn akan melakukan terus menerus. B.U : While < kondisi> Do ;
ex. Counter :=1; While Counter < 6 Do Begin Counter:=Counter + 1 End; 3. Repeat – Until digunakan jika anda belum mengetahui berapa banyak perulangan yang akan dilakukan. Perulangn ini akan berhenti jika kondisi telah bernilai Benar( True) , jadi selama kondisi masih bernilai Salah (False) perulangn akan melakukan terus menerus.
B.U : Repeat ; ------------------< Pernyataan>; Until ; ex. Counter :=1; Repeat Counter := Counter + 1; Until Counter > 6;
Pertemuan-6 & 7 Procedure & function • Procedure Sebuah Blok Progrm yang didalamnya dapat menulis kode program. Dan tidak ada nilai yg dikembalikan ( Return Value) • Procedure Umum Procedure yg dibuat sendiri pada waktu pembuatan progam aplikasi. B.U : Procedure(Parameter); ; Begin End;
Ex. Procedure TampilPesan(); Begin
ShowMessage(‘STMIK JAYAKARTA’); End; • Event Procedure Procedure dari setiap event pada objek, dan dijalankan pada waktu event program dijalankan. B.U : Procedure (Parameter); Begin End;
ex. Procedure Tform.Button1Click(Sender:TObject); Var A,B ,C: Integer; Begin A := 2; B:= 3; C:= A * B ; End; Untuk membuat sebuah Event procedure dibuat pada bagian Object Inspector Tab Events
• Function Sebuah Blok Progrm yang didalamnya dapat menulis kode program. Dan ada nilai yang dikembalikan B.U : Function(Parameter): <Tipe_Data>; ; Begin End;
Ex. Function Kuadrat(Nilai:Integer):Integer; Begin Kuadrat := Nilai * Nilai ; End;
Pertemuan -7 Soal Latihan • Buatlah Program dibawah ini dengan tampilan Form . • Dengan ketentuan sebagai berikut : Kode Pemakai Jenis Pemakai Biaya KWH SO Sosial 50000 RT Rumah Tangga75000 PR Perushaan 125000 • Jumlah Pakai = Akhir – Awal • Jenis Bayar : • Jika Cash Biaya Administrasi 15000 Jika Bank Biaya Adminstrasi 250000
• Dengan tombol Proses Pembayaran : • Proses : Jumlah Akhir * Biaya KWH +Administrasi • Input Data : Digunakan untuk memasukkan data Pelanggan Baru • Selesai : Keluar dari Program
Tampilan Formnya :
Pertemuan - 9 DATABASE DELPHI • DATABASE MICROSOFT ACCESS Database adalah suatu tempat untuk menyimpan data, Pada Database terdapat satu atau lebih table dan query A. MEMBUAT DATABASE - Dari Windows aktifkan Microsoft Access - Pada bagian New click Blank Access,muncul File New Database, Ketik Nama databasenya (PEGAWAI.MDB) disimpan pada directory c:\Data, Click Create
- Pilih Create table in Design View, pilih new pilih Design New,Click OK - Ketik Field-field yang sesuai dengan anda Nip - Text - 6 ( * Primary Key) Nama - Text - 20 Alamat - Text - 30 Gaji - Number - 7 Isi Recordnya = 10 Buah - Simpan Tabel ,Ketik Nama Tabel ( GAJI),Click Ok - Para Penentuan Primary Key , Jawab Yes .
B. MEMBUKA TABEL &MENGISI RECODNYA. 1. Pada Kotak Dialog Database tab Tables, Click Open 3 2. Setelah table dibuka isi recordnya Menentukan Querynya :pada Tab Query , Pilih Create Query in design view / New pada Show Table pilih Nama Tabel kemudian ADD Tabel Gaji click CLOSE
• COMPONENT PALLETE TAB ADO
Komponen ADO ( ActiveX Data Object) digunakan untuk membuat Aplikasi Database , Komponen tersebut terdapat pada Component Pallete tab ADO • Jenis Komponen ADO
• ADO CONNECTION Berfungsi u/ membuat koneksi atau hubungan dengan DATABASE, Untuk dapat mengakses suatu Database maupun objek-objek dalam Database. • ADO COMMAND Berfungsi u/ memanipulasi record atau data dari Tabel pada Database biasanya menggunakan SQL
• ADO DATASET Berfungsi u/ membaca record atau data dari tabel pada Database • ADO TABLE Berfungsi untuk membaca record atau data dari tabel pada Database • ADO QUERY Berfungsi untuk melakukan menipulasi pada record atau data pada tabel an dapat juga digunakan untuk membaca data atau untuk melakukan operasi pada tabel yang tidak mengembalikan nilai hasil membaca record atau data dari tabel pada Database.
• DBGRID Berfungsi untuk menampilkan beberapa record • DATA SOURCE Berfungsi untuk menampung beberapa data
ADO CONNECTION 1. Tampilkan Form kosong ambil komponen ADOC Connection dan letak didalam Form tersebut seperti tampilan disamping ini .
2. Laksanakan Koneksi ke Database dengan click property Connection String dari ADOC Connection pada Object Inspector
3. Muncul tampilan seperti dibawah ini
pilih Use Connection String click pada Build muncul tampilan kotak dialog Data Link Properties tab Provider pilih Microsoft Jet 4.0 OLE DB Provider
• Pilih Next muncul tampilan kotak dialog Data Link Properties tab Connection • Pada bagian Select or enter a database name
• Pilih Nama Database kemudian click Open Click Ok
• Click pada kotak yang diberi tanda panah
Pada kotak dialog Select Access Database cari nama file Database yang Akan digunakan, kemudian Open maka akan muncul tampilan kotak dialog Data Link Properties tab Connection
MANIPULASI DATABASE 1. CREATE DATABASE ADO COMMAND ADO COMMAND salah satu komponen dari ADO yang berfungsi untuk memanipulasi record atau data dari table pada Database a. Tampilkan Form kosong, masukkan sebuah ADO Connection dan ADO Command pada Form seperti dibawah ini
b. Aturlah Koneksi Properti Connection dari ADO Command isi nama dari ADO Connection c. Aktifkan Koneksi Database melalui ADO Connection d. Buatlah tampilan dg tombol–tombol seperti gambar diatas
•
Buatlah Propertinya : OBJEK PROPERTI SETTING Label1 Caption Pengisian Data Pegawai Label2 Caption KODE Label3 Caption NAMA PEGAWAI Label4 Caption ALAMAT Edit1 Name EdKode Text Kosongkan Edit2 Name EdNama Text Kosongkan Edit3 Name EdAlamat Text Kosongkan
•
MaskEdit1
Name mseGaji Text Kosongkan Button1 Name btnSimpan Caption SIMPAN Button2 Name btnSelesai Caption SELESAI ADOCommand Connection ADOConnection1 e. Aturlah koneksi melalui ADO Connection ke Database dbContoh dengan menggunakan Conncetion String f. Buatlah Programnya untuk Event SIMPAN dan SELESAI
• • • • • • • • • • • • •
Programnya : unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Mask, ADODB, DB; type TForm1 = class(TForm) ADOConnection1: TADOConnection; ADOCommand1: TADOCommand; Label1: TLabel; Label2: TLabel; Label3: TLabel;
• • • • • • • •
Label4: TLabel; Edit1: TEdit; Edit2: TEdit; Edit3: TEdit; ; MaskEdit1: TMaskEdit; Button1: TButton; Button2: TButton; Label5: TLabel
• • • • • • • • • • • • •
procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var sdql : string; begin
• • • • • • • • • • • • •
ADOCONNECTION1.Connected:=true; msql:=' insert into tbpegawai(Kode,Nama,'+ 'Alamat, Gaji) values("' + edKode.Text +' ",'+ '"' + edNama.Text+ '","' + edAlamat.Text +'",'+ '"' + mseGaji.Text + ')'; Adocommand1.CommandText:=msql; Adocommand1.Execute; edKode.Text:=' ' ; edNama.Text:=' ' ; edAlamat.Text:=' ' ; mseGaji.Text:=' ' ; end; end.
