Efek Sensor Pada Photoshop

Pada pertemuan kedua ini kita akan membuat foto efek sensor, y kayak diinfotaintment gitu brow n yang paling buming skarang adalah foto seksi shahrini, namun kali ini kita tidak menggunakan foto beliau tapi yang lain

Ok buka file fotox seperti berikut (foto sicungkring ne………hehehehJJ):

Pada Toolbox sebelah kiri kamu cari icon dengan gambar persegi/ lingkaran dengan garis putus-putus, untuk lebih jelasnya kalian bisa lihat gambar yang saya blok merah. [klik kanan] icon yang saya blok merah dan pilih "Rectangular Marquee Tool"}

Setelah melakukan Langkah di atas maka langsung saja letakkan pointer pada bagian yang ingin disensor dengan menahan [klik kanan] hingga terbentuk persegi dengan garis terputus-putus, Setelah terseleksi dengan "Rectangular Marquee Tool" maka kita tinggal memberikan effect
Caranya: Pada Menu Utama (Main Menu) di sebelah atas kalian klik
Filter ___ Pixelate____ Mozaic

Dan hasil setelah disensor adalah seperti berikut



Uupssss……………kurang lebih seperti ini hasilnya………….




 

Belajar Bikin Web Dasar

world cyber, Sekarang jaman sudah benar-benar beralih kedunia digital dan sudah pasti peranan internet sanagatlah vital dalam hal digital, dan otomatis mutlak kita harus manfaatkan semuanya, termasuk menggunakan website untuk sekedar berbagi ilmu, mencari segala hal yang ingin kita ketahui serta buat para enterpreneur promosi produk maksimalkanlah website.................

baiklah adapun tahap-tahap dalam membuat website adalah pastikan komputer kita sudah terinstal macromedia drem weaper karena disini kita menggunakan program dream weaper8, selain itu instalkan juga dikomputer anda localserver yang bersifat localhost misalnya apache triad, exampp ataupu yang lainnya....untuk itu langkah lagkahnya seperti berikut ini

buka program aplikasi dream weaper, klik program dan masuk pada macromedia dream weaper 

setelah itu kita klik new dan pilih html, lalu klik create.............. 

pada form utam dreamweaper sobat arahkan korsornya ke Tab Design, setaelah kursor ada pada form disign, klik menu insert lalu klik table lalu isi optionya seperti berikut 

Table udah tercipta sekarang tinggal kita berkreasi sesuai dengan kreatifitas sobat, namun disini aku menuliskan header atau judul buat website halaman utamanya pada klolom 1 dibaris kedua yaitu website konten islam, dan pada kolom kedua tepat dibawah judul klik kanan lalu klik table lalu klik split table dan dioptionxya pilih atau centang row dan pilih 2

setelah udah jadi tabelnya sekarang kita siap siap nmengkreasikan warna backgroundnya, misalkan kita memberi warna hijau maka yang harus kita lakukan adalah membuat link menu misalnya home, profil, maka sama seperti tadi klik kanan dikolom kedua kemudian klik table lalu klik split sell, dan kemudian pilih option sekitar 5 pada option row 

kemudian lakukan langkah selanjutnya misalnya teks rata tengah, mengganti jenis font dan yang paling penting memberi background yang cocok dengan selera sobat

dan setelah memberi background itu artinya kita udah siap ngutak atik websitenya misalnya memasukkan konten kedalm website misalnya texs, gambar ataupun link dan lain -lain, dan untuk teksnya sendiri sangat gampang kita cukup menulis pada form design tadi, namun untuk gambar adalh tentukan dimana gambar kan diletakkan, kemudian klik menu insert, kemudian klik images, kemudian browse pada komputerkita tentunya lebar dan tinggi gambar harus dipertimbangkan dan sesuai dngan yang diinginkan 

