Makalah Biologi tentang Tumbuhan Mangrove dan Tanaman Hias

Aku cinta dia...
Aku sayang dia..
Pokoknya hidup dan matiku ..
Sama dia

Cara membuat iklan melayang di blog cukup mudah dan tidak ribet lagii. tinggal copas saja kode program di bawah ini :

<style>
#topbar {
height:30px;
width:auto;
background: #005094 url('http://lh3.ggpht.com/_beEpWOXwLJE/TIb57Lu4fwI/AAAAAAAABE0/q7niFVRbyNE/top-toolbar.jpg');
background-repeat:repeat-x;
text-align:left;
padding-top:4px;
}
#adsground {
height:auto;
margin:0 auto;
width: 850px;
background:#fff;
border-bottom:2px #005094 solid;
border-right:2px #005094 solid;
border-left:2px #005094 solid;
text-align:Center;
padding:4px;
}


#headlineatas {
opacity:1.0;
height:auto;
width:auto;
position:fixed;
top:65px;
left:170px;
border-bottom:1px #005094 solid;
border-bottom:0px blue solid;
color:#333;
padding:0px;
z-index:1001;
font-size:13px;}
</style>
<script type="text/javascript">
function getValue()
{
document.getElementById("headlineatas").style.display = 'none';
}
</script>
<div id="headlineatas">
<div id="topbar">
<img align="left" style="padding-left:2px;" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjd2ShUWXnlEPngCJB3byiy4iQTw2bWjCzH_Kk2-qQdHRcWlRysqXnhOoPNKUCH6jjlrHNbpkDh1fQBuWO8Nvz8VByKnRaDl5jDAj57SzalrqqFB_QTwZS0AZCZxGhmPkMUMBNgd4SzaGOL/s1600/rita+teguh+aza.jpg" />
<span style="color:#fff;font-size:13px;font-weight:bold;text-shadow:black 0.1em 0.1em 0.1em">Space Ads  Klik Iklan 1 X untuk Menambah Penghasilan Anda</span>
<span style="color:#fff;font-size:13px;font-weight:bold;text-shadow:black 0.1em 0.1em 0.1em;float:right;padding-top:3px;padding-right:10px"><a href="http://www.almantera.com/kata-kata-indah-dengan-berpuisi-cinta.html" target="_blank" onclick="getValue()">close</a></span>
</div>
<div id="adsground">
<h3></h3>
<p align="left"><h3></h3></p>
<p>
<!-- Begin: http://adsensecamp.com/ -->
<script src="http://adsensecamp.com/show/?id=Fq25XmQHGhk%3D&cid=rDRAQca6lYU%3D&chan=pwMa01El5cI%3D&type=1&title=3D81EE&text=000000&background=CAF99B&border=000000&url=2BA94F" type="text/javascript">
</script>
<!-- End: http://adsensecamp.com/ -->
 <br/></p></div></div>

Sumber : http://blog-arul.blogspot.com/2011/12/membuat-iklan-pop-up-melayang.html#ixzz1nx7VI6xN

Ganti kode yang berwarna merah dengan koding iklan anda.
Terima kasih

Hidup akan mudah apabila kita berfikir semua yang kita lakukan itu mudah..
doktrin lah diri anda tentang semua yang optimis...yakinlah semua akan tercapai dengan mudah..

By: Rita

           Kata-Kata cinta terbaru ini akan menemani hidupmu dan janganlah kamu bersedih karna kata-kata cinta ini akan memebrikan kamu wanita yang romantis kepadamu apabila kamu membacanya serta mengucapkannya. Cinta itu tak harus kepada wanita cantik, tapi cinta itu ada disetiap wanita kepada laki-laki.
silahkan saja membaca kata-kata cinta di website kami.:

Cinta hanya akan indah pabila berpondasikan kasih sang pencipta. Karena Cinta berasal dari-Nya Dan cinta yg paling utama adalah cinta kepada sang pencipta cinta

 Bintang kehidupanku tlah redup, cahaya nya bgai pelita yg hampir mati dan harapan akan kehadiran mu terkubur dalam penantian tak bertepi Kau daTang membaWa Cinta dan kesetiaan . . .

Dan kaU pergi MeninggaLkan Luka Dan Kehancuran . . . Dan aQ leBih Baik DikenaL laLu di LupAKAn daripada Di CinTai LalU dKhiAnaTi

