Showing posts with label Delphi. Show all posts
Showing posts with label Delphi. Show all posts

4/12/2018

Cara Input Data ke Database

Cara Input Data ke Database - Input Record atau memasukan data kedalam suatu database memang sangat mudah dilakukan. Telebih sekarang banyak tools pendukung untuk melakukan insert record data to database.

Pertama > Untuk Lokal Komputer (maksudnya data yang kan kita insert berada dikomputer kita...hehheheh) dan
Kedua > Untuk Server Pusat (jika kita tidak punya data pada komputer kita, kita bisa ambil data yang telah di Insert di pusat database dan dipindahkan ke database server lokal via jaringan intenet..hehehe)

Saya disini hanya sedikit sharing aja mungkin berguna bagi Mas Bro / Sis . hanya saja saat dijalankan agak sedikit memerlukan waktu dan code ini sudah saya pakai di program saya. dan hasilnya memuaskan walaupun sedikit lama. dikarenakan tiap kali insert data saya > 5.000 record atau lebih dan > 100.000 data tiap bulannya, berikut codenya. Untuk Koneksinya memakai Zeos, dan hanya mendukung untuk File (DBF) untuk yang Local Computer Untuk File Selain DBF masih dalam pengembangan (file Excel, csv, txt).

Cara Input Data ke Database

Source Code Delphi 7 Input Banyak Data
unit Unit29;
interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, sGauge, StdCtrls, Buttons, sBitBtn, sComboBox, sLabel,

  ZAbstractTable, ZDataset, DB, ZAbstractRODataset, ZAbstractDataset,

  sRadioButton, sGroupBox, sEdit, sDialogs, DBTables, sSkinManager,

  sSkinProvider;

type

  TForm29 = class(TForm)

    ZDataBBSPusat: TZQuery;

    ZTabDataBBSLocal: TZTable;

    sGroupBox1: TsGroupBox;

    sLabel1: TsLabel;

    sLabel2: TsLabel;

    sLabel3: TsLabel;

    sComboBox3: TsComboBox;

    sComboBox2: TsComboBox;

    sComboBox1: TsComboBox;

    sLabel4: TsLabel;

    sLabel5: TsLabel;

    sLabel6: TsLabel;

    sBitBtn1: TsBitBtn;

    sGauge1: TsGauge;

    sGroupBox2: TsGroupBox;

    sRadioButton1: TsRadioButton;

    sRadioButton2: TsRadioButton;

    sGroupBox3: TsGroupBox;

    sEdit1: TsEdit;

    sBitBtn2: TsBitBtn;

    sGauge2: TsGauge;

    sLabel7: TsLabel;

    sLabel8: TsLabel;

    sOpenDialog1: TsOpenDialog;

    Table1: TTable;

    sBitBtn3: TsBitBtn;

    sSkinProvider1: TsSkinProvider;

    procedure FormCreate(Sender: TObject);

    procedure sComboBox2Change(Sender: TObject);

    procedure sComboBox3Change(Sender: TObject);

    procedure sBitBtn1Click(Sender: TObject);

    procedure sBitBtn2Click(Sender: TObject);

    procedure sBitBtn3Click(Sender: TObject);

    procedure sRadioButton1Click(Sender: TObject);

    procedure sRadioButton2Click(Sender: TObject);

    procedure sComboBox3Click(Sender: TObject);

    procedure FormClose(Sender: TObject; var Action: TCloseAction);

  private

    { Private declarations }

  public

    { Public declarations }

  end;



var

  Form29: TForm29;



implementation



uses TypInfo, Unit1;



{$R *.dfm}



procedure TForm29.FormCreate(Sender: TObject);

begin

sLabel4.Hide;

sGauge1.Progress := 0;

sGauge2.Progress := 0;

sBitBtn1.Enabled := False;

sGroupBox1.Hide;

sGroupBox3.Hide;

sBitBtn3.Enabled := False;

end;



procedure TForm29.sComboBox2Change(Sender: TObject);

begin

if sComboBox2.Text ='JANUARI' THEN

BEGIN

  sLabel4.Caption :='01';

END

ELSE if sComboBox2.Text ='FEBRUARI' THEN