Setelah itu berkreasilah sesuai imajinasi dan creatipitas sobat tinggal kita bagaimana membuat cantik web kita, dan setalah selasai dibuat cobalah jalankN Dibrowser anda 

oke sampai disini dulu tentang cara bikin web dasar dengan tampilan ala kadarnya sebagai pemula sisa kita mencari referensi tambahan selanjutnyamoga bermanfaat 

 

hasilx seperti ini tinggal perbanyak belajar aja buat reperensi..........

Kirim dan terima sms dengan mudah dengan Delphi 7

Belajar, dan terus belajar jangan tunggu keajaiban dating, Komponen ini bisa dibuat dari berbagai bahasa pemprograman yaitu borlan Delphi 3,4,5,6,7 dan borlan borlan c++ builder 5, dan bisa beroperasi pada handphone nokia tipe 3390, 3210, 3310, 3330, 3350, 3410, 3510, 5110, 5130, 5190, 6210, 6310i, 7190, 8850, 8910 dan hanya mendukung pada system operasi windows

Adapun langkah langkahnya

Buka Delphi, dan desain form seperti berikut:

Prosedurnya adalah sebagai berikut

Objek                            caption             name

groupbox1                         pesan masuk            groupbox1

groupbox2                        kirim pesan            groupbox2

button1/2/3/4                    Batal/Kirim/Konek ke hp/Hapus         Btnbatal/btnkirim/btnconnect/btnhapus

memo1 dan memo2                                    pesanmasuk dan pesankeluar

label1/2/3                    isipesan/isipesan/statuskoneksi/     lblpesanmasuk/ lblpesankeluar/lblstatus

label4/5/6                    pengirim/waktu/no tujuan        lblsender/lblwaktu/lbltujuan

edit1/2/3                    pengirim/waktu/+62            edsender/edwaktu/edtujuan

tambahkan obyek oxigensms1            name:sms1                connection mode 2

 

 

hmmm oke kalo sudah demikian kita tinggal masukin barangx……………….heheeh maksudx codex :

 

klik pada tombol connect ke hp

procedure TForm1.BtnConnectClick(Sender: TObject);

begin

if (SMS1.Open=True) then

LblStatus.Caption : ='Terkoneksi' else

LblStatus.Caption : ='Koneksi Gagal';

end;

 

pada tombol Batal

procedure TForm1.BtnBatalClick(Sender: TObject);

begin

PesanKeluar: Text:=";

end;

 

pada tombol kirim

procedure TForm1.BtnKirimClick(Sender: TObject);

begin

SMS1.SendSMSMessage(EdTujuan.Text,

PesanKeluar: Text, 167, true,false,nil);

end;

 

pada tombol hapus

procedure TForm1.BtnHapusClick(Sender: TObject);

begin

PesanMasuk.Text :=";

EdSender:Text:=";

EdWaktu.Text :=";

end;

 

pada obyek sms1

procedure TForm1.SMS1SMSMessageReceived(Index: Integer; Time: TDateTime;

Text, Send: String; Pict: TBitmap);

begin

PesanMasuk.Text:=uppearcase(text);

Edsender:Text:=Send;

Edwaktu.Text:=datemetostr(time);

end;

 

end.

 

Untuk obyek tambahan oxygen smsdownload di www.oxygensoftware.com, setelah itu, jika sudah terdownload dan tersimpan buka folder tempat smsoxigen tersimpan

Setelah itu pilih jenis oxigensms sesuai yang loe pake abis itu buka folderxya dan klik 2 kali pada logo oxigensms

 

Jika sudah akan muncul seperti berikut

Selanjutnya klik tab compile dan jika ada konfirmasi save change klik yes…………………ok setelah itu Delphi 7 kita sudah terinstal oxygensms

Lalu jalankan …………………………………

selamat mencoba JJJ

Pemrograman visual basic (penjualan makanan & minuman sederhana)

::membuat program menu makanan dan minuman pada sebuah wifi::

