Proposal Pendirian Usaha Air minum mineral.

PROPOSAL PENDIRI USAHA AIR MINUM ISI ULANG

PT PUTRA FAUZI

Biodata Kelompok 1

1. Fauzi aziz

2. Septi novalia

3. Weni rahayu

4. Mira Afriyana

5. Rizki novita ayu

—  KELAS  :   3D3-MI-1

—  CAMPUS          :   DCC KALIANDA

    

KATA PENGHANTAR

Segala puji bagi Allah yang masih memberikan kesehatan dan kesempatan kepada kita semua, terutama kepada penulis . Sehingga penulis dapat menyelesaikan masalah ini .

Berikut ini, penulis persembahkan sebuah laporan proposal pendirian usaha. Penulis mengharapkan laporan ini dapat bermanfaat bagi pembaca semua, terutama bagi penulis sendiri.
Kepada pembaca . Jika terdapat kekurangan atau kekeliruan dalam laporan ini, penulis mohon ma’af, jika ada kritik dan saran kami terima dengan lapang dada .

Dengan demikian, tak Lupa penulis ucapkan terimakasih , Kepada para pembaca.
Semoga Allah memberkahi makalah ini sehingga benar-benar bermanfaat.

                                                                   Kalianda 28 Juli 2012

                                                                   Hormat Kami

…………………..

DAFTAR ISI

BIODATAPT……………………………………………………1

LATAR BELAKANG PT …..………………………………..2

MERK/LOGO PT………..……………………………………3

ARTI NAMA PT…………..……………………………...…4

PROPIL USAHA………………..……………………………5

PENJELASAN TENTANG PRODUK…………………..…6

ANALISIS SWOT……………………..…………………….7

KEUANGAN TENTANG USAHA…………………..……..8

PENUTUP……………………...……………………………..9

Biodata PT putra fauzi

—  PT PUTRA FAUZI , Air minum isi ulang kualitas tinggi Teknologi  piltrasi osmosis – hexagonal untuk individu / masyrakat mandiri Diajukan oleh : PT FAUZI PUTRA  Kalianda  tanggal : 27 juni 2012    kalianda Jl. cempaka lampung selatan, Indonesia, hp/tlpn  hp : 0819779388  , tlpn kantor :0721-0812663  , e-mail : fauzyazizfa@yahoo.co.id

1.1   Latar belakang  belakang  PT PUTRA FAUZI

      Pada zaman adanya kehidupan di muka bumi ini. air merupa  sumber daya  yang sangat dibutuhkan oleh setiap mahluk hidup,  dimana air merupakan vital sumber kehidupan manusia  ,air  berasal dari dalam  bumi yang di mafaatkan untuk kepentingan manusia .semakin berkembangnya zaman dan serba praktis , dan banyaknya air yang tercemar oleh kontimasi bahan kimia dan sampah yang membuat air menjadi tak layak untuk di konsumsi. dan banyak ilmuan yang meneliti air yang bersih untuk di konsumsi untuk di minum dari sumber mata air pegunungan atau pun dari mata air yang berasal dari sumur, maka PT FAUZY PUTRA akan membuat  suatu  usaha yang  berkaitan dengan pengisian ulang air mineral yang berasa dari pegunungan dan air dari mata air sumur , yang akan dijabarkan  di bawah ini

2.1  merk/ logo  PT putra fauzi yang bergerak di bidang isi ulang air mineral

Arti nama

 GRANDQUA  adalah merek dari PT putra fauzi

Kami mengabil nama GRANDQUA  yang berasal dari nama keluarga besar kami yang digabungankan nama. sehingga kami buat untuk merek di pt PUTRA FAUZI agar mudah di ingat oleh masyarakat luas  .

•      simbol berwarana biru dan oval menunjukan bumi yang mempunyai sumber daya alam yang sangat melimpah.di antaranya air yang berasal dari dalam bumi yang sangat dibutuhkan oleh setiap manusia.

•      dan gelembung –gelembung bulat menunjukan betapa bening air yang bersal dari bumi.

•      warna biru yang kami ambil untuk memperjelas bahwa betapa bening air sehingga berwarna seolah-olah berwarna biru  laut.