BEGIN

  sLabel4.Caption :='02';

END

ELSE if sComboBox2.Text ='MARET' THEN

BEGIN

  sLabel4.Caption :='03';

END

ELSE if sComboBox2.Text ='APRIL' THEN

BEGIN

  sLabel4.Caption :='04';

END

ELSE if sComboBox2.Text ='MEI' THEN

BEGIN

  sLabel4.Caption :='05';

END

ELSE if sComboBox2.Text ='JUNI' THEN

BEGIN

  sLabel4.Caption :='06';

END

ELSE if sComboBox2.Text ='JULI' THEN

BEGIN

  sLabel4.Caption :='07';

END

ELSE if sComboBox2.Text ='AGUSTUS' THEN

BEGIN

  sLabel4.Caption :='08';

END

ELSE if sComboBox2.Text ='SEPTEMBER' THEN

BEGIN

  sLabel4.Caption :='09';

END

ELSE if sComboBox2.Text ='OKTOBER' THEN

BEGIN

  sLabel4.Caption :='10';

END

ELSE if sComboBox2.Text ='NOPEMBER' THEN

BEGIN

  sLabel4.Caption :='11';

END

ELSE if sComboBox2.Text ='DESEMBER' THEN

BEGIN

  sLabel4.Caption :='12';

END;

end;



procedure TForm29.sComboBox3Change(Sender: TObject);

var jum : Integer; pesan : String;

begin

pesan := 'Database  Belum Diaploud di Database Pusat';

with ZDataBBSPusat do

  begin

    Close;

    SQL.Clear;

    SQL.Add('SELECT * FROM databbs WHERE A = '+sComboBox1.Text+' AND B = ' +QuotedStr(sLabel4.Caption)+' AND C = ' +sComboBox3.Text);

    Open;

    if ZDataBBSPusat.RecordCount = 0 then

    begin

      Application.MessageBox(PChar(pesan),'Informasi',MB_OK or MB_ICONINFORMATION);

    end

    else

    begin

      jum := ZDataBBSPusat.RecordCount;

      sLabel6.Caption := IntToStr(jum);

      sBitBtn1.Enabled := True;

      Close;

    end;

    //sGauge1.MaxValue := ZDataBBSPusat.RecordCount ;

    //Application.ProcessMessages;

  end;

end;



procedure TForm29.sBitBtn1Click(Sender: TObject);

VAR pesan : String;

begin

pesan := 'Database Telah Berhasil Di Download Dari Pusat';

ZTabDataBBSLocal.TableName := 'databbs';

ZTabDataBBSLocal.Open;

with ZDataBBSPusat do

  begin

    //Close;

    SQL.Clear;

    SQL.Add('SELECT * FROM databbs WHERE BC = '+sComboBox1.Text+' AND IMONTH = ' +sLabel4.Caption+' AND IYEAR = ' +sComboBox3.Text);

    Open;

    WHILE NOT ZDataBBSPusat.Eof DO

      BEGIN

        WITH  ZTabDataBBSLocal do

          begin

            Append;

            FIELDBYNAME('1').AsString := ZDataBBSPusat.FIELDBYNAME('a').AsString;

            FIELDBYNAME(2').AsString := ZDataBBSPusat.FIELDBYNAME(b').AsString;

            FIELDBYNAME('3').AsString := ZDataBBSPusat.FIELDBYNAME('c').AsString;

            FIELDBYNAME('4').AsString := ZDataBBSPusat.FIELDBYNAME('d').AsString;

            ------------- (maaf saya potong karena untuk menyingkat halaman karena hampir sama untuk codenya)


            -------------


            FIELDBYNAME('14').AsString := ZDataBBSPusat.FIELDBYNAME('n').AsString;


            Post;

            ZDataBBSPusat.Next;
          end;

        sGauge1.Progress := sGauge1.Progress + 1;

      END;

      if sGauge1.Progress = 100 then

      begin

        Application.MessageBox(pchar(pesan),'Informasi',MB_OK or MB_ICONINFORMATION);

        sComboBox1.Text := '';

        sComboBox2.Text := '';

        sComboBox3.Text := '';

        sLabel6.Caption := '0';

        sGauge1.Progress := 0;

        sBitBtn1.Enabled := False;

      end;

  end;

