Minggu, 28 Maret 2010


ADOConnection adalah komponen delphi yang digunakan untuk membangun koneksi dengan data fisik menggunakan terminologi ADO milik Microsoft.

ADOTable merupakan komponen delphi yang merupakan data fisik dalam aplikasi delphi yang dibuat.

DataSource merupakan komponen delphi yang berfungsi memberikan sambungan dengan komponen data  kontrol visual  milik delphi lainnya untuk membangun interface.

DbGrid berfungsi untuk menampilkan data dalam bentuk tabel pada delphi.

DbNavigator mendukung kemampuan navigasi dalam operasi tabel.


Senin, 22 Maret 2010

LP SBD2 PERT.4 - 3IA04 - 27 MARET 2010



**PERTANYAAN**
  1. Jelaskan tentang PL/SQL!
  2. Jelaskan tentang Trigger dalam database!
  3. Buat contoh program PL/SQL dan Trigger!

**JAWABAN**
  1. PL/SQL {Procedural Language/Structured Query Language) adalah bahasa gabungan antara bahasa prosedural dan bahasa SQL sehingga di dalamnya dapat dilakukan struktur kontrol seperti runtunan, percabangan dan pengulangan. PL/SQL berada pada lingkungan back end dan digunakan untuk membuat kontrol terhadap database yang diolah sebelum database tersebut dihubungkan dengan lingkungan front end. Hal ini tentunya akan dapat menjaga integritas dan konsistensi data yang disimpan di dalamnya.
  2. Trigger adalah blok PL/SQL atau prosedur yang berhubungan dengan tabel, view, skema atau database yang dijalankan secara implisit pada saat terjadi sebuah event. Perintah-perintah yang akan mengaktifkan Trigger adalah UPDATE, INSERT, dan DELETE. Trigger dipakai untuk menjaga integritas data dan mengimplementasikan aturan bisnis yang kompleks. 
  3. * Program PL/SQL
    SET SERVEROUTPUT ON;
    DECLARE
    E INTEGER;
    B INTEGER;
    Y INTEGER;
    V REAL;
    BEGIN
    E := 2; B := 3; Y := 8;
    V := E*B*Y;
    DBMS_OUTPUT.PUT_LINE ('VOLUME BALOK=' || V);
    END; 

         * Program Trigger 

