Cara Membuat Software dengan Delphi

Hello,
Pernahkan terpikir bahwa membuat software itu mudah? dan Bagaimana sebuah software bisa memproses suatu printah?. Nah kali ini saya akan menjelaskan bagaimana cara membuat software mudah & sederhana menggunakan delphi. Namun sebelum mulai membuat software atau aplikasi, anda harus menginstall software delphi pada perangkat komputer anda terlebih dahulu.

Cara Menginstall Delphi 7 di Windows XP/7/8

Kalo delphi sudah terinstall, sekarang buka delphi anda. Pada saat membuka delphi, delphi akan secara automatis delphi membuat Form Application. Namun untuk membuatnya secara manual anda tinggal klik File > New > Application sedangakan untuk menambahkan Form Klik File > New > Form.


Gambar diatas adalah beberapa component bawaan delphi seperti Button, Edit, Label, Combobox dan masih bayak lagi. Bukan hanya component diatas saja yang bisa ditambahkan kedalam software yang sedang anda kerjakan, tapi anda juga bisa menambahakan component sebayak yang anda inginkan. Akan tetapi kali ini kita akan membuat software yang paling dasar atau paling sederhana hanya dengan menambahkan beberapa button saja.

1. Pertama tambahakan Button ( ) pada Form.
( Diharapkan sama dengan gambar diatas )

2. Tekan tombol F12 untuk berganti windows dari mode form ke code atau sebaliknya.

3. Tambahkan KODE PERINTAH dibawah ini, tepat dibawah kode {$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('Hari ini tanggal '+FormatDateTime('dd-mm-yyyy',Now));
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
MessageDlg(PChar('Sekarang tanggal '+FormatDateTime('dd-mm-yyyy',Now)),mtInformation,[mbOK],0);
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
MessageBox(handle,PChar('Aku mencintaimu, apa kamu juga mencintaiku?'),'Pertanyaan',MB_YESNO+MB_ICONINFORMATION+MB_TASKMODAL);
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
with CreateMessageDialog('Apa kamu sudah makan?',mtInformation,[mbOK]) do
  begin
    try
      begin
        Caption := 'Pertanyaan';
        Font.Name:= 'Times New Roman';
        Font.Size := 10;
        TButton(FindComponent('OK')).Caption := 'Sudah';
        ShowModal;
      end
    finally
      Free;
    end;
  end;
end;

4. Sesudah itu tekan tombol Ctrl+F9 untuk memeriksa apakah code kita sudah benar.

5. Pada menu Project klik Build Project untuk membuat software menjadi berbentuk file *.exe ( File Software ).

6. Setelah itu tekan tombol F9 untuk menjalankan software yang telah kita buat.

Download Demo | Download Souce Code

Jika anda masih kurang jelas, jangan ragu-ragu untuk menanyakannya melalui kolom komentar dibawah.