end;



procedure TForm29.sBitBtn2Click(Sender: TObject);

var jml : integer;

begin

sGauge2.MinValue := 0;

if sOpenDialog1.Execute then

  begin

    with Table1 do

      begin

        Close;

        TableName := sOpenDialog1.FileName;

        Open;

        sEdit1.Text := TableName;

        jml := Table1.RecordCount;

        sLabel8.Caption := FormatFloat('#,#',jml);

        sBitBtn3.Enabled := True;

      end;

  end;

end;



procedure TForm29.sBitBtn3Click(Sender: TObject);

begin

sGauge2.MaxValue := Table1.RecordCount ;

Application.ProcessMessages;

ZTabDataBBSLocal.TableName := 'databbs';

ZTabDataBBSLocal.Open;

WHILE NOT Table1.Eof DO


  BEGIN


    WITH ZTabDataBBSLocal DO


      BEGIN

        Append; 
            FIELDBYNAME('1').AsString := ZDataBBSPusat.FIELDBYNAME('a').AsString;

            FIELDBYNAME(2').AsString := ZDataBBSPusat.FIELDBYNAME(b').AsString;

            FIELDBYNAME('3').AsString := ZDataBBSPusat.FIELDBYNAME('c').AsString;

            FIELDBYNAME('4').AsString := ZDataBBSPusat.FIELDBYNAME('d').AsString;

            ------------- (maaf saya potong karena untuk menyingkat halaman karena hampir sama untuk codenya)


            -------------


            FIELDBYNAME('14').AsString := ZDataBBSPusat.FIELDBYNAME('n').AsString;


            Post;

                Table1.Next;
        //end;

      end;

      sGauge2.Progress := sGauge2.Progress + 1;

  end;



if sGauge2.Progress = Table1.RecordCount then

  begin

    Application.MessageBox('Data Telah Selesai diDownload'+chr(10)+'Barcode Pengambilan dan Pelaporan Bisa Dilakukan','Informasi',MB_OK or MB_ICONINFORMATION);
    sGauge2.Progress := 0;
    sBitBtn3.Enabled := False;
    sEdit1.Text :='';
    sLabel8.Caption := '0';
  end;
end;

procedure TForm29.sRadioButton1Click(Sender: TObject);
begin
if sRadioButton1.Checked = True then
  Begin
    sGroupBox3.Show;
    sEdit1.Text :='';
    sBitBtn3.Enabled := False;
    sLabel8.Caption :='0';
    sLabel6.Caption :='0';
    sComboBox1.Text :='';
    sComboBox2.Text :='';
    sComboBox3.Text :='';
    sBitBtn1.Enabled := False;
    sRadioButton2.Checked := False;
    sGroupBox1.Hide;
  end
else
  begin
    sGroupBox3.Hide;
  end;
end;

procedure TForm29.sRadioButton2Click(Sender: TObject);
begin
if sRadioButton2.Checked = True then
  Begin
    sGroupBox1.Show;
    sComboBox1.Text :='';
    sComboBox2.Text :='';
    sComboBox3.Text :='';
    sBitBtn1.Enabled := False;
    sEdit1.Text :='';
    sBitBtn3.Enabled := False;
    sLabel8.Caption :='0';
    sLabel6.Caption :='0';
    sRadioButton1.Checked := False;
    sGroupBox3.Hide;
  end
else
  begin
    sGroupBox1.Hide;
  end;
end;

procedure TForm29.sComboBox3Click(Sender: TObject);
begin
sLabel6.Caption := '0';
sBitBtn1.Enabled := False;
end;

procedure TForm29.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
Form1.DownloadDatabase1.Enabled := True;
end;

end.

Hasil nya jika Dirun
input record banyak


Maaf jika ejaan tulisan saya membuat sobat sedikit bingung. Sekian Code dari saya untuk lebih jelasnya silahkan di coba, dan jika masih terjadi error bisa kirim komentar. Insakallah akan saya tanggapi jika ada waktu.

Demikian cara input data ke database mysql dengan delphi semoga dapat bermanfaat bagi kita semua.

4/05/2018

Cara Membuat Menu dengan Framebar

