Tuesday, November 04, 2014

Examples of Simple Programs made ​​with Delphi 7

Contoh Aplikasi dari Delphi 7 - Dalam bahasa pemrograman Delphi 7 selain dapat digunakan membuat program yang berbasikan Client Server juga dapat digunakan membuat program sederhana, baik itu dengan menggunakan database atau tidak sama sekali.
contoh aplikasi sederhana delphi 7
Delphi 7

Program sederhana dengan Delphi 7

  • Aplikasi Calculator
  • Aplikasi Timer
  • Aplikasi Input Data Siswa
  • Aplikasi Input Data Karyawan
  • Aplikasi Input Data Barang
  • Aplikasi Shutdown Windows
  • Aplikasi Toko
  • Aplikasi Barcode
  • Aplikasi Gudang
  • Aplikasi Keuangan
  • Aplikasi Absensi Karyawan
  • Aplikasi Penghitung Gaji Karyawan
  • Aplikasi Kasir
  • Aplikasi Web Browser
  • Aplikasi Chat
  • Aplikasi Download dan Aploud Data
  • Aplikasi Animasi
  • Aplikasi Game
  • Aplikasi Perpustakaan
  • Aplikasi FTP, dan lain - lain.

Demikian beberapa contoh aplikasi yang dapat dibuat dengan delphi. Selain yang saya sebutkan diatas masih banyak lagi. Semoga apa yang saya tuliskan diatas berguna dan menjadi referensi bagi kita semua jika mengalami kebingungan untuk menentukan aplikasi apa yang akan dibuat. Terutama bagi mereka untuk tugas skripsi. Baca Juga : Tahap - tahap membuat software aplikasi dengan delphi 7.

Friday, September 19, 2014

Cara Membuka Recycle Bin Windows dengan Delphi

Cara Membuka Recycle Bin Windows dengan Delphi - Bahasa pemrograman delphi sangat begitu mudah untuk dikembangkan, seperti dalam kasus membuat aplikasi pembuka recycle bin windows. Mereka dengan tingkat seperti itu dengan mudah dan cepat menciptakan berbagai macam aplikasi.

Untuk mempelajari setiap bahasa pemrograman terutama Delphi tidaklah segampang membalikkan telapak tangan, harus tekun dan jangan pernah menyerah bila progam aplikasi pada tahap pembuatan sedang mengalami error.

Terkait : Tahap - tahap membuat software aplikasi dengan delphi 7.

gambar aplikasi pembuka recycle bin windows 7

Salah satu contoh sederhananya adalah untuk membuka recycle bin windows, simak caranya berikut ini

Cara Membuka Recycle Bin Windows dengan Delphi

  1. Buka Delphi dan buat sebuah Project baru,
  2. Buat komponen sBitButton dan letakkan di Form. (bila belum memakai aplhaskin pakai BitButton default delphi)
  3. Kemudian tekan F12 untuk menambahkan kode program dibawah ini pada USES
    1. ActiveX, ShlObj, ShellApi
  4. Setelah itu tuliskan kode script ini tepat dibawah implementation
    1. procedure FreePidl(pidl: PItemIDList);
      var 
        allocator: IMalloc;
      begin
        if Succeeded(shlobj.SHGetMalloc(allocator)) then 
        begin
          allocator.Free(pidl);
          {$IFDEF VER90}
          allocator.Release;
          {$ENDIF}
        end;
      end;
  5. Isi sbitbutton1 dengan cara dobel klik tombol tersebut dan isikan kodenya seperti dibawah ini
    1. procedure TForm1.sButton1Click(Sender: TObject);
      var
        exInfo: TShellExecuteInfo;
      begin
        // initialize all fields to 0
        FillChar(exInfo, SizeOf(exInfo), 0);
        with exInfo do
        begin
          cbSize := SizeOf(exInfo); // required!
          fMask := SEE_MASK_FLAG_DDEWAIT or SEE_MASK_IDLIST;
          Wnd := Handle;
          nShow := SW_SHOWNORMAL;
          lpVerb := 'open';
          ShGetSpecialFolderLocation(Handle, CSIDL_BITBUCKET, PItemIDLIst(lpIDList));
        end;
        ShellExecuteEx(@exInfo);
        FreePIDL(exinfo.lpIDList);
      end;
  6. Simpan dan jalankan

Demikian Cara Membuka Recycle Bin Windows dengan Delphi, dengan bahasa pemrograman semoga dapat bermanfaat bagi anda.

Thursday, September 11, 2014

Cara Membuat Form Login Transparan Delphi 7

Cara Membuat Form Transparan di Delphi 7 - Dalam Delphi 7 anda pasti ingin mempercantik tampilan dalam aplikasi yang sedang anda buat. Dengan membuat tampilan salah satu Form yang lebih menarik, salah satunya dengan membuatnya menjadi transparan atau tidak terlihat.

