Aplikasi Navicat buat desain database SQL

Ass.wr.wb...
Setelah kian lama gk posting gara-gara abis jalan-jalan kesumbawa Akhirnya bogger juga neh, pagi yang indah ini (musim pulau lombok) ane mau ngasi tau buat temen2 yang doayan buat database SQL, ne aku kasi referensi Aplikasi yang lumayan bagus menurut ane, aplikasi ini bisa suport sama Xammp maupun MYSQL. Namanya "Navicat"

Temen-temen bisa langsung download di om google ato langsung di 4shared.com. tapi kalo temen-temen mau linknya langsung bisa klik sini..

pada aplikasi ini kita bisa mengelompokkan database sesuai user yang kita inginkan, bisa membuat table dengan cepat bahkan relasi juga cepat. tinggal klik udah jadi....

jangan takut buat error, karena akan ada comment errornya dan gk perlu ulang buat seperti pada pemanggilan menggunakan aplikasi brouser seperti localhost.
temen-temen langsung download saja, masalah cara pakai insyAllah relatif mudah kok. selamat mencoba....

Read More

Cetak Laporan Struk Menggunakan ZReport

Assamulaikum...
sudah lama neh gk ngeblog lagi, abis kebanyakan malesnya neh...!!!. Kemaren ada temen blogger tanyain tentang cetak struk gmana cara buatnya, nah di sini ane coba buat contoh simplenya saja. supaya teman-temen bisa explorasi lagi. key...

Kali ini ane mau ngasi contoh aplikasi yang dapat mencetak struk (menggunakan printer POS tentunya). dengan menggunakan komponen zreport. dimana komponen ini mesti diinstal terlebih dahulu di delphinya temen-temen.

Okey tampa bercuap lama, temen-temen bisa langsung download contoh amplikasi yang ane buat barusan di SINI , semoga bermanfaat, tapi harap dimaklumi kan cuman contoh saja, bagi yang pernah buat jauh lebih bagus boleh ne minta ilmunya.key...

Berikut Output dari Aplikasi yang saya buat.

Eh sorry bukan yang ini tapi yang dibawah ini. hehehehe....!!!! (ketauan ne doyan apa...???)

Semoga Bermanfaat.key....

Read More

Buat Aplikasi ukurannya bisa autosize

Ass.wr.wb..

Alhamdullah bisa posting lagi neh, tadi da temen nanyain gmana sih caranya biar aplikasi yang kita buat bisa ngikut ma resolusi layar kita, umpama kita buat aplikasi dilaptop yang resolusinya gede, trus pas di jalankan di komputer yang resolusinya lebih kecil berakibat form yang kita buat sedemikian indahnya kan jadi ke potong, pokoknya gak bagus dah...

terus ta coba2 tanya ma om google alhamdullah ketemu walaupun mesti perbaiki koding lagi sih, yang penting ta sederhanakan dan bisa dimengerti ma temen2 dah...!!

OK, sebelum kita mulai belajar kita doa dulu dah, kalo perlu pakek cemilan juga boleh. ("bik kopinya 1 yaaa") ^_^ Temen2 bisa ikutin langkah dibawah ini :

1. Buat Sebuah Aplikasi baru.
2. Di dalam form ntu temen-temen bisa masukkan beberapa komponen seperti label, edit, button, combobox atau yang lainnya.
3. Setelah desain form yang kita buat jadi. di layar codingnya atau unitnya copi s\codding dibawah ini.
   
   procedure ubahukuran(Formnya: TForm; panjang, lebar: LongInt) ;
   begin
   with Formnya do
   Begin
   Scaled := True;
   AutoScroll := False;
   Position := poScreenCenter;
   Font.Name := 'Comic Sans MS';
   if (Screen.Width <> panjang) then
   begin
   
   Height:=LongInt(Formnya.Height)*LongInt(Screen.Height)div lebar;
   
   Width:=LongInt(Formnya.Width)*LongInt(Screen.Width)div panjang;
   
   ScaleBy(Screen.Width,panjang);
   end;
   end;
   end;
   
   
4. Setelah itu di Form Create atau form shownya, temen-temen tambahkan perintah untuk memanggil prosedur yang diatas dengan perintah " ubahukuran(Form1, 400, 320) ; ". dmana "Form 1" ntu nama formnya, "400" ntu panjang formnya dan yang "300" ntu untuk lebarnya.
   
5. Kalo sudah selesai, Aplikasi temen-temen bisa dijalankan.
   
6. Berikut coding lengkapnya. Selamat Mencoba. key...!! (dot_exe)
   

var
Form1: TForm1;
implementation
{$R *.dfm}

procedure ubahukuran(Formnya: TForm; panjang, lebar: LongInt) ;
begin
with Formnya do
Begin
Scaled := True;
AutoScroll := False;
Position := poScreenCenter;
Font.Name := 'Comic Sans MS';
if (Screen.Width <> panjang) then
begin

Height:=LongInt(Formnya.Height) * LongInt(Screen.Height)div lebar;

Width:=LongInt(Formnya.Width) * LongInt(Screen.Width)div panjang;

ScaleBy(Screen.Width,panjang);
end;
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
ubahukuran(Form1, 400, 320) ;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
Application.Terminate;
end;

Read More

bingung...........?????

Ass.wr.wb para blogger...!!!

Pagi yang cerah dengan segudang pekerjaan menumpung, ketimbang kepala jadi sasaran kusut mending cari refresing pakek blog neh mumpung udah lama gk aktif. heheheheeeeeeee...!!!
tapi mo posting apa yaaaa...???