Cara Membuat Menu dengan Framebar - FrameBar merupakan salah satu komponen yang digunakan untuk melengkapi sebuah program aplikasi. Komponen ini dapat dipakai sebagai alternatif pengganti komponen menu pada aplikasi delphi.

Walaupun framebar sedikit ribet dibandingkan dengan menu delphi tapi layak anda coba, untuk membuat tampilan aplikasi delphi berbeda dari yang lain. Simak cara berkerja dengan FrameBar di Delphi berikut ini :

Terkait : Cara Install Komponen Quick Report Delphi 7

Cara Membuat Menu dengan Framebar


1. Buka Delphi,
2. Klik Pada Pallete Delphi >> AlphaAditional. Jika Belum ada Pallete tersebut bisa di download http://www.alphaskins.com/ Setelah itu install.
3. Jika sudah ada Pallete FrameBar Tersebut klik lalu tempatkan pada Form yang sudah dibuka,
4. Klik FrameBar tersebut Pilih Propertis >> Items >> Add New.
5. Jika Item Sudah ditambahkan Klik Items tersebut lalu Propertis >> Isikan nama (Caption)
6. Klik Pada Menu Delphi >> New >> Pilih Frame
Jika Ingin Saat Items tersebut diklik tampil Menu Baru seperti kita membuat MENUBAR Tambahkan beberapa Label dalam Frame Tersebut.
gambar new frame

7. Klik Pada Items di FrameBar yang sudah dibuat Pilih Events >> DoubleClicks pada OnFrameCreate dan      ketikan Program berikut
    begin
              Frame := TFrame1.Create(nil);
    end;

8. Save Program
9. Run (F9) Sperti Gambar dibawah ini
gambar menu delphi dengan frame

Setelah Items File Diklik maka akan tampil seperti gambar berikut
gambar items file frame

Mudah dan Simple kan, Seperti halnya kita membuat Sebuah Menu pada Form. Terimakasih

Cara Install Komponen Quick Report di Delphi

Cara Install Komponen Quick Report di Delphi - Quick Report merupakan salah satu komponen penting dalam bahasa pemrograman delphi. Komponen Quick Report digunakan untuk menampilkan laporan akhir seperti laporan penjualan, laporan stock dan lain sebagainya.

Komponen Quick Report dalam delphi banyak digunakan oleh para pembuat program untuk membuat sebuah laporan akhir, selain mudah dan juga tidak terlalu ribet.

Terkait : Cara Mencari Data di Dua Tabel SQL
 

Cara Install Komponen di Delphi 7

  1. Buka Delphi 7,
  2. Klik Menu COMPONENT lalu pilih Instal Packages, tekan Tombol ADD,
  3. Cari file benama DCLQRT70.BPL (pada Folder  Bin)

jika anda berhasil menambahkan komponen Quick Report dalam program delphi maka akan tampil di Pallet komponen (QReport) seperti gambar dibawah ini :
gambar pallete komponen qreport delphi 7

Demikian cara install komponen delphi Quick Report semoga dapat bermanfaat bagi anda.

7/22/2016

Cara Install Delphi 7 di Windows 8

Cara Install Delphi 7 di Windows 8 - Sudah lama rasanya tidak menulis artikel yang bekaitan dengan Pemrograman Visual Delphi, yang merupakan salah satu bahasa pemrograman visual dan memiliki kesamaan seperti Visual Basic. Namun yang menjadi bahasa dasar pemrograman Delphi 7 adalah Bahasa Pascal, yang memiliki tingkat kesulitan tinggi. Tentu bagi mereka yang belum pernah mempelajarinya.

Delphi 7 dapat dipelajari dengan mudah seperti halnya dengan bahasa pemrograman lainnya asalkan dalam mempelajarinya harus dengan kesabaran dan ketelitian. Bila tertarik untuk mempelajari bahasa pemrograman visual delphi simak cara install di Windows 8 berikut ini.

Baca : Tahap-Tahap Membuat Software Aplikasi dengan Delphi 7

Cara Install Delphi 7 di Windows 8


Langkah Pertama : Jalankan file *.exe kemudian klik kanan dan pilih Run the program without getting help.
Cara Install Delphi 7 di Windows 8


