Membuat Koneksi Delphi Dan Database Microsoft Acces Menggunakan Komponen ADOConnection

ADOConnection merupakan komponen untuk membuat koneksi dengan database, komponen ini telah disediakan oleh Delphi. Komponen ini berada pada tab ADO pada component pallete. 

Sekarang saatnya mencoba melakukan koneksi dan menguji koneksi database. Pertama-tama kita buat databasenya dengan desain sebagai berikut :

Simpan database dengan nama Mahasiswa, dan nama tabel T_Mahasiswa. setelah database dibuat saatnya membuat desain form pada Delphi. berikut desain form di Delphi :

Langkah - langkah melakukan koneksi database :

1. Klik 2x komponen ADOConnection. hingga muncul tampilan seperti berikut :

2. Klik Build hingga muncul tampilan seperti dibawah. Kemudian klik Next.

  3. Kemudian klik tombol browse.

4. Kemudian tentukan dimana database yang telah dibuat disimpan. Lalu klik Open.

 

5. Selanjutnya lakukan tes koneksi dengan mengklik tombol test connection. Jika tampilan muncul seperti dibawah maka koneksi telah berhasil.

6. Klik OK. Maka muncul tampilan seperti berikut . Kemudian klik OK.

7. Selanjutnya atur properties komponen ADOConnection seperti berikut :

Pengujian koneksi database :

1. Atur nilai properties komponen DataSource seperti berikut :

2. Atur nilai properties komponen ADOTable seperti berikut :

3. Atur nilai properties komponen DBGrid seperti berikut :

4. Atur nilai properties komponen DBNavigator seprti berikut :

5. Jalankan program...

Jangan Menunggu

☼ Jangan menunggu BAHAGIA baru TERSENYUM, tapi TERSENYUMLAH, maka kamu kian BAHAGIA.

☼ Jangan menunggu KAYA baru BERSEDEKAH, tapi BERSEDEKAHLAH, maka kamu semakin KAYA.

☼ Jangan menunggu TERMOTIVASI baru BERGERAK, tapi BERGERAKLAH, maka kamu akan TERMOTIVASI.

☼ Jangan menunggu DIPEDULIKAN orang baru kamu PEDULI, tapi PEDULILAH dengan orang lain! Maka kamu akan DIPEDULIKAN.

☼ Jangan menunggu orang MEMAHAMI kamu baru kamu MEMAHAMI dia, taÞi PAHAMILAH orang itu, maka orang itu PAHAM dengan kamu.

☼ Jangan menunggu TERINSPIRASI baru MENULIS tapi MENULISLAH, maka INSPIRASI akan hadir dalam TULISANMU.

☼ Jangan menunggu PROYEK baru BEKERJA, tapi BEKERJALAH, maka PROYEK akan menunggumu.

☼ Jangan menunggu DICINTAI baru MENCINTAI, tapi belajarlah MENCINTAI, maka kamu akan DICINTAI. 

☼ Jangan menunggu banyak UANG baru HIDUP TENANG, tapi HIDUPLAH dengan TENANG. Percayalah, bukan sekadar UANG yang datang tapi juga REZEKI yang lainnya.

☼ Jangan menunggu CONTOH baru BERGERAK MENGIKUTI, tapi BERGERAKLAH maka kamu akan menjadi CONTOH YANG DIIKUTI.

☼ Jangan menunggu SUKSES baru BERSYUKUR, tapi BERSYUKURLAH, maka bertambah KESUKSESANMU.

☼ Jangan menunggu BISA baru MELAKUKAN, tapi LAKUKANLAH! Kamu pasti BISA !

So, don't wait...

 

 

Source :                                        https://www.facebook.com/#!/pages/Strawberry/327342750179

Meningkatkan keimanan kepada Allah SWT

Apa atau siapa Allah SWT ? 

“Katakanlah: Dia-lah Allah, Yang Maha Esa. Allah adalah Tuhan yang bergantung kepada-Nya segala sesuatu. Dia tiada beranak dan tidak pula diperanakkan. dan tidak ada seorangpun yang setara dengan Dia.” (QS. Al Ikhlas : 1-4)

Dimanakah Allah SWT berada ? 

“Dan apabila hamba-hamba-Ku kepadamu tentang Aku, maka sesungguhanya Aku dekat. Aku mengabulkan permohonan orang yang berdoa apabila ia berdoa kepada-Ku, maka hendaklah mereka itu memenuhi-Ku, dan hendaklah mereka itu beriman kepada-Ku agar mereka selalu berada dalam kebenaran.” (QS. Al Baqarah : 186).