jadi bingung, temen2 da masukan gak mau posting tenang apa neh biar bisa saling shar gitu ceritanya neh...????
kasi komentar yah...!!!!

Oya untuk Materi dan contoh program ane dah posting yang terbaru, silahkan temen2 bisa download.key..!!

Read More

lebaran bentar lagi

Ass. wr.wb...
Hari ini tanggal 8 september, jadi 2 hari lagi lebaran deh..
ane cuman mo ngucapin buat temen2 blogger and temen2 ane dimanapun dirimu berada anda kalo da salah kata, tulisan, pesan yang gk dibalas, janji yang belom ditepatin and prilaku yang kurang berkenan dihati temen2 ane mohon maaf lahir yah biar ntr lebaran kita sama-sama jadi bersih and NOL yah..

andris faesal and keluarga ngicapin Selamat Hari Raya Idhul Fitri 1431 H. Mohon maaf lahir batin yah..

Read More

Cara Install MS SQL 2000 di Windows XP

Ass.wr.wb...

Puasa yang indah, buat ngelupain lapernya mending ngeblog dulu neh...
kemarenan da temen yang nanya, bagai mana sih cara menginstal MS SQL, neh kebetulan kemaren ane ingintal ulang ne CQ, jd semua programnya ilang trus perlu diintal lagi. waktu mo ngistal MS SQL baru kepikiran mo buat tutorial ngistalnya. di print scrint aja semuanya and hasilnya jadilah ne tutorial..

Oke, sebelum kita mulai baca doa dulu dah, trs sediakan master MS SQL anda, pada contoh ini saya pakek Microsoft SQL Server 2000, kalo temen2 punya versi diatasnya juga boleh. sapa tau boleh mintak juga. heheheee....

okey kalo sudah, siap master Microsoft SQL Server 2000 nya, langkah yang harus dilakukan antara lain sebagai berikut ne :

1. Klik file setupnya (nama filenya "setupsql.exe").
2. Klik Tombol NEXT
   
   
   
3. Pilih Local Komputer (karena komputer ini yag akan kita gunakan sebagai servernya) lalu tekan NEXT.
   
   
   
   
4. Pilih "Create a New Instance of SQL Server or Instal Clien Tools" lalu tekan NEXT.
   
   

1. Isi kan Name dan Company Anda. lalu tekan tombol NEXT.
   

1. Selelah itu tekan tombol YES.
   
   
   
   
   
   
2. Selanjutnya isikan Serial Numbernya lalu tekan tombol NEXT.
   
   
   
   
   
   
3. Pilih Server and Clien Tools, maksudnya agar komputer kita selain bisa sebagai server bisa juga sebagai Client. lalu tekan tombol NEXT.
   
   
   
   
4. Centang "Default" lalu tekan tombol NEXT.
   
   
   
   
5. Pilih tempat penyimpanan file system dan file databasenya lalu tekan tombol NEXT.
   
   
   
   
   
6. untuk selajutnya isikan Username, Password dan Domain, kalo mau diatur belakangan juga bisa tinggal dipilih "Use the Local System account" atau sesuai username system pada komputer kita. lalu tekan tombol NEXT.
   
   
   
   
   
   
   
7. selanjutnya telan NEXT untuk proses Installnya.
   
   
   
   
   
8. Tekan tombol FINISH untuk mengakhirinya.
   

Gimana, mudah kan...????
Semoga bermanfaat buat temen2, InsyAllah materi selanjutnya bakaln nyusul lagi..

Read More

Install Borland Delphi 7 di Windows 7

Assalmualaekum....

Pagi-pagi bikin perut laper neh, sambil nunggu waktu makan ngeblog boleh juga neh, ^_^

berhubung sekarang musim windows 7, jadi banyak orang-orang pindah ke windows 7 juga. tapi masalahnya sekarang banyak temen2 delphier yang masih makek delphi 7 terkendala karena "kok delphi 7 gk bisa diinstall di win 7 yaaa...???"
melalui tulisan saya ini kita akan mengatasi gmana caranya biar delphi 7 bisa jalan di windows 7.
Okey sebelum kita mulai alangkah baeknya kita berdoa dulu deh sambil minum kopi sisa tadi malem juga boleh..!!!!! ^_^

Cara Instalasinya

• Pastikan anda install delphi pakek account anda yang Administrator (supaya bisa ngistall maskudnya)
  
• Install program Delphi 7 Anda. kalo yang belum punya bisa didownload disini
• Setelah selesai instalasi coba jalankan Delphi 7, pasti nemuin pesan error nyuruh ngubah nama file delphi32.$$$ jadi delphi32.dro di lokasi /program files/delphi directories . dan da debug yang perlu dirubah juga.
• Jadi masalahnya sebenarnya ada disini karena terlalu proteksinya maka directory Delphi juga ikut terproteksi.

Cara Perbaikinya:

1. Pastikan menjalankan perintah ini menggunakan administrator.
2. Buka properties directory pada c:/program files/borland. ato drive sistem anda.
   
3. Pada Tab awal hilangkan tanda cek pada Read-only attribute kemudian klik tombol Apply untuk mengaplikasikan perintah.
4. Buka tab securitynya
5. Berilah hak full akses untuk users yang anda pakai untuk directory c:/program files/borland.

Sekarang Delphi anda siap digunakan,

Semoga bermanfaat buat temen2 yah...^_^

sebagian isinya saya kutip di : http://wa2n.staff.uns.ac.id

Read More