Desain formnya seperti berikut:

Gampangji to!.......succes…………………

Desain tersebut berisikan label1-8/text1-6 serta 2 checkbox

Lalu masukkan kode seperti berikut:



Private Sub Check1_Click()

If Check1.Value = 1 Then

Text2.Text = Text2.Text + 8000

Else: Text2.Text = Text2.Text - 8000

End If

End Sub



Private Sub Check2_Click()

If Check2.Value = 1 Then

Text2.Text = Text2.Text + 8500

Else: Text2.Text = Text2.Text - 8500

End If

End Sub



Private Sub Check3_Click()

If Check3.Value = 1 Then

Text2.Text = Text2.Text + 6000

Else: Text2.Text = Text2.Text - 6000

End If

End Sub



Private Sub Check4_Click()

If Check4.Value = 1 Then

Text2.Text = Text2.Text + 9000

Else: Text2.Text = Text2.Text - 9000

End If

End Sub



Private Sub Check5_Click()

If Check5.Value = 1 Then

Text2.Text = Text2.Text + 7500

Else: Text2.Text = Text2.Text - 7500

End If

End Sub



Private Sub Check6_Click()

If Check6.Value = 1 Then

Text2.Text = Text2.Text + 8500

Else: Text2.Text = Text2.Text - 8500

End If

End Sub



Private Sub Check7_Click()

If Check7.Value = 1 Then

Text2.Text = Text2.Text + 6000

Else: Text2.Text = Text2.Text - 6000

End If

End Sub



Private Sub Command1_Click()

Dim Ket As String

Do

Form1.Left = Trim(Str(Int(Form1.Left) - 1))

Loop Until Form1.Left < -Form1.Width

Unload Me

End Sub



Private Sub Form_Activate()

Move (Screen.Width - Width) / 2, (Screen.Height - Height) / 2

Text2.Locked = True

Text5.Locked = True

End Sub



Private Sub Text3_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

If Text6.Text = "0" Then

Text6.Text = Text3.Text * Text2.Text

Else: Text6.Text = Text6.Text + Text3.Text * Text2.Text

End If

Text3.Text = ""

End If

End Sub



Private Sub Text4_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text5.Text = Text4.Text - Text6.Text

End If

End Sub

Private Sub Text6_Change()

'If Text6.Text = "" Then

'Text6.Text = Text3.Text * Text2.Text

'Else: Text6.Text = Text3.Text * Text2.Text + Text3.Text * Text2.Text

'End If

End Sub,

dan program setelah dijalankan

Membuat Form Login Pada Visual Basic

Membuat form login penting sebagai tahap akhir dari sebuah penyelesaiaan suatu program sebagai pembatasan akses terhadap sebuah program, cara tersebut cukup mudah

Buat form baru pada project, terus tambahkan obyek sebagai berikut:

1. Teksbox1
   
2. Teksbox2
   
3. Label1
   
4. Label2
   
5. Dan 2 commandbutton dengan caption&Login dan &Batal
   
   
   Masukkan source code sbb:
   
   Private Sub Command1_Click()
   
   If Text1.Text = "ilham" And Text2.Text = "11081091" Then
   
   MsgBox "Terimakasih Telah Login", vbInformation
   
   Form1.Show
   
   Form15.Hide
   
   
   
   ElseIf Text1.Text <> "ilham" And Text2.Text = "11081091" Then
   
   MsgBox "Maaf User yang anda masukkan salah", vbInformation
   
   Text1.Text = ""
   
   ElseIf Text1.Text = "ilham" And Text2.Text <> "11081091" Then
   
   MsgBox "Maaf Password yang anda masukkan salah", vbInformation
   
   Text2.Text = ""
   
   ElseIf Text1.Text <> "ilham" And Text2.Text <> "11081091" Then
   
   MsgBox "Maaf Password dan User yang anda masukkan salah", vbInformation
   
   Text1.Text = ""
   
   Text2.Text = ""
   
   End If
   
   End Sub
   
   
   
   Keterangan: form1.show adalah form yang akan muncul pertama setelah login dan form15.hide adalah menonaktifkan/sembunyika form login ini
   
   Pada text2 ubah propertiesx pada passwordchart dengan meengetik tanda petik bintang *( biar password gak keliatan karakter alfabetnya gitu loh)….
   
   
   N J go………………….
   
   Program setelah dijalankan
   
   
   
   Gampang banegeeeeeeeeeeeeeeeeeeeetz kan…….!!!!!!!J