Langkah Kedua : Pilih tombol Delphi 7
Cara Install Delphi 7 di Windows 8.1


Langkah Ketiga : Klik next kemudian anda akan diminta untuk memasukkan Serial Number Delphi 7. Tuliskan dan klik Next.
Cara Install Delphi 7 di Windows 8 2


Langkah Keempat : Pilih I Accept > Next.
Cara Install Delphi 7 di Windows 8 3


Langkah Kelima : Kemudian klik Next, Lalu Pilih Typical > Next
Cara Install Delphi 7 di Windows 8 4


Cara Install Delphi 7 di Windows 8 5


Langkah Keenam : Pilih Office Xp > Next
Cara Install Delphi 7 di Windows 8 6


Langkah Ketujuh : Hilangkan centang pada Install Interbase Client > Next
Cara Install Delphi 7 di Windows 8 7


Langkah Kedelapan : Pada Destination Folder jangan diubah lanjutkan klik Next
Cara Install Delphi 7 di Windows 8 8


Langkah Kesembilan : Kemudian Klik Next sekali lagi dan lanjutkan klik tombol Install dan tunggu beberapa saat karena membutuhkan waktu agak lama.
Cara Install Delphi 7 di Windows 8 9

Cara Install Delphi 7 di Windows 8 10


Langkah Kesepuluh : Bila muncul pop up baru klik tanda " X " pada pojok kanan atas bila tidak ingin install VisiBroker jika ya tekan OK
Cara Install Delphi 7 di Windows 8 11


Langkah Kesebelas : Klik Finish bila telah selesai dan bila muncul pop up untuk Restart ulang pada pada komputer anda lakukan.
Cara Install Delphi 7 di Windows 8 12

Cara Install Delphi 7 di Windows 8 13


Langkah Keduabelas : Masuk ke Program File cari file yang ada dalam folder install Delphi 7 kemudian cari file Delphi32.DRO lalu ganti menjadi Delphi32.$$$ kemudian tekan EnterYes > Continue. Kemudian coba buka program delphi anda.
Cara Install Delphi 7 di Windows 8 14


Demikian Cara Install Delphi 7 di Windows 8 mudah dan cepat, tahap demi tahap yang lumayan panjang semoga bermanfaat dan berguna. Baca: How To Make Delphi 7 Running On Windows 7

3/31/2016

How to Make Running Delphi 7 on Windows 7

Cara Membuat Delphi Berjalan di Windows 7 - Delphi 7 merupakan salah satu jenis bahasa pemrograman yang dapat dengan mudah dipahami. Namun tentunya bagi mereka yang sebelumnya pernah belajar tentang Pascal dan mengerti alur, penulisan serta memahami tentang logika bahasa pemrograman.

How to Make Running Delphi 7 on Windows 7
Delphi 7 pada saat berjalan di Windows 7 Ultimate
Menurut pengalaman saya selama ini jika dibandingkan dengan bahasa pemrograman yang lainnya, Delphi 7 sangat begitu mudah dijalankan di Windows. Selain itu juga kita tidak perlu melakukan penambahan program yang lainnya.

Bila anda ingin akan melakukan install di windows jangan ragu akan gagal atau tidak dapat berjalan karena program ini sudah kompatibel dengan Windows 7. Intinya dapat berjalan di Windows 7 tanpa ada gangguan atau kegagalan program pada saat dijalankan.

Setelah melakukan install delphi ada baiknya ditambah beberapa komponen dibawah ini supaya dalam setiap membuat aplikasi dapat dengan cepat dan memuaskan konsumen.
  • ZEOS - merupakan salah satu komponen delphi 7 yang terpisah yang berfungsi untuk memudahkan para programmer delphi dalam melakukan setiap koneksi ke database.
  • Alpha Skin - merupakan salah satu komponen tambahan yang terpisah tetapi dapat digabungkan dengan program utama delphi 7 yang berfungsi untuk mempercantik aplikasi delphi yang sedang dikerjakan.
  • QuickReport atau biasa disebut QR Delphi ini berfungsi untuk memudahkan seorang programmer dalam pembuatan laporan pada aplikasi.