Jangan prnah merasa sepi karena hatiku, kan slalu menemanimu pejamkanlah matamu dan bermimpilah dlm tidurmu. bangunlah esok pagi dengan senyuman yg indah seindah mentari pagi yang bersinar!

Dengan senyuman, kau luluhkan hatiku, dengan senyuman, kau perlihatkan dunia padaku hanya dengan sebuah senyuman kau berikan aku kesadaran begitu indah cerita hidupku oleh senyumu i love u,

Datang dan pergi seperti angin tak beraturan dan arah merasakan cinta dalam kehidupan kadang ku bahagia kadang ku bersedih

Pagi yang cerah ketika bersamamu, malam yang indah ketika mendengarkan suara mu , hati yang bahagia ketika memiliki mu selamanya.

Cinta adalah caraku bercerita tentang dirimu, caraku menatap kepergian mu dan caraku tersenyum, saat menatap indah wajahmu.

Aku tak pernah menyesal mencintai mu, yang aku sesali mengapa tidak sejak dulu mencintaimu.

Cinta adalah sebuah pengorbanan yang tulus, tanpa ada rasa pengorbanan cinta akan jauh.

Segala hal terindah kita tidak bias dilihat dan di sentuh, semua itu hanya bias di rasakan dengan hati yang tulus dan suci.

Sesuatu yang dicintai selalu indah tapi sesuatu yang indah belum layak dicintai.

Gapai lah cintamu ungkapkan isi hatimu betapa kita mendambakan cinta

   Kumpulan kata-kata galau  dengan pacar kamu, disini tempatnya kamu bisa mengungkapkannya.Tak ada yang tak bisa untuk bisa berkreasi dalam dunia galau, MAri kita lihat langsung di TKP :

Mengingat cinta dimasa lalu tidak hanya menambah penderitaan. Tepapi juga menambah pengalaman untuk mencari cinta sejati.

Kamu tuh kayak rapot...kadang kadang baik..tapi..kadang kadang hasilnya bisa bikin kesel....

Lihat aku di sini , kau lukai hati dan perasaan ini.

Di saat kebahagiaan datang
Ku berharap itu karenamu
Namun harapan itu tiada
Bersama dirimu yang tinggalkanku

Hati ini galau karena tak bisa bersamamu
Kau tinggalkanku dengan kenangan kita
Sendiri terdiam dikeheningan malam
Dan semua itu kulalui tanpa dirimu di sini

Pagi ini tak secerah pagi kemarin
Malam ini pun tak seindah malam kemarin
Saat kau ada di sini
Bersamaku menjalani hari hari

Tanpa ku sadari tepat 1 tahun kita berpisah

Dia tau ga yah. Kalo aku kangend banget sama dia.

Cukup sudah aku mengenal mu. sudah banyak air mata ini yg tertetes karna mu. Lebih baik ku akhiri saja semua ini.

Kenapa harus balik lagi kalo niatnya hanya untuk menyakiti hati.

Kamu tuh bagai kan angin yang berlalu karena kamu cuma lewat sebentar ke hati aku.

Kenapa? kenapa? kau tak pernah memperhtikanku aku selalu sendirian tanpamu.

Dan aku pun masih tak mampu lupakanmu
Kenangan kita yang sangat indah
Selalu membayangi hari-hariku

Pernah ku berfikir ku ingin kau ada di sini bersamaku malam ini
Melihat indahnya bintang dengan peluk hangatmu
Namun itu hanyalah sebuah harapan semu
Yang tak mungkin bisa lagi aku lakukan

Mungkin terlalu besar jika aku berharap selalu ingin bersamamu
Mungkin juga terlalu besar jika aku berharap kau selalu ada bersamaku
Dan aku hanya bisa berharap kau bahagia dengan atau tanpa aku bersamamu

Kau tahu aku sayang kamu
Kau pun tahu bahwa aku sangat mencintaimu
Namun kenapa kau tak pedulikan itu
Pergi meninggalkanku bersama kenangan kita di masa lalu

Perlu tiga kalimat untuk ucapkan aku cinta kamu
Perlu tiga detik untuk ucapkan aku sayang kamu
Namun perlu bertahun-tahun untuk melupakanmu

     Cinta sejati tidak akan datang bila kmu tidak benari mengungkapkan cinta kepadanya dengan setulus hatimu.

       Program Edit dan Hapus menggunakan vb6 pada listview ke file txt, Saya sudah selesai mengerjakannya dan bisa kamu download disini. programnya mudah kok, cuman 1000 baris program. hehehe..