Membuat texs Berkedip Pada Visual Basic

"Cara membuat teks berkedip adalah":

Buat form baru dan masukkan obyek label1 dengan caption missal :: system informasi penjualan barang::>>>>> dan timer dengan mengubah interval menjadi 700

Lalu masukkan kode seperti berikut

Private Sub Timer1_Timer()

If Label1.ForeColor = vbBlack Then

Label1.ForeColor = vbWhite

Else

Label1.ForeColor = vbWhite

Label1.ForeColor = vbBlack

End If

End Sub

Desain seperti berikut:



Gimana cukup mudah bukan!J

Membuat Texs Berjalan pada Fox Pro

Membuat teks berjalan pada fox pro caranya gampang banget kita Cuma memasukkan obyek timer, label serta mengubah interval pada timex

Pada label 1 ubah captionnya missal hotel clarion…………………

Masukkan objek timer dan pada propertiesx ubah intervalnya menjadi 100

Masukan kode berikut pada timer1

LOCAL teks

teks=thisform.label1.caption

thisform.label1.caption=RIGHT(teks,LEN(teks)-1) + LEFT(teks,1)

lalu run………………………

moga sukses

Link Untuk maksimalka Ipad Anda

Saya hanya ingin belajar menguasai ipad (istilahnya MEMAKSIMALKAN).
terutama dari suhu2 MCI yang sudah berpengalaman.
Harapannya,we so very2 worthed kita beli ipad --> bs utk apa aja

