Download Zeos DBO For Delphi 2009/20010

11 Replies

Zeos versi 7.0.0 (Delphi 2009/2010) sudah tersedia di zeos.firmos.at. Atau langsung klik linknya di sini. Bila ada masalah, silahkan coba link alternatif ini.

Cara instalasi dan penggunaan dapat dilihat di sini.
Instalasi versi 7.0.0 pada Delphi 2009/2010? Lihat di sini

11 thoughts on “Download Zeos DBO For Delphi 2009/20010”

  1. Frans

    Met sore mas, sya mw nanya…

    Sya ingin mmbuat program yang mna progam trsbut mempunyai form login dan utama.

    Ketika form tersebut di diamkan slama (contoh 5 detik) maka form utama akan tertutup dan form login

    akan muncul dan meminta password (Seperti ScreenSaver pd ms windows jika diaktifkan passwordna)..

    Mkash sblumnya mas, maaf newbie bgt..

    Reply ↓
  2. Didin

    Kayaknya sudah saatnya beralih ke delphi 2010 nih. Dulu masih pake delphi 7 karna zeosnya ga bisa di Delphi 2010. thx mas ats infonya. tukeran link donkz… 🙂

    Reply ↓
    1. Joko Rivai Post author

      1. Untuk TEdit, harus difilter agar yg dimasukkan hanya angka saja (0 – 9). Pada Delphi versi RAD Studio (saya pake Delphi 2009), komponen TEdit memiliki property NumbersOnly, diset ke True agar hanya membolehkan input angka saja.
      2. Pada saat Form di-Create, tetapkan bahwa pemisah ribuan adalah tanda titik (“.”):

      procedure TForm2.FormCreate(Sender: TObject);
begin
  ThousandSeparator :='.';
end;

      3. Pada event OnChange dari TEdit, diset agar inputan selalu integer, tidak boleh kosong/spasi:

      procedure TForm2.Edit1Change(Sender: TObject);
begin
  if Trim(TEdit(Sender).Text) = '' then
    TEdit(Sender).Text := '0';
end;

      4. Saat TEdit kehilangan fokus (event OnExit), nilai TEdit tersebut diubah ke format ribuan:

      procedure TForm2.Edit1Exit(Sender: TObject);
begin
  TEdit(Sender).Text := FormatFloat('#,#', StrToFloatDef(TEdit(Sender).Text, 0) );
end;

      5. Saat menerima fokus (OnEnter), TEdit difilter agar data dalam format ribuan diubah ke integer kembali:

      procedure TForm2.Edit1Enter(Sender: TObject);
var
  x: string;
  i:integer;
begin
  x := TEdit(Sender).Text;
  for i := length(x) downto 1 do
    if x[i] = '.' then
      Delete(x,i,1);
  TEdit(Sender).Text := x;
end;

      Untuk contoh, silahkan download di sini.

      Harap diingat, saya menggunakan Delphi 2009…

      Reply ↓
  5. ade

    pd TSQLQuery untuk mengatur field2nya pada saat design time menggunakan field editor dengan cara klik kanan pd TSQlQuery tsb.
    Bagaimana jika hal tersebut (pengaturan field) dilakukan secara runtime?.

    Sy pake D2007, MySQlQuerynya scibit, view data menggunakan cxgridnya devexpress.
    pada saat Mysqlquery dijalankan field/column pd cxgridnya tdk muncul. Bagaimana ya mas mengatasinya?

    Reply ↓

  7. Pingback: Cenadep.org » Install Zeos DBO (7.0.0-alpha) di Delphi 2010

  8. Ramapu

    Mas ini saya mau tanya ,
    misalnya kita buat project dari d7
    terus mau di compile di d2010

    zeosnya bisa nggk tuh?
    takutnya karena beda versi gak bisa di compile

    thx

    Reply ↓

Leave a comment