CREATE OR REPLACE TRIGGER secure_emp
 BEFORE INSERT ON employees
 BEGIN
  IF (TO_CHAR(SYSDATE,'DY') IN ('SAT','SUN')) OR
     (TO_CHAR(SYSDATE,'HH24:MI') NOT BETWEEN '08:00' AND '18:00')
   THEN RAISE_APPLICATION_ERROR (-20500,'Penyisipan data pada table
EMPLOYEES hanya diperbolehkan selama jam kerja');
  END IF;
END;
          

ANIMASI PADA DELPHI

1. Animasi Timer


    procedure TForm1.Timer1Timer(Sender: TObject);
    begin
    if Label1.Visible then Label1.Visible:=False
    else label1.Visible:=True;
    end;

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    application.Terminate;
    end;
    end.

2. Animasi Warna
    procedure TForm2.Merah1Click(Sender: TObject);
    begin
    Label1.Color:=clRed;
    end;
    procedure TForm2.Biru1Click(Sender: TObject);
    begin
    Label1.Color:=clBlue;
    end;

    procedure TForm2.Hijau1Click(Sender: TObject);
    begin
    Label1.Color:=clGreen;
    end;

    procedure TForm2.Hitam1Click(Sender: TObject);
    begin
    Label1.Font.Color:=clBlack;
    end;

    procedure TForm2.Kuning1Click(Sender: TObject);
    begin
    Label1.font.Color:=clYellow;
    end;

    procedure TForm2.Ungu1Click(Sender: TObject);
    begin
    Label1.font.Color:=clPurple;
    end;

    procedure TForm2.Exit1Click(Sender: TObject);
    begin
    application.Terminate;
    end;
    end. 
3. Animasi Message Box
     procedure TForm3.Button1Click(Sender: TObject);
     var Nilai:Integer;
     begin
     Nilai:=StrToInt(Edit1.Text);
     if (Nilai < 40 )then
     Application.MessageBox('Grade E','Grade',0);
     if (Nilai >= 40 ) And (Nilai<60) then
     Application.MessageBox('Grade D','Grade',0);
     if (Nilai >= 60 ) And (Nilai<70)then
     Application.MessageBox('Grade C','Grade',0);
     if (Nilai >= 70 ) And (Nilai<80)then
     Application.MessageBox('Grade B','Grade',0);
     if (Nilai >= 80 ) And (Nilai<=100)then
     Application.MessageBox('Grade A','Grade',0);
     end;

     procedure TForm3.Button2Click(Sender: TObject);
     begin
     Application.Terminate;
     end;
     end.

NOTES : 

1. jangan lupa kalau buat form baru,,projectnya diperiksa.
    PROJECT > OPTIONS > pilih form yang aktif 

2. Jangan lupa samakan name form, label, edit, button yang kalian buat dengan 
    programnya.
3. Logika jangan sama.
    Logika bukan penjelasan langkah-langkah pembuatan form, tetapi 
    penjelasan dari mulai membuat form sampai programnya jalan.







Kamis, 18 Maret 2010

LP SBD2 PERT.3 - 3IA04 - 20 MARET 2010

**PERTANYAAN**
  1.  Apa yang kalian ketahui tentang deadlock dalam database!
  2. Berikan sebuah contoh kasus deadlock!

**JAWABAN**
  1. Database pemblokiran terjadi bila koneksi ke SQL server kunci satu atau lebih catatan, dan kedua koneksi ke SQL server memerlukan tipe kunci yang saling bertentangan pada catatan, atau catatan, dikunci oleh sambungan pertama. Deadlocking adalah suatu kondisi yang terjadi jika dua pengguna atau sesi mempunyai kunci pada benda-benda yang terpisah dan masing-masing proses sedang berusaha untuk mendapatkan kunci pada objek bahwa proses lain. Deadlock disebabkan karena proses yang satu menunggu sumber daya yang sedang dipegang oleh proses lain yang sedang menunggu sumber daya yang dipegang oleh proses tersebut.
  2. Kasus deadlock paling sering terjadi selama acara berat pengolahan, dan sering dapat dihindari dengan menyaring peristiwa yang tidak diinginkan.







LP GRAFKOM2 PERT.3 - 3IA04 - 19 MARET 2010

**PERTANYAAN**
  1. Jelaskan cara memberi warna object pada Anim8tor?
  2. Apa yang kalian ketahui tentang RGB?

**JAWABAN**
  1. Cara pewarnaan object pada Anim8tor ialah dengan kotak dialog parameter viewport yang ditemukan dibawah view preferences menu, kemudian kita set warna.2.
  2. Model warna RGB adalah model warna berdasarkan konsep penambahan kuat cahaya primer yaitu Red, Green dan Blue. Dalam suatu ruang yang sama sekali tidak ada cahaya, maka ruangan tersebut adalah gelap total. Tidak ada signal gelombang cahaya yang diserap oleh mata kita atau RGB (0,0,0). Apabila kita menambahkan cahaya merah pada ruangan tersebut, maka ruangan akan berubah warna menjadi merah misalnya RGB (255,0,0), semua benda dalam ruangan tersebut hanya dapat terlihat berwarna merah. Demikian apabila cahaya kita ganti dengan hijau atau biru. Warna Tersier adalah warna yang hanya dapat terlihat apabila ada tiga cahaya primer, jadi apabila kita non-aktifkan salah satu cahaya, maka benda tersebut berubah warna. Contoh warna tersier seperti abu-abu, putih. Konsep Model Warna RGB dapat kita jumpai di peralatan seperti:
    • Televisi
    • Camera Foto
    • Pemindai Warna

Rabu, 17 Maret 2010

TUGAS PENGULANGAN DELPHI KELAS 1IA03

Buat form seperti berikut :











Dengan Ketentuan : 
  
Frame / Control

Properties
Setting
Label
Label1
Label2
Label3
Caption
Caption
Name
NAMA
NPM
Label3
Edit
Edit1
Edit2
Edit3
Name
Name
Name
Edit1
Edit2
Edit3
Button
Button 1
Button 2
Button 3
Caption
Caption
Caption
INPUT
CLEAR
EXIT
 

Tugas : 
Buat program dengan ketentuan seperti di atas sehingga

1. Pada saat mengklik button INPUT, hasilnya :

2. Pada saat mengklik button Clear

 3. Pada saat mengklik button EXIT, maka akan keluar dari program.

Minggu, 14 Maret 2010

PERCABANGAN, PERULANGAN DAN ARRAY PADA DELPHI

Program Percabangan, Perulangan Dan Array Pada Delphi

Buat Form seperti gambar di bawah ini :

Minggu, 07 Maret 2010


Tujuan dari UID adalah merancang interface yang efektif untuk sistem perangkat lunak. Efektif artinya siap digunakan dan hasilnya sesuai dengan kebutuhan pengguna. Pengguna sering menilai sistem dari interfacenya, bukan dari fungsinya melainkan dari user interfacenya. Jika desain user interfacenya yang buruk, maka itu sering jadi alasan untuk tidak menggunakan software.
Prinsip UID pertama kali diperkenalkan oleh Deborah J. Mayhew. Ada 17 prinsip yang harus dipahami para perancang system, terutama untuk mendapatkan hasil maksimal dari tampilan yang dibuat, yaitu User Compatibility, Product Compatibility, Task Compatibility, Work Flow Compatibility, Consistency, Familiarity, Simplicity, Direct Manipulation, Control, WYSIWYG (What You See Is What You Get), Flexibility, Responsiveness, Invisible Technology, Robustness, Protection, Ease of Learning, Ease of Use. Namun yang akan kita bahas hanya 3 dari 17 prinsip tersebut antara lain, Learnability (Ease of Learning), Flexibility, dan Robustness. 

Rabu, 03 Maret 2010

PENGANTAR TEKNOLOGI GAME




RESENSI GAME
 JENIS                                     : Simulasi Kehidupan
JUDUL                                   : Harvest Moon: Back To Nature
PENGEMBANG                    : Victor Interactive Software
TAHUN PEMBUATAN        : 2000
RATING                                 : ****

 HARVEST MOON BACK TO NATURE adalah sebuah game yang aman dimainkan semua kalangan umur. Game ini menceritakan tentang seorang pemuda berumur sekitar 17-an (mungkin) yang mendapatkan warisan sebuah kebun dari kakeknya. Namun para penduduk sekitar tidak yakin seseorang dari kota bisa mengurus kebun itu sehingga mereka sepakat untuk mengetesnya selama tiga tahun dan akan mengusirnya jika ia gagal. Entah mengapa dia setuju dan bersedia menjalani tes yang diberikan para penduduk desa. Tokoh utama dalam game ini (kita sebut saja Peter), karena kesibukan orang tuanya, Peter harus menghabiskan liburan musim panas di masa kecilnya dengan bermain di peternakan kakeknya. Kakeknya juga sangat sibuk dengan pekerjaannya sebagai petani sekaligus peternak, sehingga tidak bisa menemani Peter bermain dengannya tetapi kakeknya mengijinkan Peter bermain sendiri dan tinggal sesuai keinginannya. Peter kecil pun bermain-main: mengendarai kuda, mengejar-ngejar ayam, dan banyak lainnya. Ketika lelah bermain, Peter pergi ke padang rumput untuk berbaring sejenak. Saat itu terdengar suara nyanyian yang indah, ternyata seorang gadis kecil seumuran Peter sedang bernyanyi disitu. Tak lama mereka berteman dan bermain bersama setiap hari. Ketika tiba waktunya bagi Peter untuk pulang, gadis itu merasa sedih. Dia meminta Peter berjanji untuk kembali ke sini suatu saat nanti.
 
 
     

;;