2.2 profil usaha

-          Struktur organisasi  

-          Tugas dan tanggung jawab masing –masing

a). pemilik perusahaan

   adalah orang yang memiliki usaha di pt putra fauzi yang  berhak penuh di      dalam mengabil sebuah keputusan

b). wakil  pemilik

    adalah orang yang  di percaya untuk mengambil keputusan ketika pemilik usaha  tidak ada di tempat .

c). karyawan

   bertugas untuk memproduksikan isi ulang sampai siap di kemas dan di pasarkan

d). sopir sebagai agen pengecer

    yang bertugas mengatarkan hasil produksi ke suplayer atau pengecer

e) pengecer/ruko

  bertugas menjualkan hasil produk yang di antar oleh sopir , untuk di jual ke masyarakat/ konsumen

2.3  penjelasan tentang produk

    - produk

              Produk yang kami gunakan adalah dari mata air yang bersumber dari dalam bumi , yang di proses melalui beberapa tahap piltrasi yang yang berkualitas tinggi teknologi  piltrasi osmosis hexsagonal yang di butuhkan individu/ masyarakat mandiri.

 -proses

 Proses dari awal  dari air biasa yang di saring dari mesin piltrasi melalui beberapa tahap ;

 -Pertama

   Air yang kita ambil dari sumur yang bersumberkan dari mata air yang asli.

-kedua

  Air di endapkan di dalam pam penampung air yang akan diprosess melalui mesin penyaring  agar tidak ada lagi kuman yang masuk ke air

-ketiga

 masukan air ke dalam mesin penyaring yang diolah dengan bantuan  piltrasi osmosis hexsagonal

-ke empat

 Mengunakan teknologi yang cagih untuk menyaring air agar kumannya mati .

-kelima

 Disaring kembali untuk menjernihkan air yang akan di masukan ke dalam galon

-ke enam

   Bersikan galon, agar tidak ada kuman. Dan  masuakan air ke dalam botol lalu tutup dengan  tutup galon dan beri merek

-ke tujuh

  Siap untuk di kirim ke  pengecer.

-         Analisis swot

-kekuatan

 • Modal yang digunakan sudah mencukupi untuk memprroduksi  nya.

•SDA( sumber daya alam) yang melimpah sehingga  mudah untuk mencari bahan mentannya

•SDM (sumber daya manusia) sudah ada  untuk membantu memproduksin bahan mentah menjadi bahan jadi

-kelemahan

-skill kemampuannya msih terbatas karna baru.

-Peluanng

Masih cukup besar karna belum terlalu banyak orang yang membuat perusaan pengisian air minum, dan mempunyai teknologi yang canggih sehingga dengan mudah untuk membuka peluang/kesempatan

-ancaman

  Berasal dari para pesaing yang berpropesi sama, yang  bisa menjatohkan kita yang akan datang, oleh karna itu kita harus pintar mencari  peluang.

2.6  keuangan

  - modal untuk KUR

Pemerintah menetapkan enam bank pelaksana KUR yaitu BRI, BNI, BTN, Bank Mandiri, Bukopin, dan Bank Syariah Mandiri. Skema KUR pada setiap bank yang ditunjuk adalah sebagai berikut: Skema KUR Bank BRI - Bank BRI memberikan KUR Rp 5 juta ke bawah tanpa agunan. - Permohonan kredit/pinjaman yang diajukan harus dilampiri dokumen pendukung seperti Kartu Tanda Penduduk (KTP), Kartu Keluarga, dan foto calon nasabah. - On the spot ke tempat usaha oleh pejabat kredit. - Usaha minimal telah berjalan enam bulan. - Cicilan dibayar setiap bulan untuk jangka waktu 1–3 tahun. - Besarnya kredit bervariasi, dari Rp. 1 juta hingga Rp. 5 juta. Skema KUR Bank Mandiri - Skema kredit untuk tujuan produktif maksimal Rp. 500 juta dengan bunga 13,5% efektif per tahun. - Memiliki pengalaman usaha. - Memiliki legalitas usaha dan NPWP. - Tidak sedang menghadapi atau terlibat masalah hukum

