Membuat Cloud Database MySQL

Sedang yang belum pernah atau belum ketemu layanan cloud database hosting (MySQL), semoga ini jadi bahan bacaan yang ada manfaat.
Adalah XeRound Cloud Database Service yang menyediakan hosting gratis cloud-based MySQL, sehingga dapat diakses dari mana saja. Layanan gratis ini dibatasi pada size database yang hanya 10 MB saja, dengan maksimum 5 kongkuren koneksi dan troughput sebesar 1 MB saja. Ini adalah angka-angka yang kecil. Tapi dari sisi ketersediaan, gratis dan kestabilan, saat ini XeRound sudah sangat menarik.
Layanan lain yang cukup dikenal adalah PHPCloud.com dengan fitur yang mirip, tapi menggunakan SSL untuk koneksi sehingga sedikit merepotkan yang belum terbiasa. Untuk saat ini, saya tidak akan melihat perbandingan kedua layanan ini, tapi memilih yang mudah, yaitu XeRound dan memfokuskan diskusi pada topik utama: Koneksi ke database cloud MySQL melalui Delphi.

Komponen Koneksi Database Cloud MySQL

Komponen yang dipakai boleh menggunakan yang standar, semisal koneksi Delphi ke MySQL dengan DBExpress atau menggunakan komponen pihak ketiga semisal Zeos. Untuk koneksi Delphi ke MySQL menggunakan Zeos sudah saya tulis sebelumnya. Yang akan saya pakai untuk koneksi Delphi ke cloud database MySQL dalam tulisan ini adalah Zeos dan Delphi 7, mengingat Delphi 7 sangat terkenal dan banyak digunakan, serta Zeos yang merupakan komponen akses database gratis dan open source.

Membuat Cloud Database MySQL

Silahkan mengunjungi XeRound.com, dan daftarkan diri Anda untuk layanan gratis cloud hosting MySQL.
Setelah selesai, silahkan login ke service manager yang berada di alamat ini: https://cloud.xeround.com/service/management.
Buatlah sebuah Database Instance. Lihat gambar berikut. Klik Create New.

Pilih yang free saja. Yang lain musti bayar…

Pilih lokasi Datacenter yang paling dekat dengan Anda. Karena semuanya jauh, pilih aja mana suka

Isikan konfigurasi instance database yang akan dibuat.

Monggo dicatat Username dan Password di atas. Ini perlu untuk melakukan koneksi Delphi ke cloud database MySQL yang telah kita buat nantinya.
Klik Create untuk membuat instance database. Tunggu sampai sampai selesai.

Belum selesai juga? Sabaaaarr… sudah gratis banyak menuntut pula. Sabar…
Dan…. plong..! Sudah jadi:

Perhatikan item-item yang saya tandai di atas:

• Hostname/Server
• Port
• Username
• Password tidak ditampilkan, ini sama dengan password waktu Anda mendaftar ke XeRound.com
• Nama Database, mari kita buat….

Klik hostname:port di bawah item External DNS hostname, yaitu instance38864.db.xeround.com:6761 untuk membuka PHPMyAdmin. Kita perlu membuat sebuah database di sana. Sebagai informasi, hal ini dapat pula dilakukan dengan HeidiSQL, GUI gratis untuk MySQL dan MariaDB.

Sekarang di PHPMyAdmin, loginlah dengan username dan password Anda. Jangan bilang lupa!

Setelah masuk, klik tab Databases, dan buat sebuah database baru. Lihat urutan nomor yang saya tandai:

Setelah berhasil, berikut database kita yang baru:

Klik database delphi_cloud_mysql  dan buat sebuah tabel baru, misalnya dengan nama daftar_user.

Klik Go untuk membuka field editor. Buatlah field-field seperti berikut:

Bila repot, silahkan gunakan SQL hasil eksport dari tabel di atas:

Sayangi Dengan Berbagi

 

0001 0002 0003 0004 0005 0006 0007 0008

CREATE TABLE IF NOT EXISTS `daftar_user` (   `id` int(20) NOT NULL AUTO_INCREMENT,   `uid` varchar(30) COLLATE utf8_bin NOT NULL,   `pwd` varchar(30) COLLATE utf8_bin NOT NULL,   `last_login` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP,   PRIMARY KEY (`id`),   UNIQUE KEY `uid` (`uid`) ) ENGINE=Xeround DEFAULT CHARSET=utf8 COLLATE=utf8_bin COMMENT='daftar user' AUTO_INCREMENT=1 ;

Koneksi Delphi Ke Cloud Database MySQL

Setelah membuat sebuah database dan sebuah tabel, mari kita coba koneksi ke database kita dari Delphi.
Buatlah sebuah aplikasi baru di Delphi. Saya menggunakan Delphi 7 dan Zeos DBO 7.0.0.
Tambahkan sebuah ZConnection, sebuah ZQuery, sebuah Datasource dan sebuah DBGrid ke form utama. Untuk ZConnection1, atur property seperti berikut (kecuali property Connected, property ini harus di-set paling akhir setelah property-property yang lain telah di-setting dengan benar agar tidak mengakibatkan error):

Aktifkan property Connected. Bila tidak dapat terhubung, periksa apakah ada kesalahan pengetikan. Cek juga jangan sampai koneksi internet sedang tidak aktif. Kalau sudah berubah menjadi True, silahkan dinonaktifkan lagi jadi False. Maaf mutar-mutar….
Kemudian hubungkan ZQuery1.Connection ke ZConnection1. Lalu isi property SQL dengan query berikut:

0001	select * from daftar_user limit 0,10

Limit 0,10 akan membatasi jumlah record data sebanyak sepuluh baris, dimulai dari offset 0 (baris pertama). Ini bermanfaat untuk menghemat bandwith mengingat database kita berada di awan. Data di baris selanjutnya tentu dapat diakses dengan mengubah parameter LIMIT ini. Hal ini dikenal dengan sebutan Paginating -pake P, bukan V !
Trus hubungkan Datasource1.Dataset ke ZQuery1. Selanjutnya hubungkan DBgrid1.Datasource ke Datasource1.
Untuk tombol Button1 dengan Caption “Test”, kita isi kode berikut:

0001 0002 0003 0004 0005

procedure TForm1.Button1Click(Sender: TObject); begin   ZConnection1.Connect;   ZQuery1.Open; end;

Kode di atas untuk membuka koneksi dan melakukan query data. Silahkan jalankan projek dan coba inputkan data.

Kalau sudah berhasil, silahkan buat tabel-tabel lain dan silahkan kembangkan projek Anda.
Selamat mencoba.