"Dan sesunggunya Kami telah menciptakan manusia dan mengetahui apa yang dibisikkan oleh hatinya dan Kami lebih dekat kepadanya dari pada urat lehernya." (QS. Qaaf : 16).

Bagaimana mengenal dan memahami Allah SWT ?

“Dan mengapa mereka tidak memikirkan tentang (kejadian) diri mereka? Allah tidak menjadikan langit dan bumi dan apa yang ada di antara keduanya melainkan dengan tujuan yang benar dan waktu yang ditentu-kan. Dan sesungguhnya kebanyakan di antara manusia benar-benar ingkar akan pertemuan dengan Tuhannya.” (QS. Ar Ruum : 8)

Bagaimana cara mengabdi kepada Allah ?

“Katakanlah: Sesungguhnya shalatku dan ibadahku, hidup dan matiku hanyalah untuk Allah, Tuhan semesta alam.” (QS. Al An’am: 162)

Kenapa Allah SWT menciptakan manusia ?

“Aku ciptakan jin dan manusia semata-mata untuk menyembahKu.” (QS. Az Dzariyat: 56)

Kenapa Allah SWT menguji manusia ?

“Dia Yang Mematikan dan Menghidupkan untuk menguji siapa di antara kamu yang terbaik amalnya. Dia Maha Perkasa lagi Maha Pengampun.” (QS. Al Mulk : 2)

Algoritma, pseudocode dan flowchart

Algoritma adalah langkah-langkah logis dalam menyelesaikan suatu masalah, atau secara sederhana dalam dunia pemrograman adalah alur dari program yang akan kita buat.

Pseudocode adalah deskripsi dari algoritma pemrograman yang ditulis dengan struktur sederhana dari sebuah bahasa pemrograman yang tujuannya agar dapat dibaca oleh manusia. 

Flowchart atau diagram alir adalah representasi dari algoritma atau pseudocode kedalam bentuk diagram.

cara mudah untuk menentukan seperti apa algoritma dari program yang akan kita buat adalah dengan mengelompokkan apa-apa saja yang akan digunakan sebagai inputan, proses dan output apa yang diinginkan.

misalkan kita ingin membuat program untuk menghitung luas persegi panjang, dari sini bisa ditentukan apa saja input, proses dan output dari program tersebut.  berikut merupakan contoh algoritma, pseudocode dan flowchart :

Program menghitung luas persegi panjang

Input  : panjang dan lebar

Proses : panjang x lebar

Output : luas persegi panjang

Algoritma : 1. Masukkan panjang

                 2. Masukkan lebar

                 3. Luas Persegi panjang adalah panjang dikalikan lebar

                 4. Tampilkan luas persegi panjang

Pseudocode :  Input panjang

                      Input lebar

                      Luas = panjang x lebar

                      Print luas

Flowchart :

Implementasi kedalam program bahasa C :

#include<stdio.h>
main()
{
 int Luas, Panjang, Lebar;

printf("Masukkan Panjang = "); scanf("%i",&Panjang);
printf("Masukkan Lebar = "); scanf("%i",&Lebar);
Luas = Panjang x Lebar;
printf("Luas =  %i  ",Luas);

} 

Implementasi kedalam program Delphi :

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Button1: TButton;
    Edit3: TEdit;
    Label3: TLabel;
    procedure Button1Click(Sender: TObject);
    procedure Edit1KeyPress(Sender: TObject; var Key: Char);
    procedure Edit2KeyPress(Sender: TObject; var Key: Char);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
Luas, Panjang, Lebar : real;
begin
Panjang := strtofloat(edit1.Text);
Lebar := strtofloat(edit2.Text);
Luas := Panjang * Lebar;
edit3.Text := floattostr(Luas);