-Modal utama usaha

) PERHITUNGAN PADA INVESTASI MESIN UF-RO-HEXA 60 GALON/ HARI :
 1. harga Depot + mesin Rp 13.500.000,-
2. Perlengkapan lainnya diluar butir 1 Rp. 7.500.000,-
3. Jasa Kirim + Instalasi Rp. 2.500.000,- Total Investasi    Rp.    23.500.000,-
 4. Pinjaman Dana melalui KUR Rp. 23.500.000,-

-Dasar perhitungan

  Dasar perhitungan. Pendapatan per bulan :

· Market real Penjualan gallon dengan asumsi 100 KK à 100 customer

· Asumsi: 1 customer atau 1 KK membeli 10 galon Refil per bulan sehingga :
 Pendapatan 1 bulan : 100 KK x 10 galon x Rp. 5.000,- = Rp. 5.000.000,- Total dari 100 KK utk jml 1000 galon per bulan = Rp. 5.000.000,- Pengeluaran per bulan: Bayar angsuran KUR / bln = Rp. 700.000,- (Rp. 23.500.000,- / 36 bulan) Biaya Tenaga kerja 1 org = Rp. 750.000,- Listrik = Rp. 100.000,- Lain2 = Rp. 100.000,-                                                 Total pengeluaran = Rp.1.650.000,- Keuntungan per bln : Pendapatan Rp. 5.00.000,- - Pengeluaran Rp. 1.650.000 = Rp 3.350.000,-

-pengeluaran dan perhitungan

         Secara perhitungan sederhana maka akan diperoleh nilai BEP pada : Modal Rp. 23.500.000,- / profit Rp. 3.350.000,- = 7,01 bulan atau BEP pada bulan ke 7, untuk bulan ke 8 dan seterusnya hingga kurang lebih sesuai umur mesin produksi hingga 3 tahun merupakan keuntungan yang diperoleh dengan pendapatan keuntungan per bulan (asumsi minimal Flat rata-rata dengan tidak memperhitungkan jumlah penambahan gallon terjual per bulan serta biaya maintenance karena sudah dipertimbangkan dengan pendapatan pertambahan gallon rata-2 perbulan) adalah Rp 3.350.000,- per bulan minimal selama sisa 2 tahun 5 bulan sehingga total pendapatan adalah minimal sebesar Rp 3.350.000,- x 29 bulan = Rp. 97.150.000,- selama periode akhir tahun ke 3 setelah periode BEP. Simulasi Usaha dari Se-Kelompok Orang dengan bantuan KUR SIMULASI USAHA dilakukan untuk dapat memberikan gambaran atas kelayakan bisnis KUKM

2.7 penutup

-kesimpulan
  Bahwa air itu sangat dibutuhkan masyarakat, sehingga dengan adanya pt putra fauzi .Membantu masyarakat untuk mempermudah mendapatkan    air yang bermutu tinggi dan bersih jauh dari kuman , sehingga menjadikan masyarakat yang sehat
-saran

 Karna kami baru belajar  kami harap bila ada keritik dan saran kami terima dengan senang hati karna sebagai koreksi kami ke depan agar lebih baik lagi. Terima kasih

Read More

untuk orang yang aku sayang, sering aku sms, Bagi yang merasa ajha.

* maafkan aku yang selalu menyakitimu
Mengecewakanmu dan meragukanmu
Tersadar aku bila kamu yang terbaik
Terima aku, mencintaiku apa adanya 

Reff:
Di antara beribu bintang hanya kaulah yang paling terang
Di antara beribu cinta pilihanku hanya kau sayang
Takkan ada selain kamu dalam segala keadaanku
Cuma kamu ya hanya kamu yang selalu ada untukku

Repeat *
Repeat reff

(di antara beribu bintang hanya kaulah yang paling terang
Di antara beribu cinta pilihanku hanya kau sayang)
Takkan ada selain kamu dalam segala keadaanku
Cuma kamu ya hanya kamu yang selalu ada untukku

(di antara beribu bintang hanya kaulah yang paling terang)
Ya cuma kamu dan hanya kamu yang selalu ada untukku

Read More