Sebenarnya masih banyak lagi komponen delphi 7 yang dapat digunakan namun saya tidak bisa menyebutkan satu persatu. Dari pengalaman saya selama ini ketiga komponen tambahan diatas sudah dapat membuat program aplikasi yang bagus dan memuaskan konsumen.

Demikian salah satu pengalaman saya tentang delphi 7, apakah Delphi 7 dapat berjalan di windows 7 atau tidak ? dan jawabannya adalah BISA. Semoga artikel ini dapat berguna bagi kita semua.

Cara Membuat Menu di Delphi 7

Cara Membuat Menu di Delphi 7 - Bagaimana cara membuatnya ? pertanyaan yang sering terlontar bagi anda yang baru mempelajari sebuah bahasa pemrograman berbasiskan desktop seperti delphi. Dalam sebuah program aplikasi entah itu aplikasi toko, aplikasi gudang, aplikasi kasir, aplikasi barcode pasti diperlukan sebuah Menu yang berguna untuk mempermudah pengguna dalam hal menjalankan software aplikasi tersebut.

Cara Membuat Menu di Delphi 7 

Cara Membuat Menu Aplikasi Delphi 7
Dalam pembuatannya saya bagi menjadi dua yaitu :
  1. Dengan menggunakan komponen FrameBar.
  2. Dengan menggunakan komponen MainMenu.
Terkait : Cara Membuat Menu dengan FrameBar
Kenapa saya bagi menjadi dua bagian ? karena menurut pengalaman saya selama ini masing-masing komponen tersebut dapat digunakan untuk membuat sebuah menu pada aplikasi delphi. Hanya saja dalam bentuk tampilannya saja berbeda dan tetap mempunyai fungsi yang sama. Kali ini saya akan membahas dengan komponen MainMenu.

Cara membuat mainmenu delphi
  1. Buka aplikasi yang sedang anda kerjakan atau buat sebuah project baru.
  2. Klik pada toolbar komponen dan pilih MainMenu dan letakkan pada Form

  3. gambar toolbar komponen menu delphi 7
  4. Klik kanan pada komponen tersebut dan pilih Menudesigner, sampai muncul seperti gambar dibawah ini

  5. gambar menu designer delphi 7
  6. Lihat pada Object Inspector > Propertis > pada Caption tuliskan nama menunnya.

  7. gambar object inspector membuat menu delphi 7
    Sampai disini langkah-langkah untuk membuat Menu pada delphi, selanjutnya Untuk menambahkan SubMenu pada aplikasi delphi klik kanan pada Menu yang telah anda buat dan pilih Insert setelah itu lanjutkan seperti pada nomor 4

    gambar membuat submenu delphi 7
  8. Simpan dan run untuk melihat hasilnya.

Cara Membuat Kode Menu Delphi 7

Seandainya ingin menambahkan kode pada menu tersebut tinggal klik pada salah satu menu atau submenu yang sudah dibuat. Untuk melakukan tambahkan beberapa kode dibawah ini
  1. Cari kode USES dan letakkan unit di Form1 (unit1) yang telah ditambahkan MainMenu dengan Form2 (unit2) dan seterusnya, seperti pada gambar dibawah ini
  2. gambar link antar form di delphi 7
  3. Untuk memanggil Form yang lainnya atau Unit2 tersebut tambahkan kode berikut ini
    1. Form2 := TForm2.Create(Form1);
      Form2.Show;
Demikian Cara Membuat Menu di Delphi 7, semoga dapat menjadi referensi bagi semua pembaca blog yang sedang mempelajari bahasa pemrograman delphi 7.

Link Download Delphi 7 dan XE

Link Download Delphi 7 dan XE - Sudah sekian lama saya tidak menulis tentang bahasa pemrograman Delphi. Salah satu blog saya ini mengulas tentang tutorial delphi mulai dari cara instal delphi 7 di Windows 7 hingga tutorial membuat aplikasi dengan delphi.
RAD Studio XE5

Pada kesempatan kali ini saya akan berbagi sedikit link download dari Delphi 7 sampai dengan versi Delphi XE. Berikut alamat download delphi yang saya ambil dari altd.embarcadero.com.

Baca : Tahap-Tahap Membuat Program Aplikasi Delphi 7


