POLTEKAD ANGKATAN DARAT

JURUSAN TELEKOMUNIKASI

PRAKTIK BAHASA PEMROGRAMAN

PERCOBAAN 1

PRAKTIK OBJEK EMBERCADERO DELPI XE5 DAN DATA PRIBADI

1. Tujuan Praktikum. Agar Bintara Mahasiswa mampu mempratikkan percobaan I Object Delphi dan Data Pribadi dengan menggunakan software Embarcadero XE5.

2. Alat dan Bahan. 

a. Laptop/PC; 

b. Software Embarcadero Delpi XE5;

3. Landasan Teori.

Materi ini membahas

a. Form : adalah dasar dari aplikasi Windows. Form dipakai untuk

menempatkan komponen, control dan lain-lain. Informasi mengenaiform disimpan didalam dua file yaitu file .dfm dan .pas.File .dfm berisi informasi mengenai tampilan form ukuran lokasi dan seterusnya. Sedangkan file pas untuk menyimpan program control atau disebut juga dengan unit.

b. Label : Komponen yang hanya digunakan untuk menambahkan sebuah teks di dalam form

c. Button : Komponen yang dipakai untuk membuat button yang akan dipakai untuk memilih pilihan di dalam aplikasi. Jika mengklik komponen button tersebut maka suatu perintah atau kejadian akan dijalankan

4. Langkah-Langkah Percobaan

a. Mengaktifkan laptop Sampai Muncul pada Tampilan Dekstop Laptop;

b. Membuat folder dengan nama Percobaan 1Program Delphi XE5 lalu klik tombol File pada pojok kiri atas di layar laptop dalam aplikasi Delphi klik New > VCL From Aplication-Delphi;

c. Rangkailah lembar kerja form sesuai yang diharapkan, Setiap icon dari toolbox akan dimasukkan ke jendela form yang akan menghasilkan program yang dijalankan dengan kode-kode;

d. Lalu Cari Tombol TLabel Pada Tool Palette > dan cari Tlable di standart > Letakkan sesuai Dilayar Form yang kita buat tadi > Berikut Atur Properties property setiap Opject sebagai Berikut;

Tabel 1.1 Pengaturan melalui jendela properties

Object	Properties	Value
Form1	Caption	Srda Nadhif MH
Label1	Caption	Nama :Nadhif Misbachul Hidayat
Label2	Caption	Pangkat/NRP : Serda 21160115331296
Label3	Caption	Tempat/Tgl Lahir : Malang, 12 Des 1996
Label4	Caption	Asal Kesatuan : DYinzipur 6/SD
Label5	Caption	Jabatan : Danru Lidikkam ton 2 Ki markas
Image	Picture	Uploud : “Foto Personil” di PC/laptop
Button1	Caption	Dataku
Button2	Caption	Tutup

e. Buat syntax program/coding, Program dapat berhasil dan sukses terlaksana bila kode dibuat sesuai ketentuan yang berlaku. Tampilan jendela kode dapat muncul bila di jendela form icon yang dibuat dari toolbox dilklik dua kali atau klik menu view- setelah itu pilih klik code. Setelah kode dibuat klik tombol silang di kanan pojok jendela kode tersebut, maka kode sudah berjalan dapat dibuktikan dengan klik tombol play pada menu toolbar;dan

f. Sampai jendela form memunculkan UI (User interface) Data Pribadi , dengan klik pada button1 (Dataku) akan memunculkan data dan klik button2 (Tutup) untuk menghilangkan data pribadi.

5. Hasil Percobaan.

1) Siapkan Alat dan Bahan. 

 Gambar 1.1 PC / Laptop

a. Membuat forder dengan nama Percobaan 1 Praktik Bahasa Pemrogaman;

                                             Gambar 1.2 Pembuatan forder percobaan

b. Membuka Aplikasi Embarcadero Delphi XE5

                                      Gambar 1.3 icon Dolphi/ embarcadero XE5 di laptop