Untuk Seseorang yang sering Aku Sayang. dan sering aku sms,, Bagi Ynag Merasa ajha.

* maafkan aku yang selalu menyakitimu
Mengecewakanmu dan meragukanmu
Tersadar aku bila kamu yang terbaik
Terima aku, mencintaiku apa adanya

Reff:
Di antara beribu bintang hanya kaulah yang paling terang
Di antara beribu cinta pilihanku hanya kau sayang
Takkan ada selain kamu dalam segala keadaanku
Cuma kamu ya hanya kamu yang selalu ada untukku

Repeat *
Repeat reff

(di antara beribu bintang hanya kaulah yang paling terang
Di antara beribu cinta pilihanku hanya kau sayang)
Takkan ada selain kamu dalam segala keadaanku
Cuma kamu ya hanya kamu yang selalu ada untukku

(di antara beribu bintang hanya kaulah yang paling terang)
Ya cuma kamu dan hanya kamu yang selalu ada untukku

dan paling mengerti aku.

Read More

Latihan Paskibra 2009

Latihan Paskibra tahun ajaran 2009.
Jadi kangen Kegiatan seperti  SMA .

Read More

Osip ponpes nurul huda

Osip  angkatan 2009-2010..
jadi kangen ma mRk..

Read More

kata mutiara

Kata Mutiara

Kita tidak akan pernah tahu, sebelum kita melakukannya. Ingatlah satu hal, usaha yang kita lakukan akan sebanding dengan hasilnya.

Jangan cuma berandai-andai atau membayangkan sesuatu, lakukanlah, mungkin apa yang kamu lakukan itu akan berakhir bahagia.

Berusahalah sekuat yang kamu bisa, yakinlah, Tuhan tidak akan berdiam diri.

Jangan menyerah atas hal yg kamu anggap benar meskipun terlihat mustahil. Selama ada kemauan, Tuhan kan berikan jalan.

Bersyukur dan ikhlas menerima apa yang di berikan Tuhan kepada kita, Niscaya hikmahNya tidak akan berhenti mengalir.

Cinta sejati tak datang begitu saja. Banyak proses yg harus dilalui bersama, menderita, menangis, dan tertawa bersama.

Terkadang apa yang kita fikirkan tidak sejalan dengan apa yang kita lalukan.

Belajarlah jujur pada diri sendiri, lakukan apa kata hati, sehingga kamu tidak perlu lagi menyembunyikan apapun dalan hidupmu

Betapa indahnya jika setiap detik yang kita habiskan, menjadi berarti bagi orang lain dan diri sendiri.

Jangan takut mencoba, kesalahan adalah guru terbaik jika kamu jujur mengakuinya dan mau belajar darinya.

Hidup penuh maaf adalah jalan bagi kelapangan dan kedamaian jiwa.

Tersenyumlah dalam mengawali hari, karena itu menandakan bahwa kamu siap menghadapi hari dengan penuh semangat!

Sesulit apapun masalah yang kita hadapi, ia harus diselesaikan, bukan dihindari.

Tegas akan diri sendiri, buang pikiran negatif dan lakukan yang baik. Kegelisahan hanya milik mereka yang putus asa.

Ketika kamu berharap yang terbaik tapi kamu hanya mendapat yg biasa, bersyukurlah kamu bukan yg terburuk.

Hal yang paling sulit adalah mengalahkan diri sendiri, Tapi itu bisa kamu mulai dengan memaafkan diri sendiri.

Sahabat adalah seseorang yg selalu membuat hatimu bahagia. Sahabat selalu membuat hidup jauh lebih menyenangkan.

Terkadang, yang diinginkan sebenarnya tidak dibutuhkan, sedangkan yang dibutuhkan tidak bisa dimiliki. Tapi Tuhan, tahu apa yang terbaik.

Maafkan diri sendiri. Jangan menyesali kesalahan. Maaf itu mengobati hati dan mendamaikan diri.

Jangan pernah iri dengan apa yg orang lain miliki, Setiap orang punya masalahnya sendiri, bersyukurlah untuk hidup ini.

Jangan membandingkan dirimu dengan orang lain. Iri hati hanya membuat jiwamu gelisah. Jadilah diri sendiri.

