Category Archives: Delphi

Menambahkan dialog konfirmasi pada ActionList Standard

Pada komponen ActionList telah disediakan banyak sekali action Standard yang akan sangat membantu dalam pemrograman delphi tanpa harus menulis code lagi secara manual.

Fungi-fungsi standar seperti File, Edit, Dataset dan lain-lain sudah tersedia kita tinggal pake, jika dikehendaki kita hanya perlu mengganti Caption dan iconnya saja.

Dalam prakteknya action standard yang telah disediakan ada kalanya tidak sesuai atau kurang mewakili kebutuhan kita.

Misalnya Action DataSetDelete yang fungsinya untuk menghapus record, pada saat dieksekusi akan langsung menjalankan tugasnya tanpa konfirmasi terlebih dulu, hal ini akan sangat rawan sekali bila user menekan tobol hapus tanpa sengaja.

Berikut ini contoh untuk menambahkan dialog konfirmasi pada action TDataSetDelete.

uses Windows, Messages, SysUtils, Variants, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls, ExtCtrls, DBCtrls,
  Grids, DBGrids, DB, IBCustomDataSet, IBDatabase, DBActns,
  ActnList;

type
  // Tambahkan ini ...
  TDataSetDelete = class(DBActns.TDataSetDelete)
  public
    procedure ExecuteTarget(Target: TObject); override;
  end;
  // Sampai sini .. Tekan Ctrl+Shift C untuk menulis codenya
  TForm1 = class(TForm)

...

...

...

{ TDataSetDelete }
procedure TDataSetDelete.ExecuteTarget(Target: TObject);
begin
     if MessageDlg('Yakin Dihapus ?',mtConfirmation,[mbYes,mbNo],0)=mrYes then
        inherited;

end;


Semoga bermanfaat

Mengenal Turbo Delphi Explorer 2006

Turbo Delphi Explorer merupakan satu-satunya (setidaknya sampai artikel ini ditulis) versi Delphi gratis yang pernah dikeluarkan Borland/CodeGear (sekarang Embarcadero).

Turbo Delphi di release pada bulan September 2006.

Turbo Delphi dikeluarkan dalam dua versi yaitu Win32 & dot Net, masing-masing edisi dikeluarkan dalam dua edisi yaitu Turbo Delphi Explorer (gratis) dan Turbo Delphi Profesional (berbayar).

Turbo Delphi Installer

Turbo Delphi Installer

Turbo delphi merupakan bagian dari paket Borland Developer Studio 2006.

Borland Developer Studio 2006 merupakan IDE yang terintegrasi yang mana didalamnya sudah mencakup Delphi, C++, dot Net dan C#.

Selain Turbo Delphi, masing-masing pecahan dari BDS 2006 juga di keluarkan dalam bentuk Turbo, namun pada setiap mesin/komputer hanya diijinkan untuk menginstall salah satu versi Turbo Explorer saja.

Turbo Delphi Explorer hadir dengan beberapa fitur baru yang belum ada di delphi sebelumnya diantaranya …

  • Refactoring
  • History Manager
  • Smart Block completion
  • SyncEdit
  • Code Template
  • Live designer guidelines
  • banyak VCL baru seperti Category Button, Button Group dll
  • dan masih banyak lagi

Lebih lengkap tentang fitur Turbo Delphi Explorer 2006 dapat di baca di …

http://dn.embarcadero.com/article/33659

https://www.box.com/s/kndfc7y3ddbiq0vc9dl6

Salah satu batasan pada Turbo Delphi Explorer adalah kita tidak diijinkan untuk menginstall/menambahkan paket komponen  pihak ketiga (3party VCL), namun kita masih bisa menggunakannya saat runtime.

Tanya Jawab (Q/A) :

Q: Apakah lisensi Turbo Delphi Explorer 2006 gratis
A: Ya, lisensi Turbo Delphi Explorer 2006 gratis, namun Turbo Delphi bukan freeware jadi kita tetap harus registrasi ke Embarcadero.
Q: Apakah kita diperbolehkan menggunakan Turbo Delphi Explorer untuk mengembangkan proyek komersial
A: Kita bebas menggunakan Turbo Delphi Explorer 2006 untuk mengembangkan aplikasi komersial
Q: Apakah kita dapat menginstall atau menambahkan paket seperti Fast-Report atau yang lain
A: Kita tidak dapat / tidak diijinkan untuk menambahkan paket apapun selain paket bawaan Turbo Delphi, namun kita bebas menggunakan paket tambahan secara runtime

contoh menggunakan Fast-Report secara runtime menggunakan  Turbo Delphi

uses frxClass, frxExportPDF;
 procedure TForm1.Button1Click(Sender: TObject);
 var
 frx: TfrxReport;
 begin
 frx:=TfrxReport.Create(Self);
 frx.LoadFromFile('c:\test.fr3');
 frx.ShowReport;
 frx.Free;
 end;