Listview disini berfungsi untuk menampilkan dari file txt kemudian di tampilkan pada listview. bisa di edit dan dihapus. program ini hanya untuk tugas saja dan mungkin bisa membantu kamu-kamu semua..

     Kamu bisa lihat tampilan form edit dan hapus data pada listview dengan file txt pada vb6. :

     Dalam Rekayasa Perangkat lunak, kita diwajibkan belajar bahasa java mobile, yaah kita kan bisa belajar bahasa mobile, Kali ini kita membahas dasar dasar pemograman j2me.
Berikut ini konsep source code J2ME dasar :

import javax.microedition.midlet.*;->Digunakan untuk mengimport package Microedition.midlet
(klo tidak ada ini maka aplikasi yang anda buat tidak dapat
berjalan di mobile device)
import javax.microedition.lcdui.*;->Digunakan untuk mengimport package Microedition.lcdui(
package ini adalah tampilan dari aplikasi anda)

public class test1 extends MIDlet implements CommandListener->Digunakan untuk memanggil class MIDlet(pada extends MIDlet).Class MIDlet ini sudah ada dalam package microedition.midlet tadi. Fungsi dari CommandListener adalah action/kejadian untuk mengeksekusi sebuah perintah dari user (semacam tombol untuk menjalankan suatu perintah)
{
private Display display;->merupakan variabel dari class Display

public heloMIDLet(){
display = Display.getDisplay(this);->menginisialisasi variabel display
}

public void startApp()->method yang berfungsi untuk menampilkan tampilan awal aplikasi mobile anda
{
TextBox tb = new TextBox("Hello MIDLet","Hello J2ME...!!",256,0);->langkah ini berfungsi untuk mengatur format dari textbox seperti panjang textbox, jumlah max karakter yg ditulis,dll.
display.setCurrent(tb);->method setCurrent digunakan untuk menempatkan textbox
}

public void pauseApp()
{
}

public void destroyApp(boolean unconditional)
{
}

public void commandAction(Command c, Displayable d)->method ini berfungsi untuk mengimplementasikan class CommandListener yang telah di-implements sebelumnya. Berfungsi untuk menempatkan source code supaya tombol dapat menjalankan suatu perintah
{

}
}

Nah untuk mencobanya silahkan hilangkan tulisan2 yang berwarna merah. Lalu copy paste source code itu di aplikasi editplus atau notepad++ atau JCreator atau netbeans atau eclipse.

        Dalam pemograman java untuk J2ME yaitu pemograman mobile kita harus mengenal perogram terlebih dahulu.

        Dalam pemograman java untuk J2ME yaitu pemograman mobile kita harus mengenal perogram terlebih dahulu.

         
        Ratusan mahasiswa yang tergabung dalam Mahasiswa Peduli Rakyat Jakarta (MPRJ) melakukan aksi demonstrasi penolakan kenaikan harga Bahan Bakar Minyak (BBM) didepan kantor Lembaga Bantuan Hukum (LBH) Jakarta, Jalan.  demo yang dilakukan mahasiswa ini menutup tiga lajur jalan dari empat lajur jalan Jalan Diponegoro.
Akibatnya terjadi kemacetan hingga 2 Km di sepanjang Jalan Diponegoro, hingga depan Stasiun Cikini, Jakarta Pusat.

            "Biar semua tahu semangat kami membela rakyat yang ditindas pemerintah dengan menaikan harga BBM," ujar Iwan, salah seorang mahasiswa yang melakukan aksi blokir jalan, Selasa (27/3/2012).
Sambil membawa poster bertuliskan 'Tolak Kenaikan Harga BBM', 'SBY Boediono sudah gagal'. Massa bergerak sekitar pukul 12.00 WIB, setelah semuanya berkumpul di Jalan Diponegoro.
Mereka kemudian menuju Jalan Salemba ka arah Tugu Tani dan ke Istana Merdeka untuk bergabung dengan pendemo lainnya yang menolak kenaikan harga BBM.

Perlu diketahui, aksi besar-besaran pada 27 Maret 2012 ini, dilakukan karena rencana pemerintah yang akan kembali menaikkan harga Bahan Bakar Minyak (BBM) pada 1 April mendatang.
Alasan pemerintah menaikkan harga BBM ini, untuk menyelamatkan APBN.