Setiap perbuatan yang membahagiakan sesama adalah suatu sikap yang mencerminkan pribadi yang mulia.

Sahabat bukan tentang siapa yg telah lama kamu kenal, tapi tentang siapa yg menghampiri hidupmu dan tak pernah meninggalkanmu.

Jangan pernah merasa dirimu tak cukup baik, karena bagi seseorang, kamu adalah yang terbaik.

Mungkin kamm tidak menyadarinya, tapi hal paling kecil yang kamu lakukan dapat membawa dampak sangat besar bagi orang lain.

Masalah tidak akan menjadi rumit jika kamu bisa menyikapinya dengan sabar dan dengan kelapangan hati.

Bangkitlah dari kesedihan, karena kesedihan adalah proses yang harus dilalui untuk menuju kebahagiaan.

Dari hal-hal baik, belajarlah untuk mengucap syukur. Dari hal-hal buruk, belajarlah untuk menjadi kuat.

Jika ada Kata Kata Mutiara yang lain, akan segera di tambahkan

Read More

membuat jaringan Wifi Adhoc windows 7

Bagaimana membuat jaringan WiFi Ad Hoc di Windows 7Dalam artikel kali ini saya akan mencoba membuat sebuah jaringan WiFi Ad Hoc pada laptop yang menggunakan sistem operasi Windows 7. Caranya sangat mudah yaitu sebagai berikut:

1. Jangan lupa aktifkan terlebih dahulu WLAN pada laptop.

1. Klik tombol Windows Start, pada kolom Search programs and files ketik: adhoc kemudian enter.

1. Jendela Setup Ad Hoc Network akan terbuka, klik Next untuk melanjutkan

1. 
   

1. Pada kolom Network name isi dengan nama yang akan kita gunakan sebagai SSID, contohnya: catatanteknisi, Pilih mode security; WEP, WPA2-Personal atau Open. Isi Security key isi dengan password misalnya password, centang pilihan Save this network, kemudian klik Next

1. Setelah muncul jendela The catatanteknisi network is ready to use, klik Close

1. Cek koneksi WiFi dengan mengklik icon wireless pada taskbar sebelah kanan, akan terlihat status catatateknisi - Waiting for users.

1. 
   

Seting jaringan WiFi Ad Hoc di Windows 7 sudah selesai, selanjutnya kita dapat menggunakan laptop lain atau komputer dengan usb wireless agar terkoneksi dengan "jaringan catatanteknisi" yang telah kita buat tersebut. Apabila ada user (laptop lain) yang connect ke jaringan ini, maka status WiFi pada langkah no 5 akan berubah menjadi Connected.Demikianlah cara membuat jaringan WiFi Ad Hoc di Windows 7 apabila komputer kita sudah terhubung dengan jaringan ad hoc yang telah dibuat, maka kita bisa saling bertukar data atau sekedar maen game. Sebagai catatan performance jaringan Ad Hoc akan turun secara drastis dengan bertambahnya jumlah komputer. Artikel selanjutnya akan membahas tentang cara sharing internet dengan jaringan wifi ad hoc.Read more: http://www.catatanteknisi.com/2011/10/membuat-jaringan-wifi-ad-hoc-windows-7.html#ixzz20Vys5DKj

Read More

