Back-Up Database Access Dengan Delphi

Welcome ......!!!

Ketemu Lagi Dengan Salah Satu Tips Aku Untuk Memback-up Database Access dengan Delphi.
Delphi Memberikan Bahasa Pemrograman Yang high Level ( Artinya Sangat Mudah Dipahami ) Sehingga membuat User Seperti Aku Mudah Mengelola Databasenya.
Seperti Database Accesss Sendiri Dibuat dari Pabrikan Microsoft, Sehingga Sangat Friendly dengan Kita yang Sudah terbiasa Windows. MS. Access Dapat Dibuat Secara stand Alone Ataupun Dalam Jaringan.
Tetapi Kebanyakan Database Ms.Access Dibuat Dengan stand Alone ( sistem Informasi yang Berdiri Sendiri / Tanpa Terelasi Dengan Sistem Aplikasi Lain.

Okkey Langsung Aj Ke TKP...

procedure TForm3.buka1Click(Sender: TObject);
var namadatabase : widestring;
begin
if application.MessageBox('Membuka database lain akan menutup koneksi'+#13+
'dengan database sekarang. Harap simpan semua pekerjaan.'+#13+
'Anda yakin bermaksud membuka database lain ?','Perhatian',

mb_yesno + mb_iconinformation) =IDYES then
begin
closeallform;
if opendialog.Execute then
begin

namadatabase := opendialog.FileName;
modul.connect.Connected := false;
modul.connect.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+ namadatabase+';'+
'Mode=Share Deny None;Extended Properties="";Persist Security Info=False;Jet OLEDB:System database="";'+
'Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;'+
'Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;'+
'Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";'+
'Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;'+
'Jet OLEDB:Don''t Copy Locale on Compact=False;'+
'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False';
modul.connect.Connected := true;

modul.ADOlogin.Active:=true;
modul.ADOTableDaftar.Active:=true;
modul.ADOTablePenatar.Active:=true;
modul.ADOheader.Active:=true;
modul.ADOQuery1.Active:=true;
modul.ADOTablemikro.Active:=true;
modul.ADOTableanngota.Active:=true;
Form7.ADOQuery1.Active:=true;
Form7.ADOQuery2.Active:=true;
Form12.ADOQuery1.Active:=true;
Form20.ADOQuery1.Active:=true;


// if opendatabase = true then showmessage('berhasil') else showmessage('gagal');
if not(bukadatabase = false) then
begin
application.MessageBox('Database berhasil dibuka :) ','Information',
mb_ok + mb_iconinformation);
Form3.StatusBar1.Panels.Items[0].Text := 'SISTEM INFORMASI PENDAFTARAN - '+opendialog.FileName;

end
else
begin
application.MessageBox('Database gagal dibuka :(','Information',
mb_ok + mb_iconerror);

tutup;
modul.connect.Connected := false;
modul.connect.ConnectionString :='';
modul.connect.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+ extractfilepath(application.ExeName)+'\data.mdb;'+
'Mode=Share Deny None;Extended Properties="";Persist Security Info=False;Jet OLEDB:System database="";'+
'Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;'+
'Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;'+
'Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";'+
'Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;'+

'Jet OLEDB:Don''t Copy Locale on Compact=False;'+
'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False';

modul.connect.Connected := true;
modul.ADOlogin.Active:=true;
modul.ADOTableDaftar.Active:=true;
modul.ADOTablePenatar.Active:=true;
modul.ADOheader.Active:=true;
modul.ADOQuery1.Active:=true;
modul.ADOTablemikro.Active:=true;
modul.ADOTableanngota.Active:=true;
Form7.ADOQuery1.Active:=true;
Form7.ADOQuery2.Active:=true;
Form20.ADOQuery1.Active:=true;
Form28.ADOQuery2.Active:=true;

end;
end;
end;
end;


Tips Masukan Source Code Diatas Kedalam Button Ataupun MainMenu. Sehingga Source Diatas Dapat Ter-ekssekusi.....!!!!!!!
Kesimpulan.... : Simple Aj... Database MS. Access Diatas hanya Dicopy-paste Dalam Nama File Yang Baru. Sehingga Data-data Yang telah tersimpan telah tercopy Semunya.

Okkey Segitu Saja Tulisan Saya Mengenai Delphi, sampai Ketemu Lagi Dalam Kasus Selanjutnya. KEEP Spirit....!!!!

Read more...

Kode HTTP Error Dan Artinya

200 – OK
Permintaan telah berhasil.

301 – Moved Permanently.
Dokumen telah dipindahkan ke URL ini.

302 – Found
Dokumen telah dipindahkan ke URL ini.

303 – See Other
Jawaban untuk permintaan anda berada di URL ini.

304 – Not Modified
Salinan cache akan digunakan.

400 – Bad Request
Browser mengirim permintaan dan server tidak dapat memahami.

401 – Authorization
Membutuhkan autorisasi untuk memasuki URL ini.

403 – Forbidden
Anda tidak memiliki izin untuk mengakses server ini.

404 – Not Found
Dokumen tidak ada.

405 – Method Not Allowed
Metode GET yang diminta tidak diperbolehkan untuk URL

408 – Request Time-out
Server timeout.

410 – Gone
Proses yang diminta tidak lagi tersedia pada server ini dan tidak ada alamat forwarding.

411 – Length Required
Permintaan yang diminta metode GET memerlukan memerlukan Content-length yang valid

412 – Precondition Failed
Prasyarat pada permintaan untuk dievaluasi URL bernilai false.

413 – Request Entity Too Large
Proses yang diminta tidak memperbolehkan permintaan data dengan menggunakan metode GET atau jumlah data yang diberikan pada permintaan melebihi batas kapasitas.

414 – Request-URI Too Large
Panjang URL yang diminta melebihi batas kapasitas untuk server ini

415 – Unsupported Media Type
Permintaan data yang diberikan tidak dalam format yang dapat diterima untuk diproses oleh ini.

500 – Internal Server Error
Server mengalami kesalahan internal atau misconfiguration dan tidak dapat memenuhi permintaan Anda.

501 – Method Not Implemented
Metode GET ke URL tidak didukung

502 – Bad Gateway
Server proxy menerima respon tidak valid dari upstream server.

503 – Service Temporarily Unavailable
Server untuk sementara tidak dapat melayani permintaan anda karena pemeliharaan downtime atau masalah kapasitas .

506 – Variant Also Negotiates
Ini menunjukkan kesalahan konfigurasi.

Read more...

Meninggal Ketika Sujud Di Masjid Nabawi

Assalamu'alaikum,

Untuk renungan bersama.

Di Masjid Nabawi - Beautiful Ending

Assalamualaikum,

Cepat Atau Lambat Kita Akan Mengalaminya, sungguh tak terasa air keluar dari mata. Alangkah indahnya jika dapat mati dalam keadaan begini, insyaallah.. Amin

Read more...

Lantunan Kata Maaf Padamu

Salam Sejahtera Kawanku disana. Terima Kasih Yang Tak Terhingga Saya Panjatkan Kepada Pencipta-KU yang telah memberikanku kesempatan kepadaku untuk menulis artikel ini. sembah sujudku kepada-MU atas semua karuniamu. Teringat Kata nasehat yang selalu kau ucapkan kepadaku Lewat Utusanmu, terlintas Tuntunan-MU dibenakku

Inilah kata yang bisa saya sampaikan pada Teman-temanku dan yang membaca blogku yaitu Terima Kasih dan Mohon Maaf. Dengan segala kerendahaan hati yang terdalam, saya mengucapkan banyak terima kasih kepada kawanku dan kepada semua yang telah mengenal aku, baik itu dalam keseharian, sekolah maupun blog ini.

saya hanya mampu untuk memohon maaf yang tulus dari hati yang paling dalam atas segala kesalahan saya, kelakuan saya, tingkah laku saya, ocehan saya, ke bodohan saya, tulisan saya, artikel saya, sok tahu saya, janji-janji saya. Baik yang saya sengaja maupun yang tidak sengaja, baik yang terang-terangan maupun yang samar.

Tak Lupa Beribu Terima Kasih Saya Ucapakan Atas Dukungan dan support yang selama ini anda berikan,
Semoga amal, kebaikan, dibalas oleh Yang Maha Membalas Semua Kebaikan, Tuhan Yang Maha Kuasa.

Semoga keIKHLASan yang saya bangun ini akan menjadi pondasi bagi saya pribadi, dan tentunya dapat memberikan manfaat bagi orang lain.

Read more...

Mengenal Jaringan Wimax

Koneksi internet saat ini yang mungkin telah dikenal ada tiga jenis seperti misalnya :

• Broadband Acces

• Wifi Acces

• Dial-up Acces

Dari ketiga sistem acces tersebut mungkin Broadband Acces dan Wifi Acces yang dapat digunakan dengan nyaman dan praktis, namun memiliki keterbatasan dibutuhkannya anggaran yang besar untuk teknologi ini, cakupan area yang hanya ± 2,5 square miles atau 6,5 km persegi (inipun teknologi ADSL2,sedangkan teknologi ADSL dan DSL konvensional jauh lebih pendek dan masih menggunakan kabel), hot spot yang ditawarkan saat ini juga sangat terbatas.

WiMax ( Worldwide Interoperability for Microwave Acces ) diharapkan dapat memecahkan masalah ekonomis dan memiliki cakupan area yang luas, dimana teknologi ini dapat memberikan :

• Broadband Service dengan kecepatan yang sangat tinggi nirkabel dan memiliki kemudahan untuk memperluas daerah cakupan Cakupan wilayah seperti network komunikasi (GSM, CDMA)

• Dengan Teknologi Akses Micromave, yang menggunakan gelombang mikro sebagai media pengganti kabel, sehinga membuat Wimax dapat menjangkau cakupan area yang luas dan memiliki kemudahan yang praktis seperti juga Wi-FI.

Secara teknis WiMAX hanya membutuhkan dua buah perangkat yaitu :

• WiMAX Tower, yang digunakan sebagai akses point, memiliki cakupan area mencapai 50 km secara linear (hal ini dapat mengatasi masalah blind spot yang sering ditemukan pada jaringan Wi-FI karena menggunakan access point sebagai source). Mungkin bila diterapkan satu buah WiMAX Tower dapat menggantikan beberapa broadband access atau berarti dapat mencakup satu area kota kecil dan Tower ini memungkinkan dihubungkan dengan Tower WiMAX yang lain. WiMAX menggunakan standard nirkabel IEEE.802.16 seperti juga Wi-FI yang menggunakan 802.11.

• WiMAX Receiver, alat yang digunakan untuk menerima sinyal yang berasal dari WiMAX Tower, perangkat ini juga dapat berupa PCI Card, PCMCIA Card atau mungkin sebuah norebook yang sudah dilengkapi dengan WiMAX secara built-in seperti halnya notebook yang sudah built -in Wi-FI.

WiMAX juga bekerja pada gelombang frequensi rendah yaitu antara 2 GHz dan 11 GHz seperti juga Wi-FI, dikarenakan dengan range frequensi ini tidak mudah terganggu oleh benda-benda yang mungkin dapat menghalangi jalur data.

Dalam hal kecepatan, bila dibandingkan dengan Wi-FI saat ini hanya dapat menghantarkan bandwidth sebesar 54 Mbps (asumsi dengan kondisi optimal), sedangkan WiMAX memiliki kecepatan 70 Mbps (mampu melayani ratusan lebih user sekaligus dengan kecepatan setara cable modem…wuss..wusss )

Secara keseluruhan jika dibandingkan dengan Wi-FI tampaknya perbedaan yang terbesar bukan pada kemampuan bandwidth melainkan pada jangkauannya.

Read more...

Sedikit Tips Mempercepat OS XP Anda

Kali ini mau nulis langkah-langkah awal ba'da install XP maksude kalau baru selesai nginstall xp saya ada step-step buat dikit2 nambahin kecepatan dalam beroperasi nanti, bukan mempercepat sih!? intinya adalah membuang beberapa utilitas ataupun layanan yang dianggap mubazir atau berlebihan. heeeee... betul ?

Perlengkapan :
1. komputer
2. Instal XP
3. Penjelasane di bawah ini.

Sebenarnya ini dah kuno, tapi menurut saya ketimbang di bulan ramadhan ini kerjone tidur melulu mending posting apa ajah. yang penting bermanfaat :

Step-step nya seperti ini :
1. Matikan Alert dari Security Center.
Caranya seperti ini :
masuk ke control panel kemudian klik "change the way ..." hilankan tanda cheklistnya pada ketiga alert tersebut.

Kemudian OK.




2. Pilih beberapa item Visual Effect yang perlu :
Pada step ini langkah-langkahnya : silahkan klik kanan pada mycomputer anda, kemudian pilih properties :
Masuk pada TAB advanced, kemudian klik tombol settings pada group menu performance.

Pada tab visual effects silahkan nonaktifkan seluruh pilhan kecuali dua pada pilihan terakhir :
- use drop shadows ....
- Use visual style ....
kalau mau lebih enteng sekalian semuanya jangan di cheklist.

Langkah terakhir klik OK untuk melihat perubahan.

3. Matikan Fitur Error Reporting :
Masih memanfaatkan fungsi klik kanan pada mycomputer, masih tetap pada tab Advanced silahkan klik tombol Error Reporting.

Kemudian aktifkan pilihan disable error reporting... kalau perlu tanda ceklist pada notify juga di hilangkan kemudian klik OK.

4. Matikan Fitur Automatic Updates :
Automatic Updates akan bekerja/aktif ketika OS anda terkoneksi dengan internet. Efeknya? kalau original gpp, tapi kalau bajakan ntu yang ada dikit masalah, jadi lebih baik fitur ini dimatikan saja :

langkah-langkahnya : silahkan klik kanan pada mycomputer kemudian pilih properties : Masuk pada TAB Automatic Updates, kemudian aktifkan pilihan turn off automatic updates.


5. Ganti Beberapa nilai pada REGEDIT :

Klik Run kemudian masukan kata kunci regedit
langkah berikutnya adalah merubah beberapa nilai untuk keperluan tertentu :



Pada "HCKU\control panel\desktop\"
Set nilai = 0 untuk :
- HungAppTimeOut
- MenuShowDelay
- WaitToKillAppTimeOut

Pada "HKLM\System\CurrentControlSet\Control\"
Set nilai =0 untuk WaiToKillServeiceTimeOut

Kalau Sudah Di Close Saja dan Restart untuk melihat perubahan







6. Matikan beberapa services yang tidak digunakan : "Jalankan Run kemudian masukan kata kunci services.msc silahkan anda stop dan nonaktifkan saja startuptype pada beberapa layanan ini :
- Error Reporting Service
- Event Log
- Help and Support
- Remote Access Connection Manager
- Remote Registry
- Security Center
- System Event Notification
- System Restore Service (ini optional hehehe)
- Task Scheduler
dan banyak lagi pada service lainnya jika itu tidak bermanfaat. bagaimana, betull ??
"
7. Seleksi aplikasi pada startup : "Jalankan Run kemudian masukan kata kunci msconfig kemudian pilih tab startup... pengalaman saya selama ini semua saya non aktifkan kecuali yang penting-penting saja untuk jalan pertama kali, misal antivirus. kemudian ok dan restart untuk melihat perubahan"

Demikian broo, emang repot bangete !! saya agak sedikit lelah kalau baru ngistall ulang. tapi gpp lah demi kok ??!! yang jadi masalahe semua step-step itu bisa di rangkum dalam satu program utilitas saja... biar gk repot !### mudah-mudahan bisa di garap di bulan ramadhan ini ahhh.


Ok Begitu saja... Semoga Bermanfaat link

Read more...

Spirit Of indonesia independence

64 years indonesia get indenpence, 64 years indonesia be revolutions, 64 years indonesia exist in internationaly country. i love indonesia, we can forward becouse we many culture, and coaliscing to become strength. in agustus 2009, i make show in my village. this is my experience, let's teel my story....

here we go.......!!!!

in my first i todo is forming comitte, and i make many race in agustus, many sugesstion i take from comitte. but in fact i work alone. i evaluation what wrong in my false. some times i qustion in my heart i can't be leader, i have to stop and give my responsibility. but i know i can't done this times. many scedhule in my book, i must to become leader...

in my strategy i serving my member what he need, and i take some he responsibility. next i build comunication with member and i always sms ( short message ) to my member. some days i think to broadcast my sms to get spirit my member. i must to paying attention to my member. so i can take result my member. many schedule can passing at precise times. then.......

problems comes from citizen. he can't come to my race. i think i must leave this race and go with my schedule, but i know i wrong. i can't to motivated the citizen to join in my race. i can't leave her. i must awaken the citizen, with spirit, in my have, i not give up to awake the citizen. so...

with my sacrifice, i take my result. i very hapy. but this is not done...

in day i shown many member not attend. i work alone again, i can't motivated my member, although i has do my strategy. but view our latter i happy my member can't anttend. i ask to some one " what problem your comes to late ? " from my ask i know my member has work very well. he is done the job's.

i very happy, becouse my shown can walk sukses. thankyu to my country.....

Read more...

DELPHI DARI PASCAL TAPI PASCAL BUKAN DARI DELPHI

Delphi adalah sebuah bahasa pemrograman yang bersipat Objek (Object Oriented Programming) artinya adalah sebuah program yang mempunyai objek-objek tertentu dalam pemrograman nya. Selain itu Delphi adalah sebuah program yang bersifat visual artinya mempunyai tampilan grafik-grafik yang mudah dimengerti oleh pemula sekalipun (Graphical user Interface). Dengan Delphi Anda bisa membuat program-program dengan tampilan yang menawan, Delphi hanya bisa bekerja di bawah System Microsoft Windows sedangkan untuk system yang lain seperti Linux atau Unix Delphi mempunyai saudara kembarnya yang bisa bekerja pada system tersebut yaitu KYLIX.

Syntax-syntax Delphi di adopsi dari bahasa Pascal, untuk itu di dalam tutorial Dasar-dasar Delphi ini saya akan mengajak Anda ke masa lalu dimana pemrograman komputer saat itu masih menggunakan system 16 BIT yaitu Bahasa PASCAL sebelum Anda dibawa untuk mempelajari Pemrograman Delphi. Bila Anda sudah bisa bahasa PASCAL Anda dapat melewati pengantar mengenai bahasa Pascal ini.

Mengapa saya membawa Anda terlebih dahulu ke Bahasa Pascal tidak langsung ke Delphi ?, Dengan mengenal dasar-dasar bahasa pascal, Anda akan mudah untuk mempelajari pemrograman Delphi sebab semua syntax yang ada dalam pascal sama dengan syntax bahasa delphi, tetapi syntax dalam delphi tidak bisa diadopsi ke pascal karena itulah dalam pengantar ini saya beri judul Delphi adalah pascal tapi pascal bukan delphi.

II. Pengantar Bahasa Pascal

Instalasi PASCAL

Oke kita langsung saja pada materi pertama kita yaitu pengenalan bahasa pascal agar Anda mudah dalam mengikuti pemrograman bahasa Delphi berikutnya. Bila Anda kesulitan mencari program Bahasa Pascal versi 5, Anda dapat mendownloadnya disini. ( Download Pascal). Tapi saya memperingati kepada Anda bahwa program Pascal ini tidak boleh disebar-luaskan lagi kepada Umum sebab saya tidak punya lisensi untuk menyebarluaskan program ini. Dan juga Anda tidak boleh mengkomersialkan program ini, sebab program Pascal yang saya sediakan disini hanya untuk mempelajari program tersebut.

Setelah Anda Download exstract file pascal.zip dengan menggunakan winrar (Program Winrar Dapat di Download dari pilar kanan situs ini) atau winzip. Setelah itu klik dua kali file turbo.exe pada folder tersebut, maka program turbo pascal 5.5 sudah bisa Anda jalankan, bila ingin program Turbo Pascal yang lebih lengkap ikuti langkah-langkah berikut :

1.

Bila Komputer Anda belum terinstall winrar atau winzip installah program tersebut, program winrar dapat Anda download melalui link yang ada di pilar kanan situs ini.
2.

Pindahkan file pascal.zip ke Drive C: jangan didalam folder lagi agar mudah untuk memanggilnya melalui Command Prompt.
3.

Bila Winrar sudah terinstall, klik kanan file pascal.zip lalu pilih extract to pascal.
4.

Jalankan Command Prompt dari windows Anda, klik start run lalu ketik command klik ok maka command Prompt akan ditampilkan. Setelah itu ketik CD\ dan ketik C: maka drive yang aktif saat ini di command prompt adalah drive C.
5.

Setelah itu ketik CD PASCAL lalu tekan enter, maka sekarang Anda berada di drive C: pada folder pascal yang telah Anda extract tersebut. Kemudian Ketik Install lalu tekan enter. maka proses instalasi TURBO PASCAL 5.5 akan berlangsung. Ikuti saja petunjuk instalasi pascal yang ada di proses instalasi. Folder default instalasi pascal adalah TP.
6.

setelah instalasi pascal selesai keluar lah dahulu dari program pascal, kembali ke command prompt. Pada command prompt ketik lagi CD\pascal maka Anda akan kembali lagi ke folder pascal, setelah berada di folder pascal extract beberapa file yang berekstensi ARC ke folder TP, Sebelumnya ketik perintah DIR *.ARC maka semua file yang berekstensi ARC akan ditampilkan, catat nama file-file tersebut. Ada beberapa file ARC yang ada di folder pascal ini yaitu : BGI.ARC, DEMOS.ARC, DOC.ARC, HELP.ARC, OOPDEMOS.ARC, TCALC.ARC, TOUR.ARC, TURBO3.ARC, dan UTILS.ARC. File tersebut hanya bisa di extract oleh file UNPACK.COM yang berada di folder pascal. cara mengekstract nya sebagai berikut :

Buat folder pada direktori TP sesuai dengan nama-nama file arc yang akan diextract contoh : Anda akan mengekstract file DEMOS.ARC, maka buatlah direktori di folder TP dengan nama DEMOS. Masuk ke folder TP -- ketik CD\TP lalu ketik MD DEMOS maka folder dengan nama DEMOS akan terbentuk di folder TP. Setelah terbentuk folder DEMOS sekarang Anda beralih lagi ke folder PASCAL dengan mengetik CD\PASCAL, di folder PASCAL ketik perintah berikut UNPACK DEMOS C:\TP\DEMOS lalu tekan Enter. Maka file DEMOS.ARC akan di extract ke folder DEMOS yang berada di dalam folder TP. Lakukan hal yang sama pada file ARC yang lainnya.

Memulai PASCAL

Pada bahasa pascal Anda akan bermain dengan KEYBOARD bukan MOUSE, jadi untuk sementara lupakan fasilitas GUI yang dimanjakan oleh WINDOWS. sebab kita kembali ke tahun 80-an dimana PASCAL menjadi suatu bahasa Pemrograman pavorite dikalangan SCIENTIEST saat itu. Tombol keyboard yang paling pokok untuk mengakses program PASCAL adalah tombol : alt, esc, ctrl, F1 -- F12, ENTER, serta tombol anak panah. jadi bila salah satu tombol tersebut ada yang tidak berfungsi sebaiknya lupakan saja belajar pascal ini sampai Anda mengganti keyboard Anda dengan yang baru.

Untuk memulai pascal dari windows Anda dapat mengklik dua kali file TURBO.EXE, sedangkan bila melalui COMMAND PROMPT Anda dapat mengetikan perintah TURBO lalu tekan ENTER maka program PASCAL akan diload seperti gambar diatas. Tekan tombol ESC maka Program utama TURBO PASCAL akan di tampilkan, dari sini KEYBOARD menjadi senjata Anda untuk mengakses menu-menu yang ada di program utama PASCAL. Untuk lebih jelasnya mengenai penggunaan Keyboard pada pascal Anda dapat menekan tombol F1 yang akan memunculkan fasilitas HELP pada Pascal.

Untuk mengakses menu dari program pascal Anda gunakan tombol ALT di ikuti dengan Huruf pertama yang berwarna merah, contoh Anda akan mengakses menu File maka Anda dapat mengaksesnya dengan menekan tombol ALT dan huruf F. sekarang tekanlah tombol ALT+E, maka Anda berada pada mode editor, dan PASCAL siap untuk menerima perintah-perintah Program Anda. Sebagai perkenalan coba Anda ketikan program dibawah ini di editor PASCAL.

{ Program : Input dari keyboard dan Menghitung operasi matematika }
{ Create by : Komarudin_surya@suryatekno }

uses Crt;
var
x,y,z : longint;
lagi : char;
namak : string[20];

begin
lagi := 'y';
while (lagi = 'y') or (lagi = 'Y') do
begin
clrscr;
write('Siapa Nama Anda..?'); ReadLn(namak);
writeLn;
write('Hallo ',namak,', Coba kamu');
WriteLn(' masukan nilai x,y dan z ');
writeLn('pada operasi matematika ini.');
writeLn;
writeLn('Operasi matematika X^2 + y^2 + z =..... ');
write('masukan nilai x..= '); ReadLn(x);
write('masukan nilai y..= '); ReadLn(y);
write('masukan nilai z..= '); ReadLn(z);
writeLn;
writeLn('nilai operasi x^2 + y^2 + z adalah : ',x*x+y*y+z);
writeLn;
write('Mau hitung lagi apa tidak (y/t), ',namak,' ? ');
readLn(lagi);
end;
end.

Read more...

Masalah VGA Card

Untuk menambah contoh troubleshooting, selain yang sudah di tuliskan kemarin troubleshooting Prosesor, dan juga Casing dan Power Supply, Motherboard, Memori. sekarang berkaitan dengan Troubleshooting VGA Card.

Kasus:
Pada waktu menghidupkan komputer, layar monitor gelap dan hitam.
Solusi:

1.
Langkah pertama, cek kabel VGA dan pastikan kabel VGA tersebut sudah masuk ke port VGA yang ada di casing komputer.
2.
Cek indikator pada monitor, apakah powernya berjalan dengan normal atau tidak.
3.
Coba booting ulang.

Kasus:
Gangguan pada VGA Card/Layar Monitor. Masalah seperti tanda-tanda gangguan yang terjadi pada VGA Card di antaranya adalah:

1. Komputer menjadi macet atau hang ketika digunakan untuk bermain game 3D.
2. Tidak dapat digunakan untuk menjalankan permainan tertentu.
3. Windows tidak bisa digunakan dalam mode normal.
4. Ada titik-titik kecil di layar monitor.

Solusi:

1. Cek kabel VGA yang terhubung ke monitor dan ke casing komputer, apakah sudah menancap dengan benar atau belum, kalau belum masukkan kabel tersebut sesuai dengan kaki-kaki yang tersedia.
2. Cek konektor atau pin yang terdapat pada kabel VGA. Kalau ada yang patah atau putus, segera ganti yang baru.
3. Install kembali atau perbaharui driver dari VGA Card yang dipasang. Untuk mendapatkan driver VGA tersebut, bisa dengan men-download dari situs yang menyediakan driver dari VGA itu.
4. Cobalah untuk mendownload versi terbaru versi terakhir software Direct-X dari situs Microsoft.
5. Kunjungi situs-situs yang menangani berbagai permasalahan tentang permainan atau games.
6. Buka casing komputer, cabut VGA card dari slotnya (PC/AGP) dari motherboard, dan pasang kembali. Apabila pada waktu komputer dihidupkan, layar masih hitam dan belum muncul gambarnya, ganti VGA card dengan yang baru, karena dapat dipastikan VGA card ada mengalami kerusakan.

Kasus:
Pesan kesalahan pada layar monitor. Apakah selalu menemui pesan kesalahan ketika memainkan suatu permainan atau games? Apakah VGA atau animasi tidak berjalan dengan normal? Atau layar berkedip secara terus menerus?
Solusi:

1.
Klik menu Start >> pilih Help and Support. Di bawah perintah Pick a Help Topic, pilih “Fixing a problem”.
2.
Pada kotak sebelah kiri, pilih “Games, sound, and video problems”.
3.
Pada kotak sebelah kanan, select “Games and Multimedia Troubleshooter”.
4.
Klik pilihan yang menggambarkan permasalahan yang dihadapi kemudian klik Next. Ulangi langkah-langkah tersebut sampai permasalahan bisa terpecahkan. Gunakan tombol Back untuk mengulangi langkah terakhir.

Kasus:
Bagaimana mengetahui tipe dari VGA Card yang dimiliki.
Solusi:

1. Buka MS-DOS prompt. Pada Windows 95/98 dan Windows XP/NT 4.0, Klik menu Start, kemudian pilih Programs, dan klik menu MS-DOS Prompt atau Command Prompt yang tersedia. Pada Windows 3.x atau Windows NT versi sebelum 4.0, klik dua kali Main kemudian klik dua kali icon MS-DOS.
2. Setelah jendela MS-DOS sudah terbuka, ketik: Debug kemudian tekan tombol [Enter].
3. Setelah layar dari perintah debug sudah terbuka dengan indikator kursor yang muncul, maka ketikkan: D C000: 0010 dan kemudian tekan tombol [Enter].
4. Layar yang berisi angka hexadecimal akan muncul dengan format kode ASCII dan informasi yang muncul tersebut juga termasuk dari tipe dari VGA Card yang dimiliki.
5. Ketik: Q kemudian tekan tombol [Enter] untuk keluar dari program Debug.
6. Ketik Exit kemudian tekan tombol [Enter] untuk kembali ke sistem. operasi/Windows.

(Hal lain yang dapat dilakukan membuka casing komputer dan baca nama manufaktur yang tertera pada chipset atau IC yang ada pada VGA Card di motherboard).

Kasus:
Resolusi Layar monitor tidak stabil atau berubah-ubah. Setiap saat login ke Windows XP, resolusi layar monitor kembali ke ukuran besar dan untuk merubafanya ke bentuk normal harus mengubah secara manual. Nah, bagaimana caranya supaya pengaturan terhadap resolusi layar monitor tidak berubah-ubah.
Solusi:
Harus melakukan update terhadap VGA Card yang dimiliki karena kemungkinan besar driver VGA card yang dimiliki banyak file yang hilang atau corrupt. Untuk melakukan update bisa mengunjungi situs dari penyedia driver tersebut dan download versi terbaru. Untuk mengetahui nama manufaktur pembuat VGA card, bisa melakukan cara-vara berikut ini: pada menu Start >> klik Administrative Tools >> kemudian pilih Computer Management. Di bawah kategori System Tools, klik Device Manager. Klik tanda Plus (+) untuk menampilkan pilihan Display Adapter. Dari tampilan ini, Windows akan mencari driver yang sudah ter-update. Adapun cara-caranya adalah sebagai berikut:

1.Ketika Device Manager dan tampilan Display Adapter muncul, klik kanan display adapter.
2.Pada menu kanan tersebut pilih Update Driver.
3.Kotak wizard Hardware Update akan muncul dan memberikan instruksi bagaimana cara untuk melakukan update driver.

Read more...

Mempercepat Proses Copy File Dengan TeraCopy

TeraCopy adalah sebuah program yang dirancang secara kompak untuk menyalin dan memindahkan file pada kecepatan se-maksimum mungkin, TeraCopy memberikan pengguna banyak fitur seperti:

* Copy files faster. TeraCopy menggunakan buffer yang disesuaikan secara dinamis untuk mengurangi proses pencarian. Asynchronous copy atas kecepatan transfer file antara dua fisik hard drive.
* Pause and resume file transfers. Menunda proses menyalin setiap saat untuk membebaskan sistem sumber daya dan dapat melanjutkan dengan satu klik.
* Error recovery. Dalam kasus copy error, TeraCopy akan mencoba beberapa kali dan dalam kasus yang lebih parah hanya skips file, tidak perlu seluruh transfer.
* Interactive file list. TeraCopy menunjukkan gagal transfer file dan dapat digunakan untuk memperbaiki masalah dan hanya masalah recopy file.
* Shell integration. TeraCopy dapat sepenuhnya menggantikan Explorer menyalin dan memindahkan fungsi tersebut, yang memungkinkan Anda bekerja dengan file seperti biasa.
* Full Unicode support.

Read more...