end;

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not(key in['0'..'9',#8]) then
key:=#0;
end;

procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if not(key in['0'..'9',#8]) then
key:=#0;
end;

end.

Ngaji yukk...

Rasulullah SAW bersabda : 

"Perumpamaan orang mukmin yang membaca Al Quran bagaikan buah limau baunya harum dan rasanya lezat. Dan perumpamaan orang mukmin yang tidak membaca Al Quran bagaikan kurma rasanya lezat dan tidak berbau. Dan perumpamaan orang munafik yang membaca Al Quran bagaikan buah raihanah yang baunya harum dan rasanya pahit. Dan perumpamaan orang munafik yang tidak membaca Al Quran bagaikan buah hanzholah tidak berbau dan rasanya pahit." (HR. At Tirmidzi).

"Sebaik-baik kalian yaitu orang yang mempelajari Al Quran dan mengajarkannya." (HR. Bukhari).

"Orang yang membaca Al Quran dan ia mahir dalam membacanya maka ia akan dikumpulkan bersama malaikat yang mulia lagi berbakti." (HR. Tirmidzi).

"Bacalah Al Quran ! maka sesungguhnya ia akan datang pada hari kiamat sebagai syafaat bagi ahlinya (yaitu orang yang membaca, mempelajari dan mengamalkannya." (HR. Ahmad).

"Seringlah kalian membaca Al Quran didalam rumahmu, maka sesungguhnya rumah yang tidak pernah dibacakan Al Quran sedikit kebaikannya dan banyak kejelekannya serta sempit bagi penghuninya." (HR. Daruqutni).

"Barangsiapa yang membaca Al Quran dan mengamalkan apa yang terdapat didalamnya. Allah SWT akan mengenakan mahkota kepada kedua orang tuanya pada hari kiamat kelak. Dimana cahayanya lebih terang dari pada cahaya matahari didunia. Maka kamu tidak akan menduga bahwa ganjaran itu disebabkan dengan amalan yang seperti ini." (HR. Abu Daud).

Nafsu - nafsu yang menjadi sarang setan

1. Nafs Al-Hayawaniyyah, yaitu naluri jasad manusia yang cenderung pada kebendaan, ini merupakan dimensi dari sifat zhulm (gelap dan materialistik).

2. Nafs Al-Musawwilah, yaitu nafsu manusia yang membangkitkan khayalan menyesatkan dan menipu, nafsu ini memancarkan gambaran-gambaran yang menipu dan membawa manusia pada hasrat kesyahwatan, kecintaan terhadap harta benda, mabuk kekayaan duniawi dan lainnya.

3. Nafs Al-Ammarah, yaitu kecenderungan manusia yang mengarah pada kejahatan namun mengarah pula pada rahmat ilahi. Ini adalah sifat-sifat kesetanan serta sifat-sifat manusiawi yang mencitrai keberadaan manusia.

4. Nafs Al-lawwamah, yaitu nafsu yang mengkritik, mencela kejahatan dan membencinya. Apabila terlanjur berbuat kejahatan dia lekas menyadari dan menyesalinya.

5. Nafs Al-Mulhamah, yaitu pancaran sifat-sifat tauhid yang membawa manusia pada keyakinan tentang kebenaran ilahi. Tapi kilasan-kilasan khayalan yang lahir dari lintasan pikiran khawatir didalam hati cenderung mengganggunya.

Referensi : 

Abiraja Suhendi. 2008. Setan, Skak Mat !. Bandung : Penerbit Mizania

 

Agar siapapun menyukai anda setiap saat

1. Beradalah disekitar orang sesering mungkin, karena keakraban menumbuhkan rasa sayang, bukan rasa benci !

2. Jika hendak berbicara dengan seseorang , lakukanlah ketika suasana hatinya sedang baik, sehingga hukum pergaulan bisa berlaku. Bicarakanlah minat atau pengalaman yang sama-sama kalian pernah alami dan cobalah untuk lebih banyak mendengar, jangan terlalu banyak bicara.

3. Terapkan hukum saling menyukai jika anda menghormati atau mengagumi sesuatu yang ada pada dirinya, pastikan dia mengetahui hal itu.

4. Buatlah dia melakukan sedikit kebaikan kepada anda , tetapi pastikan bahwa hal itu tidak mengandung kesan perintah. Hal ini menciptakan motivasi tak sadar dia untuk lebih menyukai anda.

5. Bangunlah jembatan psikologis dan lakukanlah komunikasi dengan meniru gerak tubuh dan menyesuaikan diri denagn tempo dan nada bicaranya.

6. Kita tertarik pada orang-orang yang percaya diri. Tunjukkan kepercayaan diri anda dengan mampu tertawa pada diri anda sendiri dan tidak terlalu menjaga penampilan.

7. Buatlah dia merasa nyaman, jadilah orang yang penuh pengertian, baik hati, tulus dan hangat.

8. Milikilah sikap mental yang positif. kita tertarik pada orang yang antusias, bergairah, periang dan aktif.

Referensi :
David J. Lieberman, Ph.D, Agar siapa saja mau melakukan apa saja untuk anda, Halaman. 33-34)  

Belajar menjadi besar dari orang-orang besar

Al Mutanabbi mengatakan, "Manusia dinilai berdasarkan perbuatan mereka. kebesaran jiwa mereka yang menentukan karya besar mereka memang besar. Dimata orang-orang kerdil masalah-masalah sepele menjadi besar. Bagi yang berjiwa besar, masalah-masalah besar terlihat kecil."

Rosulullah SAW bersabda, "Wahai manusia, sebarkanlah salam, berilah makan orang yang membutuhkan, jalinlah persaudaraan dan sholatlah dimalam hari ketika orang lain ketiduran, niscaya kalian akan masuk surga dengan penuh kesejahteraan." (HR. Tirmidzi dari Abdullah Bin Salam).  

Imam Malik tidak tertidur saat belajar. ini cara unik ulama dalam meluarbiasakan diri. Beliau menyedikitkan waktu tidurnya untuk menggali ilmu dan menorehkannya guna diwariskan untuk umat sepanjang zaman.

Imam Syafi'i rahimahullah membagi waktu malamnya menjadi tiga yakni sepertiga pertama untuk menulis ilmu, sepertiga kedua untuk shalat malam, dan sepertiga ketiga untuk tidur.

"Kalau aku tidur disiang hari berarti aku menyia-nyiakan hak rakyat atas diriku. Kalau aku tidur malam hari berarti aku menyia-nyiakan hakku untuk beribadah kepada Rabbku." (Umar Bin Khattab).

Referensi :

Solikhin Abu Izzuddin, Zero To Hero, Halaman. 108-110

 

7 Kata kunci

Ada tujuh kata kunci untuk mendahsyatkan potensi diri meraih prestasi , yaitu :

1. Atsbatuhum mauqiifan ..yang paling kokoh atau tsabat sikapnya.

2. arhabuhumshadran .......yang paling lapang dadanya.

3. A'maquhum fikran .........yang paling dalam pemikirannya.

4. Ausa'uhum nazharan .....yang paling luas cara pandangnya.

5. Ansyatuhum 'Amalan .....yang paling rajin amal-amalnya.

6. Aslabuhum tanzhiman ...yang paling solid penataan organisasinya.

7. Aktsaruhum naf'an ........yang paling banyak manfaatnya. 

Referensi :

Solikhin Abu Izzuddin, Zero To Hero, Halaman. 257

Inspirasi & motivasi

"Dan Allah SWT mengeluarkan kamu dari perut ibumu dalam keadaan tidak mengetahui sesuatupun, dan Dia memberi kamu pendengaran, penglihatan dan hati agar kamu bersyukur." (QS. An Nahl : 78).

"Sesungguhnya Allah SWT tidak mengubah keadaan suatu kaum sehingga mereka mengubah keadaan yang ada pada mereka sendiri." (QS. Ar Ra'd : 11).

"Sebaik-baik manusia adalah yang paling bermanfaat bagi manusia." (HR. Tirmidzi).

"Dunia ini adalah perhiasan dan sebaik-baik perhiasan adalah wanita yang soleha." (HR. Muslim). 

"Barang siapa tidak menyibukkan diri dalam kebaikan niscaya dia akan disibukkan dalam keburukan." 

"Barangsiapa melalui suatu jalan untuk mencari suatu pengetahuan agama Allah SWT akan memudahkan jalan menuju surga." (HR. Bukhari). 

"Seorang mukmin yang bergaul dengan banyak orang , lalu ia sabar dengan tindakan meraka yang menyakitkan, maka itu lebih baik dari pada orang yang tidak pernah bergaul dengan orang banyak dan ia tidak bisa sabar dengan tindakan mereka yang menyakitkan." (HR. Ahmad).

Nikmat kesehatan & waktu luang

Rosululloh SAW pernah bersabda :

"Ada dua nikmat, dimana banyak orang yang terlena karena keduanya. yaitu kesehatan dan waktu luang." (HR. Al-Bukhari)

Ibnu Jauzi berkata : "Adakalanya orang itu sehat, tapi tidak punya waktu luang. Adakalanya seseorang itu punya waktu luang dan berbadan sehat tapi ia malas melakukan ketaatan kepada Allah SWT, maka ia termasuk orang yang merugi.

Page not available...