Setting Ad-Hoc Wirelless Network di Windows XP Posted on Januari 4, 2010 by efjeer Anda punya notebook atau komputer yang mempunyai koneksi wi-fi?. Apakah Anda tahu bahwa Anda dapat mengatur jaringan nirkabel ad hoc tanpa menggunakan router dan switch?. Tentu saja, Anda juga dapat menggunakannya untuk berbagi file atau printer diantara 2 atau lebih komputer secara nirkabel. Anda dapat mengkoneksikan hingga 9 komputer. komputer mengirim data secara langsung satu sama lain. Satu-satunya kelemahan dari pendekatan ini adalah dukungan jangkauan nirkabel yang terbatas. Perhatikan diagram di bawah ini : sebuah komputer terhubung ke Internet yang dilengkapi dengan adaptor nirkabel. sebuah komputer dan notebook yang di lengkapi wireless adapter. Anda dapat mengatur ad-hoc jaringan nirkabel untuk berbagi koneksi internet tanpa menggunakan router atau switch. Alokasi IP Address Anda perlu mengalokasikan alamat IP untuk setiap komputer. Jika Anda memiliki 3 komputer, Anda dapat menetapkan 192.168.0.1, 192.168.0.2 dan 192.168.0.3 untuk setiap komputer dengan netmask 255.255.255.0. jika anda belum paham cara mengeset IP address, anda bisa lihat disini. Host Computer Configuration 1) Mari kita mulai dengan konfigurasi, di sini saya akan memilih salah satu komputer untuk memulai konfigurasi, klik kanan adaptor nirkabel dan kemudian klik properties. 2) Wireless Network Connection Properties akan muncul. Klik tab Wireless Networks, centang Use Windows to configure my wireless network settings. Setelah itu klik tombol Advanced. 3) Advanced window akan muncul. Pilih Computer-to-komputer (ad hoc) networks only. Klik Close. 4) Setelah itu, klik Add untuk menambahkan jaringan nirkabel ad hoc. 5) isikan nama notwork Ad-Hoc anda pada bagian Network name (SSID). pada bagian Wireless network key, cobalah untuk menggunakan otentikasi terbuka tanpa enkripsi terlebih dahulu. Setelah diuji itu bekerja dengan baik, lanjutkan untuk mengaktifkan WPA atau WEP enkripsi. Klik OK. 6) Sekarang Anda akan melihat jaringan ad hoc yang baru anda buat dalam daftar jaringan pilihan. Sampai sini anda telah selesai mengkonfigurasi komputer host. Konfigurasi Komputer Klien 1) Pada komputer klien yang lain, Anda cukup ikuti langkah 2 dan 3 pada konfigurasi komputer host di atas. 2) klik kanan adaptor nirkabel, kemudian pilih view available wireless networks, Anda akan melihat jaringan Ad-hoc nirkabel yang telah anda buat, klik Connect. maka anda telah terhubung dengan jaringan wireless ad-hoc.

Setting Ad-Hoc Wirelless Network di Windows XP

Posted on Januari 4, 2010 by efjeer

Anda punya notebook atau komputer yang mempunyai koneksi wi-fi?. Apakah Anda tahu bahwa Anda dapat mengatur jaringan nirkabel ad hoc tanpa menggunakan router dan switch?. Tentu saja, Anda juga dapat menggunakannya untuk berbagi file atau printer diantara 2 atau lebih komputer secara nirkabel.

Anda dapat mengkoneksikan hingga 9 komputer. komputer mengirim data secara langsung satu sama lain. Satu-satunya kelemahan dari pendekatan ini adalah dukungan jangkauan nirkabel yang terbatas.

Perhatikan diagram di bawah ini : sebuah komputer terhubung ke Internet yang dilengkapi dengan adaptor nirkabel. sebuah komputer dan notebook yang di lengkapi wireless adapter. Anda dapat mengatur ad-hoc jaringan nirkabel untuk berbagi koneksi internet tanpa menggunakan router atau switch.

Alokasi IP Address

Anda perlu mengalokasikan alamat IP untuk setiap komputer. Jika Anda memiliki 3 komputer, Anda dapat menetapkan 192.168.0.1, 192.168.0.2 dan 192.168.0.3 untuk setiap komputer dengan netmask 255.255.255.0. jika anda belum paham cara mengeset IP address, anda bisa lihat disini.

Host Computer Configuration

1) Mari kita mulai dengan konfigurasi, di sini saya akan memilih salah satu komputer untuk memulai konfigurasi, klik kanan adaptor nirkabel dan kemudian klik properties.

2) Wireless Network Connection Properties akan muncul. Klik tab Wireless Networks, centang Use Windows to configure my wireless network settings. Setelah itu klik tombol Advanced.

3) Advanced window akan muncul. Pilih Computer-to-komputer (ad hoc) networks only. Klik Close.

4) Setelah itu, klik Add untuk menambahkan jaringan nirkabel ad hoc.