c. Rangkailah lembar kerja form sesuai yang diharapkan, Setiap icon dari toolbox akan dimasukkan ke jendela form yang akan menghasilkan program yang dijalankan dengan kode-kode. Sesuai Tabel Jendela Properties atur property setiap object akan mendapatkan lembar kerja seperti pada tampilan berikut ini.

                                      Gambar 1.5 Hasil lembar kerja form yang telah dibuat

d.     Buat syntax program/coding, Program dapat berhasil dan sukses terlaksana bila kode dibuat sesuai ketentuan yang berlaku. Tampilan jendela kode dapat muncul bila di jendela form icon yang dibuat dari toolbox dilklik dua kali atau klik menu view- setelah itu pilih klik code. Setelah kode dibuat klik tombol silang di kanan pojok jendela kode tersebut, maka kode sudah berjalan dapat dibuktikan dengan klik tombol play pada menu toolbar.

                                              Gambar 1.6 Syntax /Coding yang telah Di buat

unit Unit1;

interface

uses

  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,

  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.Imaging.jpeg,

  Vcl.ExtCtrls;

type

  TForm1 = class(TForm)

    Label1: TLabel;

    Label2: TLabel;

    Label3: TLabel;

    Label4: TLabel;

    Label5: TLabel;

    Button1: TButton;

    Button2: TButton;

    Image1: TImage;

    procedure Button1Click(Sender: TObject);

    procedure Button2Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

 Label1.Visible:=True;

 Label2.Visible:=True;

 Label3.Visible:=True;

 Label4.Visible:=True;

 Label5.Visible:=True;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

 Label1.Visible:=False;

 Label2.Visible:=False;

 Label3.Visible:=False;

 Label4.Visible:=False;

 Label5.Visible:=False;

end;

end.

e. Sampai jendela form memunculkan UI (User interface) Data Pribadi , dengan klik pada button1 (Dataku) akan memunculkan data dan klik button2 (Tutup) untuk menghilangkan data pribadi.

                         Gambar 1.7 Jendela UI Data pribadi muncul ketika tombol play diklik.

Gambar 1.8 Setelah Button1 (Dataku) diklik akan memunculkan Data pribadi, dikarenakan coding yang telah dibuat dengan Visible true.

Gambar 1.9 Setelah Button2 (Tutup) diklik akan menghilangkan Data Pribadi, dikarenakan coding yang telah dibuat dengan Visible False.

f. Dapat diketahui Percobaan berhasil dengan baik setelah mengetahui data berjalan dengan baik sesuai yang diharapkan.

6. Analisa Percobaan.

Dalam Percobaan kali ini Saya Membuat sebuah From Yang telah Di berikan kepada saya Dan saya mengalami sedikit Kesulitan dalam Aplikasi ini dikarenakan ini adalah Aplikasi yang baru pertama kali saya Coba, Tetapi dengan sering menggaplikasikan Aplikasi ini sehingga saya mulai terbiasa untuk mengerjakan semua tugas yang Dosen berikan kepada Saya, Dalam kali ini saya menggaplikasikan sebuah visible true dan Visible False dimana Saya belajar memunculkan dan Menghilangkan kembali sebuah Kalimat yang ada di sebuah from dan saya telah memberikan Sebuah Coding, Lembar kerja dapat dikatakan berjalan dengan baik bila coding dan object berjalan sesuai yang diharapkan

7. Kesimpulan Dan Saran.

Kesimpulan :

Setelah  melakukan Praktik dengan Aplikasi Embercadero Delphi XE5 ini kita jadi tau dan menjadi lebih paham mengenai Aplikasi ini Kebutuhan program aplikasi di zaman sekarang sangatlah penting. 

Dari Uraian pengenalan Program Delphi di atas penulis dapat mengambil kesimpulan bahwa program Delphi adalah sebuah IDE Compiler untuk bahasa pemrograman Pascal dan lingkungan pengembangan perangkat lunak yang digunakan untuk merancang suatu aplikasi program.

Saran :

 Bila Bintara Mahasiswa mau untuk menambah pengetahuan tentang Embarcaderon XE5 / Delphi maka Bintara Mahasiswa akan mampu memahami aplikasi tersebut dan dapat menjalankan aplikasinya sesuai perintah codding / syntax yang sesuai dan berjalan dengan lancer.