Link Download Delphi 7 dan XE


Download RAD Studio XE8
http://altd.embarcadero.com/download/radstudio/xe8/delphicbuilder_xe8_win.iso

Download RAD Studio XE5 Update1 ISO:
http://altd.embarcadero.com/download/radstudio/xe5/delphicbuilder_xe5_upd1_win.iso

Download RAD Studio XE5 ISO:
http://altd.embarcadero.com/download/radstudio/xe5/delphicbuilder_xe5_win.iso

RAD Studio XE4 versi terbaru (dengan Update 1) v18.0.4905.60485 resmi ISO download file:
http://altd.embarcadero.com/download/radstudio/xe4/delphicbuilder_xe4_upd1_win.iso

RAD Studio XE4 v18.0.4854.59655 ISO resmi File Download (3.76GB):
http://altd.embarcadero.com/download/radstudio/xe4/delphicbuilder_xe4_win.iso

RAD Studio Xe3 akhir (dengan Update 2) v17.0.4770.56661 (3.49GB):
http://altd.embarcadero.com/download/radstudio/xe3/delphicbuilder_xe3_upd2_win.iso

RAD Studio Xe3 (dengan Update 1) v17.0.4723.55752 ISO (3.48GB):
http://altd.embarcadero.com / download/radstudio/xe3/delphicbuilder_xe3_upd1_win.iso

RAD Studio Xe3 v17.0.4625.53395 resmi men-download file ISO (3.12GB):
http://altd.embarcadero.com/download/radstudio/xe3/delphicbuilder_xe3_win.iso

RAD Studio XE2 akhir Edition (dengan Update 4 hotfix 1) v16.0.4504.48759 (2.59GB):
http://altd.embarcadero.com/download/radstudio/xe2/delphicbuilder_xe2_4504_win.iso

RAD Studio XE2 (dengan Update 4) v16 .0.4429.46931 file (2.53GB):
http://altd.embarcadero.com/download/radstudio/xe2/delphicbuilder_xe2_4429_win_dl.iso

RAD Studio XE2 (dengan Update 3) v16.0.4358.45540 ISO ( 2.50GB):
http://altd.embarcadero.com/download/radstudio/xe2/delphicbuilder_xe2_4358_win_dl.iso

RAD Studio XE2 (dengan Update 2) v16.0.4316.44803 ISO (2.44GB):
http://altd .embarcadero.com/download/radstudio/xe2/delphicbuilder_xe2_4316_win_dl.iso

RAD Studio XE2 (dengan Update 1) v16.0.4276.44006 ISO (2.33GB):
http://altd.embarcadero.com/download/radstudio/ xe2/delphicbuilder_xe2_4276_win_dl.iso

RAD Studio XE2 v16.0.4265.43595 resmi ISO download file (2.33GB):
http://altd.embarcadero.com/download/radstudio/xe2/delphicbuilder_xe2_win_dl.iso

RAD Studio XE akhir (dengan Update 1 ) v15.0.3953.35171 (2.11GB):
http://altd.embarcadero.com/download/RADStudioXE/delphicbuilder_xe_3953_win.iso

versi RAD Studio XE Download Link:
http://altd.embarcadero.com/download/RADStudioXE/delphicbuilder_xe_3953b_win.iso

Studio 2010 versi final RAD (dengan Update 4/5) resmi v14.0.3615.26342 ISO (1.72GB):
http://altd.embarcadero.com/download/RADStudio2010/delphicbuilder_2010_3615_win.iso

RAD Studio 2009 versi final (dengan Update1-4) resmi ISO Download (1.9GB)
http://altd.embarcadero.com/download/Delphi_C++Builder2009/Delphi_C++Builder2009_ISO_June2009.iso

CodeGear RAD Studio 2007
http://altd.codegear.com/download/radstudio2007/CodeGearRADStudio2007_Dec2007.iso

Delphi 7.0 Enterprise Edition
http://altd.embarcadero.com/download/delphi/d7/english/ent/delphi_7_ent_en.iso

Demikian Link Download Delphi 7 dan XE, semoga dapat berguna bagi anda sehingga dapat dengan meudah mempelajari bahasa pemrograman ini.