Hemat Energi Listrik

Ketika marak bermunculan papan reklame besar yang ‘nge-jreng’ diatas jalan2, saya jadi ingat tentang sms tentang kampanye penghematan pemakaian listrik. “..Yth pelanggan listrik PLN di profinsi Jawa Timur mari kita berhemat minimal mematikan 50 watt, maka jml pelanggan PLN jtim 6,5 juta x 50 watt = 325 megawatt setara satu pembangkit listrik bisa dihemat…”. Jadi [...]

Buah Naga (Dragon Fruit)

Setelah menanti selama 2 tahun, akhirnya tanaman buah naga didepan kamarku mulai kelihatan bunganya. Setahun terakhir, berbagai cara telah diupayakan agar tanaman tersebut bisa segera muncul bunganya. Obat perangsang buah, perangsang bunga dll belum mempan. Namun, ketika memasuki musim penghujan, cikal bakal bunga mulai muncul. Alhamdulillah ada lebih dari 18. Musim hujan tahun kemarin ada [...]

Chr(13)

Chr(13) sering digunakan untuk menambahkan baris dalam Hint suatu komponen. Namun, chr(13) juga bisa digunakan untuk menambahkan baris pada property caption (komponen label). Tempatkanlah Label1 pada form dan tuliskan kode berikut pada event handler FormCreate :
procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.Caption:=’Line 1′ + Chr(13) + ‘Line 2′;
end;