Sumber(http://www.tribunnews.com)

       Dalam kegelapan aku merindu, tak ada satu orangpun yang peduli padaku... Padahal diri ini ingin rasanya ditemani, diperhatin dengan mu, tapi kenapa diri ini seperti tak ada yang memperhatiin ku..
Sungguh kesedihan ini membawa diri menjadi GALAU.
Apakah ini merupakan hidup, apakah harus begini arti dari kehidupan.

    
  Di dunia ini tak ada kehidupan yang abadi, cinta juga tak kn abadi,.. maka jagalah cinta sampai cinta itu musnah.
Saat aku sedih, aku ingin berada disampingmu..
saat aku bahagia, aku juga ingin berada si dekatmu..
tapi semua itu hanyalah hayalan belaka..
karena dia dan aku tak mungkin bisa bersama...
Ada yang membatasi di antara kita..

       di sana kamu sedang bermain-main..
       Sedangkan aku disini sedang merasa sedih karena rindu..
       Itukah cinta..? atau itukah Akhir sebuah cinta..?

Bersama mu adalah hal yang terindah..
melupakanmu adalah hal yang terburuk dalam hidup..
tapi itu mungkin adalah sebuah takdir..
yang tak bisa lagi diulangi.

aku senang bisa bersama mu meski sekejap..
Aku bahagia bisa mampir dihatimu..
maafkan aku bila tak bisa menjaga mu.
saat kamu tidur, saat kamu sendirian,.
bahagialah bersamanya, aku kn bhagia juga..

Cowok : " kamu tahu gak kenapa pelangi kelihatan cuman setengan saja..?"
Cewek : " gak tahu, mang kenapa ?"
Cowok : "kan yang setengahnya lagi ada di mata kamu ".

Ternyata tempat yang paling indah itu bukan dibulan
Tetapi tempat yang paling indah itu ada di sisi kamu...

Cwok : " Kamu pemain basket ya..?"
Cwek : " iya Kok tau .?"
Cwok : " karena kamu telah men-three Point-kan hati aku."

Co :"kamu anak Mahasiswi ya..?"
Ce :"kok tau..?"
Co :"karna kamu telah Mencontek jawaban isi hati aku."

"Ada 3 hal yang paling aku suka di muka bumi ini,
Matahari, bintang dan kamu...
Matahari untuk siang hari..
Bintang untuk malam hari..
dan Kamu untuk aku selamanya..

Co :"Kamu law cantik kira-kira donk"
Ce :"Kenapa rupanya mas "
Co :"Masak aku gak bisa tidur gara-gara mikirin kecantikan kamu"

Cowok :"malam-malam gini aku sering bingung"
Cewek :"loh emang kenapa mas"
Cowok :"Tiap aku liat bintang, seperti lagi liat wajah kamu, soalnya sama-sama indah"

"Aku rela ikut lomba lari keliling dunia, asalkn kamu yang jadi garis finisnya."
Cowok :"Kamu tau gak nggak ada yang lebih indah dan bersinar ketimbang bintang"
Cewek :" Hah, emang ada ..?"

Cowok :" ya adlah, yaitu cuman kamu .."
"Pulsa aku berkurang tiap sms kamu, tapi kok cinta aku ke kamu nambah terus yaa."
"Meskipun sms aku sering pending2, tapi cinta aku ke kamu gak kan pending"

Co :" kamu cantik banget ea pake baju merah"
Ce :"Hah, aku kn lagi pake baju merah"
Co :"Waaah, ternyata benar ,klau cinta itu buta"

  Kita ke toko bunga yuk yank..?
  emg mw bli ap ?
  Beli bibit cinta tuk ditanam di hati mu..


Cowok: Maaf mbak, jangan terlalu lama duduk dikursi itu, pindah deket saya saja?
Cewek: Loh? Emangnya kenapa??
Cowok: Biar gak dikerubung semut.. soalnya mbak manis sich?

Cowok : Aku didiagnosa Sakit jantung.
Cewek : Hah! Kok bisa?
Cowok : Iya. Jantungku selalu berdegup kencang bila dekat denganmu.

Cowok : Kemarin aku ke dokter mata. Kamu tau apa kata dokter?
Cewek : Apa? Parah?
Cowok : Kata dokter ada kamu di mataku.

Cowok : Kamu punya kunci apa aja sih?
Cewek : Kunci rumah, kunci mobil, kunci lemari. Emang ada apa?
Cowok : Punya nggak kunci untuk membuka hatimu kepadaku?

Cowok : Kamu punya peta nggak?
Cewek : Peta apa?
Cowok : Peta hatimu. Karena aku tersesat dan tak bisa keluar dari hatimu.

- Bapak kamu pasti seorang astronot ??? Soalnya aku melihat banyak bintang di matamu.

- Kamu pasti kuliah di seni pahat ya ??? Soalnya kamu pintar sekali memahat namamu di hatiku.

- Kakekmu pasti penambang ya ??? Soalnya banyak berlian di matamu.

- Kamu Mantan pencuri ya ??? Abisnya kamu mencuri hatiku sih!

Cowok : Aku suka senyum-senyum sendiri lho.
Cewek : Hah .. Gila Ya
Cowok : Nggak. Aku sedang mikirin kamu.

- Setiap malam aku berjalan-jalan di suatu tempat. Kamu tau di mana itu ? Di hatimu.

- Kamu merasa gempa gak ??? ada kamu yang mengguncang hatiku sih.

-Kamu pake Indosat ya ??? Karena sinyal-sinyal cintamu sangat kuat sampai ke hatiku.



Kata Kata Gombal Romantis


- Tak mungkin aku berhenti mencintaimu. Aku hanya bisa belajar hidup tanpamu.

- Aku pengen bersamamu cuma pada dua waktu: SEKARANG dan SELAMANYA.

- Kau begitu kucinta, hingga ketika bersamamu mati seperti bisa kutunda, dan tanpamu, hidup serasa tiada guna.

- Aku nggak menangis karena kehilanganmu, tapi mengetahui kau tak pernah berusaha mencegahku pergi

- Aku tak pernah tau kebahagiaan sesungguhnya, sampai ketika aku mendapatkan cintamu. Dan aku tak pernah tau derita sebenarnya, sampai aku kini kehilangan itu. Terima kasih telah mengenalkanku pada kedua rasa yang tak akan kulupa.

- Aku selalu berusaha tak menangis karenamu, karena setiap butir yang jatuh, hanya makin mengingatkan, betapa aku tak bisa melepaskanmu.

    
Setiap kata adalah doa diri kamu, janganlah mengucapkan sepatah kata tanpa memikirkan kedepannya... setiap prilaku kita akan di balas di suatu saat.. maka jagalah sikap sewaktu kamu masih bernyawa.   

Cinta aku tu tak luput dari hatimu, karna aku lagi galau d depanmu..

1. Lebih baik kamu NEGATIVE thinking dari pada kamu POSITIVE hamil.
2. Bukanya aku gc mau terima ''CINTA'' mu .. tp krna Q gc mau jadi orang ke 3 antara ''KAU'' DAN ''DIA'' .....
3. Maaf bila suatu saat nanti ku sudah tak ada disisimu lagi, bkn karna ku berhenti mencintaimu, tp ku berusaha berhenti saling menyakiti. :')
4. gue th' pengen nangiz d.dpan loe ! biar loe tch' tew rasaa sakittttt yg gue alamii :'(
5. ksalah yg kmu lakuin lebih sakiiiit kmu slingkuh masih q maaf kan tapi....ksalhan q hanya telat waktu kmu sdah tinggalin aq...knpa beib knpa....kamu tega...
6. minimal aku punya foto bersama dgnnya, walau difoto itu gak hanya aku dan dia, tp rame2 sm temen2 lain :(
7. pagi yg cerah ketika bersmamu,mlm yg indah ketika melihat foto mu, hati yg bahagia ketika memilikimu selamanya
8. kita pacaran kayak TV aku yah , Suka putus-Putus channel nya :'(:'(:'( !
9. kenapa kau tak prnah mengerti prasaan q walaupun q sdah brkorban dmi cnta q ke kmu tetapi mlah kmu memlih dia
10. sakit karna hujan itu tak seberapa,,ketimbang sakitnya hati,,saat kau tinggalkan aku bersama diri'a...T_T
11. LUKa hati ini semakin dalam saat kulihat fotomu dengan dirinya yang km upload di facebook 2 jam yang lalu …
12. mndaptkan cinta km tu trnyata bth ksabaran ky mau foto sim aja, coz aq hrs nunggu antrian panjang biar dpt gilira
13. Handphone aja sanggup simpan foto sampe beribu-ribu, masa cuma untuk simpan aku hati kamu nggak sanggup sih
14. daripada ga memiliki apapun dari kamu, ya udahlah aku cuma bisa memiliki fotomu. Itu udah cukup kok :')
15. Jangan hiraukan mereka yg membencimu. Mereka hanya orang yang berharap memiliki hidup sepertimu. Perhatianmu adalah hal yang mereka inginkan,
16. skg emang jamannya edit foto biar gambar di foto bisa berubah, tapi kamu jgn sampe edit2 perasaanmu ke aku ya :(
17. Cinta aku ke kamu tuh ibarat bulu ketek. Meski dicukur terus, dy bakal ttp tumbuh. Bahkan lebih lebat.. :'(
18. Cinta aku ke kamu itu ibarat bulu idung.. Idung ga akan bisa tanpa bulunya, begitu jg aku tanpa kamu. :(
19. Cinta kita itu kaya bulan sm matahari. Meski ada dilangit yang sama, tapi ga akan pernah bertemu :(
20. yg paling menderita ngeliatin org pacaran makan malem bareng keluarga ya jomblo ngekos :p
21. Org klo botak didpn artinya suka mikir.. Kalau di belakang artinya dia pintar.. Kalau depan belakang dia pikir dia pintar!
22. Kalo macet gausa klakson2! Emg tuh klakson bisa bikin jalanan jd lancar?! Kampungan!
23. Tau arti cewe WABAH? Cewe yg dari belakang WAH! Dari depan BAH!! *kenyot kecebong*
24. Oh ini twitter yah? Kirain tmpt perkumpulan FBI. Abis banyak mata2 TL sih
25. dunia ini seperti milik kita berdua ya ,,, yang lainnya ngontrak ... !!!
26. Oh ini twitter yah? Kirain diary.. Abisnya banyak yg curhat di TL sih
27. manusia itu tak boleh mencintai sesama jenis, maka bercintalah dengan lain jenis seperti monyet, babi anjing dan binatang lainnya
28. lo dulu ngebuang gue kayak sampah , sekarang lo sujud2 minta balikan lagi sama gue , cuih
29. Cinta itu ky kembang api,bersinar indah tp gak tahan lama
30. Jangan ngomongin keadilan deh, kalo masih banyak jomblo yang belum kebagian cinta
31. Bukan perpisahan yang ku tangisi,,tapi pertemuan yang ku sesali
32. mata ku tdk melihat mu, bibir ku tdk membicarakan mu, tangan ku tdk menggenggam mu, tetapi jauh didalam lubuk hati ku... disitu cuma ada kamu. #ahayyyy ♥
33. You Know?! Saat ini aku telah berusaha untuk membuat kau bahagia, apapun caranya akan ku coba termasuk melakukan hal yang paling membuatku sedih, dengan merelakanmu pergi bersama seorang yang bisa membuatmu bahagia
34. Contek mencontek itu bukan kecurangan di kalangan pelajar, tapi tradisi
35. Wanita itu kaya lampu trafic light, kalo lagi merah itu gk boleh di terobos
36. ROKOK TIDAK BERBAHAYA BAGI KESEHATAN selama TIDAK ADA KOREKNYA
37. Belajar lah mencinta'i orang yg hari ini msih milik mu , sebelum dia pergi dari mu . Hari ini mungkin dia msih mencinta'i mu , tpi mungkin bsok tak kan ada lgi cinta untuk mu dan mungkin besok kmu yg akan lebih mencinta'i dia ketika dia pergi .. Jadi jngan pernah sia"kan cinta yg sekarang mengisi hati mu ... :)
38. Niat belajar, cek tl, banyak mention, keasyikan, ngantuk, tidur, ga jadi belajar
39. Seseorang bakal terasa berharga saat kita kehilangannya.Pengen bikin pasanganmu berharga? Tinggalkan dia~ B)
40. Hewan apa yang minta dicium? Cium-Me Cium-Me

    Ada cara cara dalam berkomunikasi yang baik dengan orang lain, kita bisa berkomunikasi dengan enak dan nyaman tanpa ada halangan dari pihak lain. Komunikasi dengan baik juga salah satu untuk bisa beradaptasi dengan lingkungan. Cara Cara komunikasi yang baik yaitu

        1. Percaya

   Nah kita mengawali komunikasi itu terlebih dahulu kita harus percaya dengan orang yang kita ajak dengan komunikasi, tanpa ada rasa percaya aktivitas komunikasi tidak akan berjalan dengan lancar . mengapa ?. yaa karena kita tidak percaya itu pada pembicaraan dia seolah olah dia hanya bicara bohong.

      2. Sportif

      Sikap sportif ini juga merupakan salah satu agar dapat terciptanya komunikasi yang baik jga, kita harus sportifitas dalam bersikap, andaikan orang bersikap dengan baik kepada kita maka kita juga harus bersikap baik pula kepadanya, begitu juga sebaliknya. jika orang itu tidak baik kepada kita maka kita juga harus bersikap baik karna agar terciptanya suatu komunikasi. jangan kita malah tidak baik pula, kalau begitu maka komunikasi tidak akan terjadi akan tetapi hanyalah diam yang ada.

     3. Terbuka

    yang ketiga ini merupakan salah satu menciptakan  komunikasi yang baik dan sempurna, keterbukaan seseorang dipengaruhi atas sikap nya, jangan kita saja yang menilai orang tentu orang lain juga menilai kita, nah justru itulah kita harus menjadi orang yang terbuka dalam masyarakat maupun dunia kerja. akan tetapi jangan terbuka sembarangan harus sesuai dengan keadaan dan kondisi.
Contohnya saja dalam dunia kerja, kita terbuka dengan karyawan lainnya, tapi jangan terbuka masalah pribadi atau rumah tangga kita keterbukalah hanya sebatas dunia kerja saja. seandainya saja ada masalah dengan teman pegawai kita maka masalah keluarga kita akan terjaga pula..

  Nah begitulah cara berkomunikasi yang baik kepada siapapun agar tercipta suatu komunikasi yang baru dan enak untuk dijalani.

   Disini banyak kata kata gombal untuk pacar, sayang, istri sekalipun. yang penting perasaan kita senang dengan melantunkan kata kata gombal.

Cowok: knapa malem ini gelap banget ya
Cewek: mendung kali bang
Cowok: kyknya nggak dech
Cewek: trus napa bang
Cowok: soalnya bulannya sedang menerangi & menemaniku disini

Cowok : eh jangan duduk deket bunga-bunga
Cewek : loh emang kenapa ?
Cowok : nanti bunga-bunganya layu
Cewek : kok bisa ?
Cowok : mereka layu karena mereka malu kalah cantik sama kamu

Cowok : bapak kamu maling ya?
Cewek : ih…..kow jahat si bapak ku dibilang maling kow gitu?
Cowok : iya soalnya kamu pintar banget mencuri hatiku

Aku udah pernah jatuh dari jembatan,
aku udah pernah jatuh dari tangga.
Semuanya gak enak.
Tapi ada satu jatuh yang paling enak, yaitu jatuh
cinta sama kamu

cowok : boleh nanya nga?
cewek : nanya apaan?
cowok : bapak km dulu astronot yah?
cewek : ga tuh, emank knp?
cowok : AKU LIHAT BINTANG DIMATAMU

Untuk apa berlari dalam kelam?
Sedang kabut pun tak mau menyibak.
Biarlah semua berlalu, mimpi pun aku tak ingin.
Meski rindu ini tercipta untukmu.

   

Cinta itu bahagia.., dan Cinta itu sedih..
  Seseorang akn mencintai tanpa mengenal keadaan bahagia dan sedih..

   Cinta itu adalah suatu bentuk anuggerah yg ter indah…
   Yang harus kita jaga dengan tulus,
   Walau cinta itu pahit,kadang bikin kitah sedih…
   Tpi itu lah cinta,karna cinta terbentuk dari suatu perbedaan,
   Yang harus kita satukan… itu lah nma x cinta….
   Menyatukan perbedaan


           Cinta itu peasaan,..
           Perasaan yang tulus yang tidak bisa di ungkapkan dengan kata-kata
          Atau pun dengan tulisan,cinta itu bisa kita rasakan
          Dari senyuman dan pandangan yang tulus dari hati yang dalam,
          Terkadang cinta itu tak terungkap karena
          Cinta itu bukan untuk di ungkapkan tapi di rasakan

Cinta itu seperti perangko yang tak bisa dipisahkan.

  
 Untuk saat ini Program untuk mengedit dan menghapus data berbentuk TXT belum saya postingkan, tapi postingan kali ini akan menjelaskan bagaimana senuah program bisa membuat dan menyimpan data di txt dengan menggunakan delphi..

unit TGS_UIR_I;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids, ExtCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Panel1: TPanel;
Panel2: TPanel;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
Panel3: TPanel;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Button2: TButton;
Button3: TButton;
StringGrid1: TStringGrid;
Panel9: TPanel;
Panel4: TPanel;
Panel5: TPanel;
Panel8: TPanel;
Panel10: TPanel;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Edit1Change(Sender: TObject);
procedure Edit4Change(Sender: TObject);
procedure Edit3KeyPress(Sender: TObject; var Key: Char);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
F : TextFile;
baris : Integer;
myRect: TGridRect;
begin
if (Panel3.Visible = False) Then
begin
Form1.Height := 510;
Panel3.Visible := True;
Panel3.Enabled := True;
end;
baris := StringGrid1.RowCount;
If ((StringGrid1.Cells[0,0] <> '')) Then
begin
StringGrid1.RowCount := baris+1;
baris := baris+1;
end;
if (baris < 10) then
StringGrid1.Cells[0,baris-1] := ' ' + IntToStr(baris)
else
if ((baris >= 10) and (baris-1 < 99)) then
StringGrid1.Cells[0,baris-1] := ' ' + IntToStr(baris)
else
StringGrid1.Cells[0,baris-1] := ' ' + IntToStr(baris);
StringGrid1.Cells[1,baris-1] := UpperCase(Edit1.Text);
StringGrid1.Cells[2,baris-1] := UpperCase(Edit2.Text);
StringGrid1.Cells[3,baris-1] := Edit3.Text;
StringGrid1.Cells[4,baris-1] := Edit4.Text;
myRect.Left := 0;
myRect.Top := baris-1;
myRect.Right := 4;
myRect.Bottom := baris-1;
StringGrid1.Selection := myRect;
Edit1.Text := '';
Edit2.Text := '';
Edit3.Text := '';
Edit4.Text := '';
end;
procedure TForm1.FormCreate(Sender: TObject);
var
F : TextFile;
FileHandle : Integer;
HighOrderSize : ^DWORD;
LowOrderSize : DWORD;
baris : Integer;
data : String;
status : Boolean;
begin
Button1.Enabled := False;
Button2.Enabled := False;
Status := False;
If FileExists('data.ret') = True Then
begin
FileHandle := 0;
Try
FileHandle := FileOpen('data.ret',fmOpenRead);
If (FileHandle = -1) Then
begin
ShowMessage('Gagal membuka File');
Exit;
end;
HighOrderSize := Nil;
LowOrderSize := GetFileSize(FileHandle, HighOrderSize);
If (LowOrderSize = INVALID_FILE_SIZE) Then
ShowMessage('Gagal mendapatkan ukuran file')
Else
If (LowOrderSize > 0) Then
begin
Form1.Height := 510;
Panel3.Visible := True;
Panel3.Enabled := True;
Status := True;
end
Else
begin
Form1.Height := 270;
Panel3.Enabled := False;
Panel3.Visible := False;
end;
Finally
FileClose(FileHandle);
End;
if (Status = True) then
begin
AssignFile(F, 'data.ret');
Reset(F);
baris := 1;
while Not EOF(F) do
begin
StringGrid1.RowCount := baris;
if (baris < 10) then
StringGrid1.Cells[0,baris-1] := ' ' + IntToStr(baris)
else
if ((baris >= 10) and (baris < 99)) then
StringGrid1.Cells[0,baris-1] := ' ' + IntToStr(baris)
else
StringGrid1.Cells[0,baris-1] := ' ' + IntToStr(baris);
readln(F, data);
StringGrid1.Cells[1,baris-1] := data;
readln(F, data);
StringGrid1.Cells[2,baris-1] := data;
readln(F, data);
StringGrid1.Cells[3,baris-1] := data;
readln(F, data);
StringGrid1.Cells[4,baris-1] := data;
baris := baris + 1;
end;
CloseFile(F);
end;
end
else
begin
Form1.Height := 270;
Panel3.Enabled := False;
Panel3.Visible := False;
AssignFile(F, 'data.ret');
ReWrite(F);
CloseFile(F);
end;
end;
procedure TForm1.Button3Click(Sender: TObject);
var
F : TextFile;
i : Integer;
begin
If (StringGrid1.Cells[0,0] <> '') Then
begin
AssignFile(F, 'data.ret');
ReWrite(F);
for i := 1 to StringGrid1.RowCount do
begin
Writeln (F, StringGrid1.Cells[1,i-1]);
Writeln (F, StringGrid1.Cells[2,i-1]);
Writeln (F, StringGrid1.Cells[3,i-1]);
Writeln (F, StringGrid1.Cells[4,i-1]);
end;
CloseFile(F);
end;
Form1.Close;
end;

Lumayan panjang yaahh... itu belum seberapa dengan program yang saya buat untuk Aplikasi Pembayaran Listrik desa. panjang banget...
udah dulu yaaa, lain kali saya akan lengkapi deh postingannya..
Wassalammualaikum..