Misalnya : [Tutorial]
Cara buat ITUNES GRATISAN (http://www.macclubindonesia.com/forums/showthread.php?t=27689&highlight=itunes+free)
Cara Copy Aplikasi di iPad ke PC ato ke iPad yang laen (http://www.macclubindonesia.com/forums/showthread.php?t=69641)
Video Cara2 presentasi pakai Ipad - with VGA Converter (http://www.youtube.com/watch?v=3d7Dg0flvQ0)
Tutorial Presentasi ke proyektor (mirror) dengan ipad kita (http://www.macclubindonesia.com/forums/showthread.php?t=67509&page=2)
Bgmn cara Presentasi dgn ipad ke ipad? (http://www.mysetiawan.net/tips-presentasi-menggunakan-ipad.html)
Presentasi pakai Ipad+Macbook Pro 13' yang di colok ke LCD Projector.,pakai app apa? (http://www.macclubindonesia.com/forums/showthread.php?t=70573)
SMSan di ipad menggunakan swirly sms (http://www.macclubindonesia.com/forums/showthread.php?t=65694)
Cara transfer data dr iPad ke PC (http://www.macclubindonesia.com/forums/showthread.php?t=61285)
Main Playstation (1) di iPad (http://www.macclubindonesia.com/forums/showthread.php?t=72045)
Facebook for iPad (http://www.macclubindonesia.com/forums/showthread.php?t=59332)
Aplikasi PDF reader pilihann.. :) (http://www.macclubindonesia.com/forums/showthread.php?t=69911)
Cara buka file dengan format HTML dan PDB (http://www.macclubindonesia.com/forums/showthread.php?t=71128)
Cara memindahkan file excel dari pc ke ipad?? (http://www.macclubindonesia.com/forums/showthread.php?t=71239)
Cara pindahin data,lagu,video dari Flashdisk langsung ke ipad..tp kadang error (http://www.macclubindonesia.com/forums/showthread.php?t=66567)
Cara save Attachment Dari email/browser (http://www.macclubindonesia.com/forums/showthread.php?t=70981)
Bagaimana mengirim Multiple Attachment di email? (http://www.macclubindonesia.com/forums/showthread.php?t=65946)
Mencari e-book2 tentang IPAD yang keren!! (http://www.macclubindonesia.com/forums/showthread.php?t=60235)
Bagaimana Membuat interaktive video untuk Ipad (http://www.macclubindonesia.com/forums/showthread.php?t=70778)
Membuat subfolder didalam photo albumnya ipad (http://www.macclubindonesia.com/forums/showthread.php?t=70608)
Back up ipad kita di kompi masuk kemana ya?? (http://www.macclubindonesia.com/forums/showthread.php?t=70465)
Aplikasi untuk Download majalah populer indonesia gratiss (http://www.macclubindonesia.com/forums/showthread.php?t=68577)

Apa aplikasi PETA&GPS terbaik utk Kota Jakarta (http://www.macclubindonesia.com/forums/showthread.php?t=70286)
Bagaimana agar aplikasi iphone bisa Retina display di IPAD (http://www.macclubindonesia.com/forums/showthread.php?t=70003)
Twitter-FB-Majalah2 dalam satu aplikasi (RECOMENDED)--> New interface (http://www.macclubindonesia.com/forums/showthread.php?t=69913)
Bagaimana mengaktifkan Voice Control di IPAD? (http://www.macclubindonesia.com/forums/showthread.php?t=59381)
Bagaimana me-NON aktifkan "popup screen" di ipad?-->pengguna simpati? (http://www.macclubindonesia.com/forums/showthread.php?t=68527)
Cara Mengaktifkan Fitur Multitouch Gesture by bro amazone (http://macclubindonesia.com/forums/showthread.php?t=72917&page=4)
Cara mempercepat Download di Ipad (http://www.macclubindonesia.com/forums/showthread.php?t=73630)

But kita harus tahu dulu basic2 juga,misalnya :
Tanya mengenai definisi dari "Authorize" itu apa sebenarnya? (http://www.macclubindonesia.com/forums/showthread.php?t=59770)

Bagaimana Memaksimalkan aplikasi2 cydia? --> ex Swirly sms,infinite dock,dll
Apa aja yang menarik dan sudah dipakai suhu2 MCI (Sharing pengalaman ke kita2 para newbie)

Ni alamat2 Repo Cydia-nya
All about Cydia,FAQ,dan Alamat Repo2 RECOMMenDED (http://www.macclubindonesia.com/forums/showthread.php?t=44478)

Intinya tutorialnya...:001_smile:


Termasuk masalah2 yang berkaitan dengan penggunaannya
Cara menghapus aplikasi belum selesai download via iTunes (http://www.macclubindonesia.com/forums/showthread.php?t=72992)
About Nge-Charge iPad yang bener..Nice to know (http://www.macclubindonesia.com/forums/showthread.php?t=70682)
Ipad sering kembali ke menu HOME.piye iki...?? (http://www.macclubindonesia.com/forums/showthread.php?t=71890)

Mau download Aplikasi2 tertentu :
Alkitab untuk IPAD yang Disukai (http://www.macclubindonesia.com/forums/showthread.php?t=71726)

Silakan bagi yg ingin menambahkan,smg membantu..JAdi newbie yang masuk ke MCI langsung ter link ke tread yang mungkin saja sudah di halaman 25,atau dtersangkut di forum lain/link luar, atau ada newbie yang search tapi kadang tdk ketemu,wlo kebanyakan males,hehehe.
Jadi Newbie masuk disini silakan.. :)

Jika dirasa bermanfaat,
Comments and Share Please :)
Biar ane semangat terus buat update