BORLAND DELPHI
Borland Delphi 7.0 merupakan bahasa pemrograman berbasis windows. Bahasa pemrograman Delphi merupakan bahasa pemrograman yang dikembangkan dari bahasa pascal.
Pengenalan IDE (Integrated Development Environtment)
Merupakan lingkungan/wilayah dimana seluruh tools atau component –komponent yang dibutuhkan untuk merancang atau membangun aplikasi.
Menjalankan delphi:
- Start
- 
Boorland Delphi 7.0
Boorland Delphi 7.01. Component Pallete
Kumpulan component yang digunakan dalam membuat suatu program yang akan diletakkan dalam sebuah form.
2. Menu
Merupakan penunjuk ke seluruh fasilitas yang disediakan Delphi.
3. Object Treeview
Menampilkan daftar komponen yang digunakan dalam pengembangan aplikasi sesuai dengan penempatannya.
4. Object Inspector
Digunakan untuk mengatur property dan event suatu komponen.
5. Toolbar
Merupakan icon yang dirancang untuk lebih memudahkan menjangkau fasilitas yang ada pada Delphi.
6. Form Designer
Merupakan interface aplikasi yang akan dibangun, yang akan menampung seluruh komponen yang akan digunakan dalam proses perancangan aplikasi.
7. Code Editor
Tempat untuk menuliskan code program menggunakan bahasa object pascal.
8. Code Explorer
Untuk memudahkan dalam berpindah antar file unit di dalam jendela code editor.
Struktur File pada Delphi :
1. File Project
Merupakan kepala dari file, artinya seluruh file yang lain akan berada di dalam file project, ekstensi dari file ini adalah *.dpr
2. File Form
Merupakan file yang berfungsi sebagai interface aplikasi yang menampung selluruh komponen, ekstensi dari file ini adalah *.dfm
3. File pass
Merupakan file yang menampung listing program dari sebuah aplikasi, ekstensi dari file ini *.pas
KOMENTAR
Komentar dipakai untuk memberikan penjelasan atau keterangan di dalam baris program. 3 bentuk komentar :
- Kurung kurawal -> {komentar}
- Kurung bintang -> (*komentar*)
- Slash ganda -> // hanya untuk 1 baris
Latihan f_pertama
unit f_coba;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
bcontinue: TButton;
bnext: TButton;
procedure bcontinueClick(Sender: TObject);
procedure bnextClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.bcontinueClick(Sender: TObject);
begin
Label2.Caption:='Selamat Mencoba';
Label2.Font.Color:=clGreen;
label2.Font.Size:=14;
end;
procedure TForm1.bnextClick(Sender: TObject);
begin
close;
end;
end.
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm2 = class(TForm)
GroupBox1: TGroupBox;
GroupBox2: TGroupBox;
Edit2: TEdit;
bmerah: TButton;
bhijau: TButton;
bblue: TButton;
bkuning: TButton;
edit1: TEdit;
procedure bmerahClick(Sender: TObject);
procedure bhijauClick(Sender: TObject);
procedure bblueClick(Sender: TObject);
procedure bkuningClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
{$R *.dfm}
procedure TForm2.bmerahClick(Sender: TObject);
begin
edit1.Color:=clRed;
edit1.Text:='Warna';
Edit2.Color:=clGreen;
Edit2.Text:='Warni';
end;
procedure TForm2.bhijauClick(Sender: TObject);
begin
edit2.Color:=clRed;
edit2.Text:='Warna';
Edit1.Color:=clGreen;
Edit1.Text:='Warni';
end;
procedure TForm2.bblueClick(Sender: TObject);
begin
form2.Color:=clBlue;
end;
procedure TForm2.bkuningClick(Sender: TObject);
begin
form2.Color:=clYellow;
end;
end.
