Selasa, 25 Oktober 2011

Daftar Nama Club / Komunitas Secorpio Se-Indonesia


 Daftar Nama-nama Club/komunitas Yamaha Secorpio Se-indonesia

JAKARTA :
1. YSC Jakarta,
2. SARI (scorpio adventure rider independent)
3. SC 225 (scorpio club 225)
4. ScRI (scorpio riders independent)
5. ScOCI (scorpio owner club Indonesia)
6. SCORPIOHOLIC
7. MILYS Jakarta
8. YSOF (Yamaha scorpio owners factory)
9. JOYS (Jakarta owners yamaha scorpio)
10. BOSCOind (brothers scorpio independent)
11. BSJ (brigade scorpio Jakarta)
12. YSRC (yamaha scorpio riders club)
13. SCCakung (scorpio club Cakung)
14. SWAT (scorpio wild adventure)
15. SCOUZIE Adventure
16. YEC (yamaha electric club)
17. DSEXER (d`scorpio explorer)
18. SF (Scorpio Fighter)

TANGERANG DAN BANTEN (se-Provinsi Banten):
1. YSC Tangerang,
2. SBI (scorpio brotherhood Indonesia),
3. BSA (Batavia scorpio adventure),
4. STAR (scorpio tangerang riders),
5. TRAILS (tangerang independent legion scorpio),
6. VOYAGER,
7. MILYS Tangerang,
8. BOYSCOOT (box yamaha scorpio independent),
9. X-IBLYS,
10. USB,
11. BSC (Banten scorpio club),
12. SLOCI cilegon,

DEPOK :
1. YSC Depok,
2. DSF (depok scorpio family),
3. SID (scorpio independent depok),
4. SRC (scorpio riders community),
5. BUSER (brotherhood unlimited scorpio owner),
6. SRAC (scorpio riders adventure club),
7. SCORNER (scorpio knight rider),
8. CHIPS,
9. TOPGUN,
10. ScRI (Scorpio Riders Indonesia),

JAWA BARAT (se-Provinsi JABAR termasuk Bekasi dan Bogor):
1. YSC BOGOR,
2. YSC BEKASI,
3. YSC CIKARANG,
4. YSC KARAWANG,
5. YSC BANDUNG,
6. YSC TASIK,
7. YSC GARUT,
8. YSC CIAMIS,
9. YSC KUNINGAN,
10. CISCO (cikarang scorpio community),
11. SCYBER cikarang,
12. CYSA Cikarang,
13. ASOKA (adventure scorpio karawang),
14. SPINAC indramayu,
15. CSC (Cirebon scorpio club),
16. SCORIC (scorpio riders independent cibinong),
17. YSBP (Yamaha scorpio biker parung),
18. SCI (scoprio club indonesia) cilengsi,
19. BoSC (bogor scorpio community),
20. SARS (scorpio adventure riders Sukabumi),
21. SCOP (scorpio community Purwakarta),
22. SAB (scorpio adventure bandung),
23. SOC (scorpio owner club) bandung,
24. BANDITOS (bandung solidarity of scorpio),
25. SACS (scorpio adventure club sumedang),

JAWA TENGAH – YOGYA (se-Provinsi JATENG dan YOGYA):
1. YSC_SKA,
2. YSC_JOGJA,
3. YSC_SEMARANG,
4. YSC_TEGAL,
5. SCOSI sidareja,
6. CILACAP SCORPIONERS,
7. SCORES,
8. TSC (Tegal Scorpio Club),
9. IFS (Independent Fighter Scorpio) Cilacap,
10. P'SCOPAT (Purwokerto scorpio adventure),
11. YSVC (Yamaha Scorpio Vixion Club Banjarnegara),
12. POSPOR (Purworejo Scorpio Rider's),
13. SGM (Scorpio Gajah Mungkur) Wonogiri,
14. ASICS (Adventured Scorpio Indonesia Club Solo),
15. SXS (Scorpio eXtrem Semarang),
16. SAS (Scorpio Adventured Semarang),
17. SADIS (scorpio adventure independent semarang),
18. BYSSA Sampang,
19. EXSOTIC Sragen,
20. SCREAM (Scorpio Rider's adventure muntilan),
21. THE BOYS (brotherhood yOgya Yamaha Scorpio)
22. DJ'S (Distric Jogja Scorpio),
23. SF (Scorpio Fighter) Jogja,
24. KSR (Kaskus Scorpio Rider's) Jogja,
25. ASC (Ambarawa Scorpio Club) semarang,

JAWA TIMUR – MADURA (se-Provinsi JATIM):
1. MARS (magetan adventure riders scorpio),
2. SCORGOOO (scorpio reog ponorogo),
3. MASCORD madiun,
4. BANDITS Malang,
5. SCORPIO SURABAYA,
6. SRM (scorpio rider malang),
7. JSO Jember ,
8. MBOYS (mblitar owner Yamaha scorpio),
9. KOYS (Kediri owner Yamaha scorpio),
10. TOYS (Tulungagung owner Yamaha scorpio),
11. RESCRIM Gresik,
12. BSR (Bangkalan scorpio rider),
13. SCORES Sidoarjo
14. GRESICC Gresik

KALIMANTAN (se-Kepulauan Kalimantan) :
1. SCS (Samarinda),
2. YSCO bontang kaltim,
3. balikpapan (issue msh pembentukan),

SULAWESI (se-Kepulauan Sulawesi):
1. YSC Makasssar,
2. YSC Pinrang,
3. YSC Mamuju,
3. YSC Tolitoli,
4. YSC Toraja,
5. YSC Gorontalo,
6. YSC Manado,
7. SCORPIOHOLIC Makassar,
8. SCORPIOHOLIC LUWU TIMUR,
9. SSC (Sinjai Scorpio Club)
10. CSC (celebes scorpio club),
11. CSC Bantaeng,
12. CSC Jeneponto,
13. BSC (Bone Scorpio Club),
14. MSC (makassar scorpio club),
15. BSC mamuju,
16. PSC Palopo,
17. SMAC (scorpio Masamba club),
18. MASPIC Malili,
19. YSPC (yamaha scorpio poso club),

TENGGARA :
1. LSC (Lombok scorpio club),

SUMATRA (se-Kepulauan Sumatra):
1. YSC medan,
2. YSC padang,
3. SLC (scorpio lampung club),
4. BSC (Bengkulu scorpio club),
5. ASPAL (adventure scorpio Palembang),
6. SPION (siginjai scorpio owner) jambi,
7. FANSCORNER padang,
8. PHSYCO payakumbuh,
9. PESAD (pekanbaru scorpio adventure),
10. SBC (scorpio batam club),
11. SPINCO (scorpio independent community) bintan island,
12. SAM (scorpio anak medan),
13. BASCOM (barisan scorpio medan) medan,
14. YSFC (Yamaha scorpio fans club) medan,
15. COLESOM (community legion scorpio medan),
16. YSCNAD (Yamaha scorpio club NAD) aceh,
17. YSAC (Yamaha scorpio aceh community),
18. YSBC (Yamaha scorpio baganbatu club)medan,
19. SCORPIOHOLIC Lhoksuemawe

Dan mungkin masi ada banyak lagi/baru, yg belum tertulis di sini, mohon komentarnya..
Dan Jika ada kesalahan dalam penulisan Club/komunitas mohon komentarnya agar di perbaiki... Terimakasih... "SALAM BROTHERHOOD YAMAHA SCORPIO"

Selasa, 18 Oktober 2011

Daftar harga spare part motor yamaha



Selasa, 06 September 2011

Cara memutar mp3 di Delphi 7

Hallo sobat.... disini aq ingin berbagi bagaimana cara memutar mp3 di delphi..
Untuk tahap pemula....
  • Langkah pertama siapkan Form application pada delphi (Form1)
  • Langkah kedua klik System sperti contoh gambar :
  • Klik setelah itu arahkan kursor pada Form yg akan kita buat. klik 1x maka akan muncul gambar .
  •  Langkah ke 4 cari Dialogs di sebelah kanan atas seperti gambar kmudian klik icon setelah itu arahkan kursor pada Form yg akan kita buat. klik 1x maka akan muncul logo di form yg akan kita buat. kegunaanyya: untuk memanggil/mencari mp3 yg akan kita putar nanti.
  • Langkah ke 5...klik Standar sperti contoh gambar maka akan muncul pilihan  
          klik Button setelah itu arahkan kursor pada Form yg akan kita buat. klik 1x maka akan muncul  gambar Langkah selanjutnya lihat propertis ganti nama caption> Button1 menjadi> Cari
  • Langkah selanjutnya klik Win32 setelah itu klik ProgressBar1 setelah itu arahkan kursor pada Form yg akan kita buat. klik 1x maka akan muncul
  • Langkah ke 7 sama seperti langkah ke dua..klik System sperti contoh gambar : bedanya seperti langkah ke dua kalo langka ke 7 ini klik letakkan pada form yg akan kita buat.
  • Langkah ke 8...klik Standard klik Edit1 letakkan pada form yg akan kita buat.
  • Langkah ke 9 tahap penCodingan. dobel klik Timer isi Coding seperti di bawah ini                          procedure TForm1.Timer1Timer(Sender: TObject);
    begin
    if ProgressBar1.Max<>0 then
    ProgressBar1.Position:=MediaPlayer1.Position;
    end; 
  • Langkah ke 10..Dobel klik Button isi Coding seperti di bawah ini:                             procedure TForm1.Button1Click(Sender: TObject);
    begin
    if Opendialog1.Execute then
    begin
    Edit1.Text:=Opendialog1.FileName;
    end;
    ProgressBar1.Max:=0;
    MediaPlayer1.Close;
    MediaPlayer1.FileName:=Edit1.Text;
    MediaPlayer1.Open;
    ProgressBar1.Max:=MediaPlayer1.Length;
    end;       
  • Langkah ke 11..Dobel klik pada form1 yg kita buat itu lalu isikan coding                                             procedure TForm1.FormCreate(Sender: TObject);
    begin
    ProgressBar1.Position:=0;
    end;
  • Langkah ke 12. Save pada folder yg anda buat. setelah itu Run/ klik F9
  • Hasil : 
 
     Selamat mencoba,,,,,


    Kamis, 01 September 2011

    Cara Membuat ENTER DI TEdit (EDIT) Di Borland Delphi 7

    Langkah pertama
    • Pilih Komponent EDIT dari Page Standard

    • Atur lah Letak Design Form dan tambahkan Komponen Label dari Page Standard


    Note :
    a. Buatlah Seperti gambar dibawah ini

    • Kemudian klik properties pada Komponen Edit1 dan Double klik pada Onkeypress


    Isi dengan Listing Program dibawah ini

    procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
    begin
    If Key=#13 then
    Begin
    Edit2.setfocus;
    end;

    • Kemudian klik properties pada Komponen Edit2 dan Double klik pada Onkeypress


    Isi dengan Listing Program dibawah ini

    procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
    begin
    If Key=#13 then
    Begin
    Edit3.setfocus;
    end;

    • Kemudian klik properties pada Komponen Edit3 dan Double klik pada Onkeypress



    Isi dengan Listing Program dibawah ini

    procedure TForm1.Edit3KeyPress(Sender: TObject; var Key: Char);
    begin
    If Key=#13 then
    Begin
    Edit1.setfocus;
    end;


    Klik Ctrl+Shift+S Untuk Menyimpan Listing tersebut
    Tekan F9 Untuk Running Program nya, Akan terlihat seperti tampilan Dibawah ini





    Note : Tekan ENTER Pada KeyBoard Terus Menerus.. Maka Kursor Otomatis Akan berpindah dari edit 1 ke Edit 2 dan 3 dan seterusnya.

    Fungsi : Fungsi ini memudahkan kita dalam berpindah kursor dengan kata lain memindahkan kursor TANPA bantuan Mouse dan Tombol TAB pada Keyboard.

    Aplikasi Telah selesai “Selamat Mencoba”

    Note : Aplikasi ini Bersifat Standart (Pemula),, sebagai bahan pembelajaran dalam studi Programing.
     
    Design by Free WordPress Themes | Bloggerized by Lasantha - Premium Blogger Themes | cheap international calls