Selasa, 01 Oktober 2013

TUGAS P.TERSTRUTUR



Langkah-langkah membuat project
1.buka aplikasi Delphi
2.setelah di buka,msaukan botton sebayak 9 botton,engan memencet  tombol  ok  pada tolbar
3masukan  lebel  sebnyak 5 lebel engan menekan tombol  A pada toolbar
4.ubah nama  lebel 1 dengan  nama yang anda inginkn,contoh :mandi tiga hari sekali di object inspektor
4.kemudian ganti  nama lebel 2 menjadi ukuran font
5.ubah lebel 3 menjadi warna font
6.ubah botton 1 menjadi  miring
7.ubah botton 2 menjadi tebal
8.ubah botton 3 menjadi garis bawah
9. ubah botton 4 menjadi 16
10. ubah botton 5 menjadi 18
11.ubah botton 6 menjadi 20
12.ubah botton 7 menjadi  biru
13.ubah botton 8menjadi merah
14.ubah botton 9 menjadi kuning
.untuk memberi animasi pada tampilan seperti contoh diatas,ikuti langkah-langkah berikut:
1.klik 2kali pda botton miring,maka akan muncul tampilan lain,
2.selanjutnya anda cari begin,anda isi dengan “mdlmandi.font.style. :=[fsItalic];
3. .selanjutnya anda klik 2kli pada tebal cari begin,anda isi dengan “mdlmandi.font.style. :=[fsBold];
4. selanjutnya anda klik 2kli pada garis miring cari begin,anda isi dengan” mdlmandi.font.style. :=[fsUnderline];
5. selanjutnya anda klik 2kli pada angka 16 cari begin,anda isi dengan” mdlmandi.font. Size:=16;
6. selanjutnya anda klik 2kli pada angka 18 cari begin,anda isi dengan” mdlmandi.font. Size:=18;
7.selanjutnya anda klik 2kli pada angka 20 cari begin,anda isi dengan” mdlmandi.font. Size:=20;
8. selanjutnya anda klik 2kli pada angka blue cari begin,anda isi dengan” lblmandi.Font.Color:=clBlue;
9. selanjutnya anda klik 2kli pada angka merah cari begin,anda isi dengan” lblmandi.Font.Color: =clRed;
10. selanjutnya anda klik 2kli pada angka hijau cari begin,anda isi dengan” lblmandi.Font.Color: = clGreen;



Untuk memberi warna pada tampilan yang berwarna hijau,maka dengan dengan langkah berikut:
·         Klik fom1 pada object treeview

·         Ubah warna pada object inspector pada color
Untuk memberi tampilan yg menarik,kita bisa mengaturnya pada font  yang ada pada object inspectoor

Selaesai lh pekerjaan kita,untuk memeriksa projek kita maka kita tekan tombol  ctrl+f9,atau jika sudah benar maka orror:0


Dan untuk melihat hasil nya maka kita tekan tombol  run atau f9


Selamat mencoba



Rabu, 18 September 2013

Sebuah Senyuman


SENYUMAN



Sebuah senyuman tidak perlu membayar, tetapi memberi banyak makna.

Senyuman membuat kaya yang menerima, tanpa membuat miskin yang memberi.

Senyuman butuh waktu singkat, tetapi kenangannya akan abadi selamanya.

Tak seorang pun yang begitu kaya yang bisa hidup tanpa senyuman dan tak seorang pun yang begitu miskin, tetapi ia bisa menjadi kaya karena senyuman.

Senyuman menciptakan kebahagiaan di rumah, mempercepat kemauan baik dalam bisnis, dan tanda persahabatan.

Senyuman meluruhkan kejenuhan, mengembirakan yang tak semangat, menyinari yang sedih, dan senyuman adalah penawar masalah.

Senyuman tidak bisa dibeli, dihiba, dipinjam, ataupun dicuri, karena senyuman adalah sesuatu yang tidak bisa dinilai harganya oleh sipapun, hingga senyuman itu diberikan.

Sebagian orang merasa terlalu lelah untuk memberimu sebuah senyuman.

Maka berilah ia senyuman termanismu, karena tak seorang pun yang butuh senyuman semanis dia yang tidak lagi memiliki apapun untuk diberikan.

Karya coba-coba

Senin, 16 September 2013

pantun biag-biag sambas

Jlan curam dpinggir kali
Pegang kuat pohon jati
cint sejati bisa dcari
Lewat akhlak n budi pekerti
hidup itok sian yng sempurne
setiap manusie pasti ade kekurangan nye
mun kte nak dpat pAhale
usah lupak perintah Allah yng di turun kan nye
Kalau tikus bisa bicara
Itu suatu keajaiban
Kalau putus dalam bercinta
Jangan putus persahabatan..
Rumah raje di dalam utan
Ngambek keladi keladi gatal
Ape keraje mun ari ujan
Narik bantal surongkan bantal