Cara ini tergolong sangat mudah dan tanpa harus menuliskan kode program delphi. Dalam kesempatan ini saya akan mencontohkan membuat form login transparan seperti yang terlihat pada gambar dibawah ini.

gambar form login tranparan delphi 7
Contoh Form Login Transparan di Delphi 7

Cara Membuat Form Login Transparan Delphi 7
  1. Buka salah satu aplikasi yang sedang anda buat,
  2. Buka Form Login Kemudian hilangkan border Form dengan cara lihat di bagian ObjectInspector > Propertis dan lakukan perubahan pada BorderStyle menjadi bsNone.
  3. Masih di ObjectInspector > Propertis lanjutkan untuk mengubah beberapa bagian berikut ini Color = clblue, TransparentColor = True, TransparentColorValue = clblue.
  4. Kemudian pada bagian TLabel agar tidak terlihat blok putih dibelakang tulisan lakukan hal yang sama pada bagian ObjectInspector > Propertis lalu pada bagian Transparent = True.
  5. Simpan Project dan jalankan, maka akan terlihat seperti pada gambar diatas.
(!) Saran

  1. Jika anda memberi gambar di dalam Form Login tersebut usahakan gambar yang berekstensi PNG, jangan memakai gambar yang JPEG,BMP karena tidak terlihat menarik.
  2. Untuk perubahan pada Color, TransparentColor dan TransparentColorValue jangan memakai clwhite dan clblack karena akan membuat tulisan pada label dan textbox menjadi transparan juga.

Jika dalam delphi anda belum dapat menampilkan gambar yang berekstensi PNG dapat ada lakukan penambahan komponen langkahnya dapat anda baca di Cara Menampilkan Gambar PNG di Delphi 7

Demikian Cara Membuat Form Login Transparan Delphi 7, semoga dapat membantu mempercantik aplikasi yang sedang anda kerjakan saat ini.

Cara Menampilkan Gambar PNG Delphi 7

Dalam kesempatan ini saya mencoba berbagi tentang Cara Menampilkan Gambar PNG di Delphi 7. Langkah ini hampir sama seperti yang pernah saya tulis sebelumnya di artikel Cara Menampilkan Gambar *.Gif di Delphi.
gambar menampilkan gambar png delphi

Cara Menampilkan Gambar PNG Delphi 7

  1. Download salah satu komponen delphi TPNGImage
  2. Setelah download, buka file tersebut dan copy paste semua file dari TPNGImage (*.DCU, *.PAS) letakkan di C:\Program Files\Borland\Delphi7\Lib
  3. Buka kembali program delphi anda dan lihat lakukan percobaan dengan menambahkan komponen Image di Form (Additional > Image)
  4. Kemudian pada ObjectInspector > Propertis > Picture klik pada tanda titik 3 kali dan Load gambar yang berekstensi PNG. Jika penambahan komponen berhasil maka akan terlihat seperti dibawah ini pada saat load picture.

  5. gambar komponen file png delphi
  6. Setelah itu Open dan klik OK dan simpan project anda kemudian jalankan.
(!) Saran
Pada saat penambahan komponen ini usahakan program delphi anda dalam keadaan tertutup. Pengalaman saya pada saat penambahan komponen seperti cara ini seandainya program delphi dalam keadaan terbuka maka tidak akan bisa.

Demikian Cara Menampilkan Gambar PNG Delphi 7, semoga dapat membantu dalam pengerjaan aplikasi yang sedang dikerjakan.

Thursday, September 04, 2014

Cara Membuat File *.ini Delphi 7

Cara Membuat File ini Delphi 7 - Beberapa waktu yang lalu saya pernah menulis tentang cara membaca file ini di Delphi 7. Sekarang saya akan berikan bagaimana cara membuat file ini delphi 7. Karena dengan menggunakan cara ini anda akan dapat menyimpan data yang penting, salah satunya adalah untuk koneksi ke database MySQL.

Baca juga: Cara Membaca File ini Delphi 7.

cara membuat file ini delphi 7
Icon File Ini (sumber : google image)

Cara Membuat File ini Delphi 7

  1. Buka Delphi 7.
  2. Buat sebuah project baru.
  3. Kemuadian letakkan lima buah komponen Textbox dan satu buah Button didalam form tersebut
  4. Setelah itu lanjutkan ke penulisan kode dengan cara dobel klik pada form tersebut dan tambahkan " INIFiles " pada Uses.
  5. Kemudian dobel klik pada Button dan isikan kode dibawah ini.
    1. procedure TForm1.Button1Click(Sender: TObject);
      var
      myinifile : TIniFile;
      begin
      myinifile := Tinifile.Create(ExtractFilePath (Application.exename)+'koneksi.ini');
      myinifile.WriteString('Database','Hostname', Textbox1.text);
      myinifile.WriteString('Database','User',Textbox2.text);
      myinifile.WriteString('Database','Password',Textbox3.text);
      myinifile.WriteString('Database','Database',Textbox4.text);
      myinifile.WriteString('Database','Protokol',Textbox5.text);
      myinifile.Free;
      end;
  6. Selesai, Simpan project anda dan jalankan