5) isikan nama notwork Ad-Hoc anda pada bagian Network name (SSID). pada bagian Wireless network key, cobalah untuk menggunakan otentikasi terbuka tanpa enkripsi terlebih dahulu. Setelah diuji itu bekerja dengan baik, lanjutkan untuk mengaktifkan WPA atau WEP enkripsi. Klik OK.

6) Sekarang Anda akan melihat jaringan ad hoc yang baru anda buat dalam daftar jaringan pilihan. Sampai sini anda telah selesai mengkonfigurasi komputer host.

Konfigurasi Komputer Klien

1) Pada komputer klien yang lain, Anda cukup ikuti langkah 2 dan 3 pada konfigurasi komputer host di atas.

2) klik kanan adaptor nirkabel, kemudian pilih view available wireless networks, Anda akan melihat jaringan Ad-hoc nirkabel yang telah anda buat, klik Connect. maka anda telah terhubung dengan jaringan wireless ad-hoc.

Read More

walibarokah kediri

Kenang-kenangan ketika di pondok wali barokah kediri..
bersama dengan saudara kemas arafah,gani prayoga,
huda , fauzi aziz, dan anak SMA Jombang..

Read More

CAI 2011

Kapan ya w bisa bareng-bareng lagi sma kmu oarang...
bisa ngobrol,becandaan dan bisa ngaji sma lo orang lagiii!!1

pengajian CAI tahun 2011..

Read More

animasi dalam delpi

بسم الله ارحمن ارحيم Alhamdulillah, kembali saya mau berbagi ilmu dengan sahabat-sahabat, sederhana saja, ilmunya orang awwam. Tapi semoga bermanfaat, aamiin. Saya akan berbagi trik membuat Animasi Caption Bar pada form delphi, berikut screen shootnya 

Langsung saja kita menuju coding nya,

1. Deklarasikan variabel dan konstanta berikut yang berwarna merah

var

  Form1: TForm1;
  captionf: string;
  lagi : boolean;
const
  judul = 'Aplikasi Inventory';
implementation

{$R *.dfm}

2. Pada events FormOnCreate, ketik coding berikut

var

  i:byte;
begin
lagi := false;
for i:= 1 to Form1.Width do
  begin
    Insert(' ', captionf,1);
  end;
captionf := captionf+judul;

end;

3. Tambahkan Objek TTimer yang ada pada tab komponen System, ubah properties Interval menjadi 500, double klik pada objek TTimer kemudian ketik coding berikut:

var

  i:byte;
begin
if lagi = false then
  begin
    Delete(captionf,1,1);
    if length(captionf) = 0 then
      begin
        lagi := true;
      end
  end
else
  begin
    for i:= 1 to Form1.Width do
      begin
        Insert(' ', captionf,1);
      end;
    captionf := captionf+judul;
    if length(captionf) = length(captionf) then
      begin
        lagi := false;
      end
  end;
Form1.Caption := captionf;
end;
4. Simpan dan jalankan program, bila benar maka Caption Bar akan terlihat berjalan,

5. Berikut coding lengkapnya

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Timer1: TTimer;
    Button1: TButton;
    RichEdit1: TRichEdit;
    Button2: TButton;
    Label1: TLabel;
    procedure FormCreate(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  captionf: string;
  lagi : boolean;
const
  judul = 'Aplikasi Inventory';
implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
var
  i:byte;
begin
lagi := false;
for i:= 1 to Form1.Width do
  begin
    Insert(' ', captionf,1);
  end;
captionf := captionf+judul;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var
  i:byte;
begin
if lagi = false then
  begin
    Delete(captionf,1,1);
    if length(captionf) = 0 then
      begin
        lagi := true;
      end
  end
else
  begin
    for i:= 1 to Form1.Width do
      begin
        Insert(' ', captionf,1);
      end;
    captionf := captionf+judul;
    if length(captionf) = length(captionf) then
      begin
        lagi := false;
      end
  end;
Form1.Caption := captionf;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
RichEdit1.SelectAll;
RichEdit1.CopyToClipboard;
ShowMessage('Sudah Disalin, silahkan di-paste aja');
end;

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

end.

Hanya itu yang bisa saya jelaskan, terima kasih,

Wassalamu 'Alaikum Wr. Wb

Read More