* isi dari dalam file *.ini jika sudah dijalankan dan diisi dengan benar.
[Database]
Hostname = 192.168.0.100
User = root
Password = akar
Database = data1
Protokol = mysql

Demikian cara membuat file ini Delphi 7, semoga dapat menambah wawasan anda dalam dunia pemrograman delphi 7.

Cara Membaca File *.ini Delphi 7

Dalam bahasa pemrograman Delphi ada salah satu Cara Membaca File ini dengan mudah. Dalam file ini anda dapat menyimpan alamat IP server, Username, Password dan nama dari database. Dengan begitu jika suatu saat database mengalami kerusakan dan harus membuat Database MySQL yang baru, maka tidak perlu lagi menuliskan kode baru untuk melakukan koneksi tersebut kedalam database.
cara membaca file ini delphi 7

Cara Membaca File *.ini Delphi 7

  1. Buka Program Delphi 7,
  2. Klik dan letakkan salah satu komponen penghubung database yang anda pakai, seperti Zeos, ODBC atau yang lainnya dan sebuah Label di Form.
  3. Tuliskan kode dibawah ini di Notepad dan simpan dengan nama koneksi.ini di folder dimana anda menyimpan Project yang sedang dibuat
    1. [Database]
      Hostname = alamat ip server
      User = nama username database
      Password = password database
      Database = nama database
      Protokol = jenis koneksi yang dipakai (MySQL)
  4. Kemudian di Form yang telah anda tambahkan komponen koneksi database tuliskan kode dibawah ini.
    1. procedure TForm1.FormCreate(Sender: TObject);
      var koneksi : TIniFile;
      begin
      koneksi := TIniFile.Create(ExtractFilePath(Application.ExeName)+ 'koneksi.ini'); //tipe single database
      if (connection.Connected) then
      connection.Disconnect;
      connection.HostName := koneksi.ReadString('Database','Hostname','');
      connection.User     := koneksi.ReadString('Database','User','');
      connection.Password := koneksi.ReadString('Database','Password','');
      connection.Port     := 3306;
      connection.Database := koneksi.ReadString('Database','Database','');
      connection.Protocol := koneksi.ReadString('Database','Protokol','');
      try
      connection.Connect;
      if (connection.Connected)  then
      begin
      Form1.sLabel1.Caption := 'Koneksi Database Sukses';
              end;
      except
      Form1.sLabel1.Caption := 'Koneksi Database Gagal';    
      end;
      end;
  5. Selesai, simpan dan coba jalankan.
Demikian Cara Membaca File ini Delphi 7, sebagai salah satu alternatif untuk menghubungkan delphi dengan database MySQL. 

Tuesday, August 05, 2014

Cara Membuat Jam Digital Dengan Delphi

Membuat jam digital dengan Delphi tidak  begitu rumit karena hanya dengan mempersiapkan beberapa komponen saja dan menuliskan sebaris bahasa program. Dengan menambahkan jam pada sebuah form akan membuat aplikasi tersebut terlihat lebih cantik dan menarik.
gambar Program Sederhana Jam Digital Dengan Delphi
Program Sederhana Jam Digital Dengan Delphi

Cara membuat jam digital dengan delphi 7

  1. Buka program Delphi 7 dan buatlah sebuah project baru setelah itu simpan.
  2. Pada Toolbar System pilih komponen Timer dan letakkan pada Form1,
  3. Selanjutnya pada Toolbar Standart pilih Label dan letakkan pada Form1,
  4. Kemudian double klik pada Komponen Timer yang ada pada Form1, isi dengan listing program dibawah ini
    1. procedure TForm1.Timer1Timer(Sender: TObject);
      begin
      Label1.caption:=TimetoStr(Now);
      end;
  5. Simpan dan jalankan dengan menekan F9. Maka akan tampak seperti gambar diatas.
(!) Jika anda ingin mempercantik program jam digital sederhana ini, dapat melalui panel Object Inspector dengan merubah jenis huruf maupun warna. seperti gambar dibawah ini,
gambar Panel mempercantik huruf jam digital

Mudah bukan Cara Membuat Program Sederhana Jam Digital ini. Semoga dapat menjadi pembelajaran anda dalam mempelajari bahasa pemrograman delphi.