JAKARTA--MICOM: Para ilmuwan terus memelototi sebuah asteroid besar yang mungkin menimbulkan ancaman ke Bumi dalam beberapa dekade ke depan.
Batu ruang angkasa yang disebut AG5 2011 itu berlebar sekitar 460
kaki (140 meter). Lintasannya kemungkinan akan cukup dekat dengan Bumi
pada 2040.
Karena itu, beberapa peneliti dihubungi untuk berdiskusi tentang cara menangkisnya.
Pembicaraan tentang asteroid itu ada dalam agenda sidang subkomite
teknis dan ilmiah di bawah Komite Penggunaan Antariksa secara Damai
(COPUOS) PBB yang diselenggarakan awal bulan ini di Wina, Austria.
Sebuah tim aksi PBB tentang objek dekat Bumi (Neos) mencatat
pendekatan asteroid itu ke Bumi dan kemungkinan--meskipun kecil--bahwa
AG5 2011 akan memukul planet kita pada 28 tahun dari sekarang.
Benda itu ditemukan pada Januari 2011 oleh pengamat Survei Gunung
Lemmon di Tucson, Arizona. Para ilmuwan telah mengetahui ukuran batu,
tapi massa dan komposisinya belum diketahui saat ini.
"AG5 2011 adalah objek yang saat ini memiliki peluang tertinggi
untuk menabrak Bumi di 2040. Namun, kami baru mengamatinya sekitar
setengah dari orbit, sehingga tingkat kepastian dalam perhitungan ini
masih tidak terlalu tinggi," kata Detlef Koschny dari Solar System
Missions Division European Space Agency di Noordwijk, Belanda.
(space.com/OL-5)
rinnegan
Sabtu, 03 Maret 2012
Kamis, 01 Maret 2012
CARA INSTAL XAMPP
Untuk dapat menjalankan Joomla, kita harus menginstal dulu XAMPP. Berikut adalah cara menginstal XAMPP:
- Pertama buka file master XAMPP anda , kemudian klik file tersebut
- Rubah bahasa menjadi bahasa Indonesia agar mempermudah anda dalam proses penginstalan XAMPP.
- Setelah itu akan muncul kotak dialog setup XAMPP , kemudian pilih maju
- Pilih lokasi dimana program XAMPP akan diinstal,biasanya diletakan kedalam C/Program File/xampp
- Kemudian pilih install, tunggu beberapa saat sampai proses instalasi selesai.
- Biarkan saja kotak dialog tersebut akan hilang sendiri dan akan muncul kotak dialog berikutnya :
- Setelah muncul kotak dialog seperti gambar di atas pilih selesai, maka akan muncul kotak dialog untuk menginstal XAMPP server
- Kemudian pilih yes agar server terinstal. Maka semua proses menginstal XAMPP sudah selesai.
- Periksalah apakah program XAMPP dapat berjalan, caranya lihat dari
start>program>appachefriends>xampp pilih Control XAMPP server
panel
- Maka akan tampil jendela seperti berikut :
- Kemudian aturlah sesuai dengan kebutuhan anda.
Minggu, 26 Februari 2012
belajar PHP
Anda ingin membuat website dinamis? maka anda
perlu mempelajari bahasa pemrograman web server seperti ASP.net, PHP,
JSP, Perl, Python, RoR (Ruby on Rails) dan masih banyak lagi. Anda tidak
perlu mempelajari semuanya cukup pilih saja salah satu. Dan jika anda
memilih PHP, maka anda berada diwebsite yang tepat. Jika anda memilih
lainnya silahkan browsing lagi di Google, karena saya belum menguasainya
(saya bilang belum karena saya berencana mempelajarinya, hanya saja
tidak ada waktu untuk mempelajarinya).
Apa itu PHP?
Salah satu alasan PHP menjadi sukses seperti sekarang ini adalah karena
kemampuannya yang menakjubkan. PHP dapat berkomunikasi dengan berbagai macam
database dan mengenal semua protokol internet. PHP mudah digunakan dan cepat.
Class-class / fungsi-fungsi PHP dapat anda temukan dengan mudah di internet.
Apabila anda ingin membuat web dinamis dan belum tau caranya, PHP adalah bahasa
pemrograman yang tepat.
PHP merupakan kependekan dari HyperText Preprocessor, awalnya merupakan
kependekan dari Personal HomePage. PHP Merupakan bahasa pemrograman yang biasanya
ditulis bersama kode HTML. Tidak seperti HTML yang langsung dikirim ke browser,
script PHP di parsing dulu oleh PHP binary dalam komputer server. Elemen HTML
dibiarkan tetapi kode PHP di eksekusi terlebih dahulu dan hasilnya dalam bentuk
HTML dikirim ke browser pengguna. Kode PHP mampu menjalankan perintah database,
membuat gambar, membaca dan menulis file, serta kemampuan lainnya yang tidak
memiliki batas.
PHP 4 akan dihentikan pengembangannya pada Desember 2007, tapi tenang
saja pengguna PHP 4 diseluruh dunia masih diatas 80% dibanding PHP versi
lainnya.
Pada saat artikel ini ditulis, PHP telah memasuki
versi 5, tetapi versi 4 nya masih banyak digunakan. Bahkan versi 6 Alpha
telah keluar sejak akhir 2006. Pada versi 5 keatas PHP telah memiliki
konsep OOP (Pemrograman Berorientasi Objek) yang cukup bagus dan
sebanding dnegan Java. Jadi jika anda menggunakan PHP 5 anda harus
terbiasa dengan konsep OOP. Saya akan membahas konsep OOP lain kali,
disini kita menggunakan PHP 4 dan tidak menggunakan konsep OOP. Jadi
sangat cocok bagi anda yang merupakan pemula dan ingin belajar PHP.
Cara menginstall PHP
Sudah cukup kita ngomongin PHP, sekarang sebelum kita dapat menggunakan PHP
pertama-tama kita perlu menginstall PHP pada komputer kita. PHP dapat dijalankan
di berbagai macam sistem operasi dan servers. PHP dapat berjalan di Windows,
Unix, Linux dan Macintosh. PHP juga dapat bekerja pada berbagai macam web server
termasuk Apache (Apache merupakan opensource dan pasangan sehidup semati dengan
PHP), Microsoft IIS (Internet Information Server), Website Pro, iPlanet dan
Microsoft PWS (Personal Web Server). Disini kita akan menginstall PHP didalam
Windows XP menggunakan server Apache.
Cara termudah menginstall PHP adalah dengan menggunakan appserv. Appserv
merupakan sebuah paket untuk Windows dimana didalamnya terdapat :
- Apache Web Server
- PHP Script Language
- MySQL Database
- Zend Optimizer
- phpMyAdmin Database Manager
Daripada kita mendownload satu-satu, lebih mudah kita menggunakan apsserv,
karena didalamnya sudah terdapat semua. Anda tinggal download dan install.
Pertama-tama bukalah
http://www.AppServNetwork.com dan download Appserv versi terbaru. Setelah
itu jalankan filenya dan akan muncul layar seperti dibawah ini:
Klik Next aja.
Ini merupakan default folder dimana anda akan menginstall
Appserv. Saya sarankan biarkan saja menggunakan folder defaultnya tidak usah
diubah. Klik Next
Pilihlah typical dan klik Next
Biarkan saja Server Name nya dengan localhost dan Port nya 80.
Klik Next
Pilihlah Username dan Password untuk mengakses database MySQL.
Isi sesuka anda, asal anda jangan lupa dengan username dan passwordnya. Kemudian
klik Next, selesailah sudah. Anda sudah berhasil menginstall PHP pada komputer
anda. Bagaimana mudah bukan.
Sekarang buka browser anda dan ketik 'localhost', maka browser
anda akan menjadi seperti ini:
Selamat, PHP sudah terinstall pada komputer anda. Sekarang mari
kita mencoba beberapa kode PHP.
PHPunil sieh hehehe
Perlu di ingat jika anda membuat file PHP, maka anda perlu
menyimpannya di folder c:\appserv\www\folderanda. Sekarang buka Windows explorer
dan buka c:\appserv\www setelah itu buatlah folder dan beri nama folder tersebut
'contoh'. Seperti dokumen HTML, PHP merupakan file text. Karena itu anda dapat
membuatnya dengan text editor seperti Notepad atau BBEdit untuk MacOS atau Vi
dan Emacs untuk Unix/Linux. Saya pribadi menyukai Editplus atau PHPEdit karena
software tersebut memiliki sintax highlighting yang memudahkan kita.
Engine PHP akan mengeksekusi kode PHP setelah (
<?
) sampai
ketemu dengan
(?>
), jika kode PHP anda benar maka hasilnya akan ditampilkan,
tetapi apabila salah maka terdapat pesan error dengan memberi tahu anda pada
baris berapa terdapat error nya. Sekarang buka teks editor favorit anda dan
cobalah kode berikut ini:<? print ("Hello World!"); ?>
Sekarang simpan file tersebut di to c:\appserv\www\contoh\hello.php.
Buka browser anda dan jalankan 'http://localhost/contoh/hello.php'. Maka pada
browser anda akan tampil seperti ini:
print()
merupakan fungsi untuk mengoutput data. Apa
saja yang dituliskan oleh print()
akan ditampilkan pada browser. print()
merupakan
salah satu fungsi yang terdapat dalam PHP untuk menampilkan data, biasanya
dimodifikasi dengan data yang dimasukkan, Dalam kasus ini anda menjalankan
fungsi print()
yang berisi sekumpulan karakter (Hello World) atau
disebut String. String harus diapit oleh tanda ".
Setiap baris dari kode PHP selalu diakhiri dengan tanda titik koma " ; "
Anda dapat memasang kode PHP didalam HTML, cukup seperti ini:
<html> <head> <title>My first PHP</title> </head> <body> <? print "Hello <b>World</b>"; ?> </body>
Tetapi anda tidak bisa menyimpannya dalam format .html, anda
harus menyimpannya dalam format .php
Comments
Sama seperti HTML, anda pun bisa menuliskan komentar
di kode PHP anda. Untuk menuliskan komentar satu baris pada PHP harus
diawali
dengan dua tanda
//
atau sebuah tanda #
. Semua teks
setelah tanda tersebut tidak akan dibaca oleh PHP. Jika anda ingin menuliskan
komentar lebih dari satu baris anda dapat menggunakan tanda /*
dan
diakhiri dengan tanda */
. Contoh:<? // Ini merupakan kode pertama sayaprint ("Hello World!"); ?>
Variables
Variabel merupakan sebuah tempat yang anda definisikan untuk
menyimpan sebuah nilai. Variabel mempunyai nama yang anda definisikan dan
diawali dengan tanda
$
. Nama variabel bebas anda dapat menuliskan
dengan karakter, angka dan garis bawah "_". Nama variabel tidak boleh mengandung
spasi atau karakter lain selain angka dan huruf. Contoh:<? $nama="bobi"; $umur=30; $negara="Indonesia"; print "Halo nama saya $name, saya $age tahun dan tinggal di $country"; ?>
Hasil:
Halo nama saya bobi, saya 30 tahun dan tinggal di Indonesia
Sudah dapet maksudnya? Jika anda lihat kode diatas, kita membuat variabel nama yang
diisi dengan teks "bobi", kita kuga membuat variabel umur dan negara. Maka
apabila kita menulis
$umur
didalam fungsi print maka yang
ditampilkan adalah isi dari variabel tersebut. Kita juga dapat mengisi variabel
dengan variabel yang lain serta dapat memanipulasinya. Ini contohnya:<? $x=3; $y=4; $hasil=$x+$y; print "$x + $y = $hasil<br>"; $firstname="Dhimas"; $lastname="Ronggobramantyo"; $fullname="$firstname $lastname"; print "Nama saya adalah $fullname"; ?>
Hasil:
3 + 4 = 7
Nama saya adalah Dhimas Ronggobramantyo
Jika anda lihat pada variabel "hasil" kita mengisinya dengan
variabel x ditambah variabel y. Kita melakukan manipulasi yaitu menambah nilai
variabel x dan y yang hasilnya disimpan pada variabel hasil. Sebelum anda
meneruskan, coba anda pahami terlebih dahulu mengenai variabel, cobalah untuk
mengubah kode-kode yang ada.
Array
Array merupakan sekumpulan elemen yang memiliki tipe yang sama.
Di dalam array data tersimpan dengan menggunakan index untuk memudahkan
pencarian kembali data tersebut. Variabel hanya memiliki sebuah nilai sedangkan
array dapat mempunyai sejumlah nilai. Data dalam suatu array disebut
elemen-elemen array. Semua elemen array yang tersimpan mempunyai tipe data yang
sama. Array dapat berdimensi satu atau lebih (multidimensi). Oke sekarang
cobalah contoh berikut ini:
<? $name[0]="James"; $name[1]="Bobi"; $name[2]="Robert"; print "Halo nama saya $name[0] dan teman saya adalah $name[2]"; ?>
Hasil:
Halo nama saya James dan teman saya adalah Robert
Mirip dengan variabel kan, hanya saja terdapat kurung siku atau
dikenal dengan istilah vektor untuk membedakan antara $name yang satu dengan
yang lain. Untuk membuat array anda dapat menggunakan cara lain yaitu menggunakan
fungsi
array()
. Contoh:$name = array("James", "Bobi", "Robert");
Pada bagian vektor (yang didalam kurung siku) tidak hanya dapat
di isi angka saja tetapi juga dapat di isi oleh teks. Contoh:
<? $country["james"]="United States"; $country["bob"]="United Kingdom"; $country["robert"]="Singapore"; print "Hallo $country[james]"; ?>
If statement
Belajar pemrograman tidak akan lengkap jika belum ada if. Fungsi
if
digunakan untuk membuat berbagai ekspresi
yang berbeda, apabila ekspresinya benar maka kode yang didalam ekspresi tersebut
akan dijalankan. Untuk gampangnya perhatikan diagram kode diabawah ini:if ( expression 1 )
{
// kode yang dijalankan apabila ekspresi 1 benar
}
elseif ( another expression 2 )
{
// kode yang dijalankan apabila ekspresi 1 salah
// dan ekspresi 2 benar
else
{
// kode yang dijalankan apabila ekspresi 1 dan 2 salah
}
Apabila ekspresi 1 bernilai benar maka kode didalamnya akan
dijalankan, dan setelah itu selesai. Tetapi apabila ekspresi 1 salah maka
program akan membaca ekspresi 2, apabila ekspresi 2 maka kode didalamnya akan
dijalankan dan selesai. Tetapi apabila ekspresi 2 salah maka program akan
menjalankan kode yang berada didalam
else
karena semua ekspresi sebelumnya salah.
Anda dapat menambahkan elseif
sebanyak apapun yang anda mau.
Cobalah kode berikut ini:<? $x=3; if ($x > 5) { print "$x lebih besar dari 5"; } else if ($x < 5) { print "$x lebih kecil dari 5"; } else if ($x == 5) { print "$x sama dengan 5"; } else { print "$x bukan merupakan angka";} ?>
Variabel
$x
menyimpan nilai yaitu "3".
Angka "3" tidak lebih besar dari "5", Maka ekspresi pertama akan
dilewati. Pada elseif
berikutnya diuji apakah 3 < 5, tentu
saja hasilnya benar. Maka blok kode didalamnya akan dijalankan. Cobalah untuk
mengganti nilai variabel $x
agar mendapatkan hasil yang
berbeda-beda. Pahamilah perbedaannya. Contoh lainnya:<? $score=67; if ($score < 20) { print "Nilai anda: $score, anda dapat E"; } elseif ( ($score > 20) && ($score < 40) ) { print "Nilai anda: $score, anda dapat D"; } elseif ( ($score > 40) && ($score < 60) ) { print "Nilai anda: $score, anda dapat C"; } elseif ( ($score > 40) && ($score < 80) ) { print "Nilai anda: $score, anda dapat B"; } else { print "Nilai anda: $score, anda dapat A"; } ?>
Switch Statement
Perintah switch merupakan alternatif pengganti dari If. Perintah switch akan
menyeleksi kondisi yang diberikan dan kemudian membandingkan hasilnya dengan
konstanta-konstanta yang ada didalam case. Pembandingan akan dimulai dari
konstanta pertama sampai terakhir. Jika kondisi ditemukan maka program akan
membaca kode didalam konstanta tersebut, dan ketika bertemu perintah
break;
maka
program akan keluar dari fungsi switch. Untuk lebih jelasnya perhatikan diagram
kode berikut ini:switch ( expression )
{
case result1:
// Kode akan dijalankan apabila ekspresi sesuai dengan result1
break;
case result2:
// Kode akan dijalankan apabila ekspresi sesuai dengan result1
break;
default:
// Kode akan dijalankan apabila break tidak dijalankan
}
Pada dasarnya mirip dengan if, coba anda perhatikan contoh berikut ini:
<? $sex=cowok; switch ( $sex ) { case "cowok": print "Saya cowok"; break; case "cewek": print "saya cewek"; break; default: print "Saya bukan cowok/cewek tapi $sex"; } ?>
Pengulangan (while)
Fungsi while digunakan untuk melakukan pengulangan suatu blok kode. Jumlah
pengulangan yang terjadi tergantung dari ekspresi yang ditentukan. Anda akan
sering menggunakan fungsi while untuk mengambil data dari database. Blok diagram
kode while kira-kira seperti ini:
while (ekspresi)
Kode yang diulang
endwhile;
Inilah contohnya:
<? $i=1; while ($i <= 10) { echo "Loop $i<br>"; $i++; } ?>
Hasil:
Loop 1
Loop 2
Loop 3
Loop 4
Loop 5
Loop 6
Loop 7
Loop 8
Loop 9
Loop 10
Loop 2
Loop 3
Loop 4
Loop 5
Loop 6
Loop 7
Loop 8
Loop 9
Loop 10
autoincrement (++)
dan autodecrement (--)
sama saja
artinya dengan menjumlahkan/mengurangkan nilai variabel dengan nilai satu, jadi
jika kita memiliki variabel i yang bernilai 1 kemudian kita menjalankan $i++;
maka nilai i akan menjadi 2. Pada kode diatas pertama-tama kita memberi nilai
variabel i dengan 1. Kemudian dibawahnya ada kode while yang artinya jika nilai
i lebih kecil sama dengan 10 maka kode yang berada didalam while akan dijalankan.
Karena nilai i adalah 1 maka kode dijalankan yaitu mencetak teks Loop dan nilai
variabel i yaitu 1. Setelah itu kode berikutnya adalah $i++;
yang berarti
nilai i menjadi 2.
Kembali mengecek apakah nilai i (yaitu 2) lebih kecil 10? karena benar maka
kode didalam while dijalankan yaitu mencetak Loop dan nilai variabel i yaitu 2. Setelah itu kode berikutnya adalah
$i++;
yang berarti
nilai i menjadi 3. Begitu seterusnya hingga nilai i betambah terus sampai
ekspresi while salah (yaitu saat nilai i tidak lebih kecil dari 10) dan kode
didalam tidak dijalankan.
Perlu di ingat apabila kita tidak memasang kode
$i++;
maka nilai i akan selalu 1 tidak
bertambah sehingga kondisi i lebih kecil selalu tercapai dan pengulangan tidak
berhenti. Hal ini akan membuat sistem berhenti bekerja, karena terus melakukan
pengulangan. Pengulangan (for)
Perintah for digunakan untuk mengulang perintah dengan jumlah pengulangan
yang sudah diketahui. Pada perintah for anda tidak perlu menuliskan kondisi
untuk diuji. Anda hanya menuliskan nilai awal dan akhir variabel penghitung.
Nilai variabel penghitung ini akan bertambah atau berkurang setiap kali sebuah
pengulangan dilakukan. Karena itu pengulangan yang tidak berhenti (seperti dalam
kasus while) tidak akan terjadi. Diagram kodenya seperti ini:
for ( variable awal; ekspresi; variabel increment/decrement )
{
// Kode yang dijalankan
}
Ekspresi pertama merupakan variabel awal / nilai awal, sedangkan yang kedua
merupakan kondisi yang harus dicapai agar pengulangan dilakukan, sedangkan yang
ketiga merupakan peningkatan/penurunan nilai variabel. Contoh diatas yang
menggunakan while jika kita menggunakan for akan seperti ini:
<? for ($i=1; $i<=10; $i++) { echo "Loop $i<br>"; } ?>
Hasil:
Loop 1
Loop 2
Loop 3
Loop 4
Loop 5
Loop 6
Loop 7
Loop 8
Loop 9
Loop 10
Loop 2
Loop 3
Loop 4
Loop 5
Loop 6
Loop 7
Loop 8
Loop 9
Loop 10
Fungsi
Fungsi merupakan sekumpulan kode yang dapat kita panggil kembali. Ketika
dipanggil maka kode-kode didalam fungsi tersebut akan dijalankan. Dengan
menggunakan fungsi, program akan lebih mudah dibaca dan kita tidak perlu menulis
kode yang sama berkali-kali. Kita dapat mengirimkan nilai variabel kedalam
fungsi dan ketika fungsi selesai dijalankan nilai variabel tersebut dapat kita
ambil kembali. Oke untuk lebih jelasnya, misalkan kita memiliki kode PHP seperti
ini:
<? $i=7; $a=9; $x=$i+$a; print "$x<br>"; $i=7; $a=9; $x=$i+$a; print "$x<br>"; $i=7; $a=9; $x=$i+$a; print "$x<br>"; $i=7; $a=9; $x=$i+$a; print "$x<br>"; $i=7; $a=9; $x=$i+$a; print "$x<br>"; ?>
Jika kita menulis kode tersebut, kita telah membuang-buang waktu karena kita
menulis kode yang sama sebanyak 5 kali. Jika kita menggunakan
function()
maka kita
cukup menulisnya sekali saja, dan sisanya tinggal memanggil fungsi tersebut. Oke
sekarang kita coba buat kode diatas menggunakan fungsi:<? function myfunction() { $i=7; $a=9; $x=$i+$a; print "$x<br>"; } myfunction(); myfunction(); myfunction(); myfunction(); ?>
Kita membuat fungsi dengan nama myfunction, kita bebas memberikan nama untuk
fungsi yang kita buat. Didalam fungsi myfunction terdapat sekumpulan kode. Nah
untuk memanggil fungsi myfunction kita cukup menulis nama fungsinya saja yaitu
myfunction();
Anda juga dapat mengirim variabel kedalam sebuah fungsi. Misal anda memiliki
kode seperti dibawah ini yang dibuat tanpa fungsi:
<? $i=1; $j=2; $x=$i+$j; print "$x<br>"; $i=3; $j=4; $x=$i+$j; print "$x<br>"; $i=5; $j=6; $x=$i+$j; print "$x<br>"; $i=7; $j=8; $x=$i+$j; print "$x<br>"; ?>
Seperti yang anda lihat pada kode diatas sama semua hanya saja nilai
variabelnya berbeda, kita dapat membuat fungsi dimana nilai variabelnya bisa
kita masukkan. Seperti ini kodenya jika kode diatas dibuat menggunakan fungsi:
<? function anotherfunction($i,$j) { $x=$i+$j; echo "$x<br>"; } anotherfunction(1,2); anotherfunction(3,4); anotherfunction(5,6); anotherfunction(7,8); ?>
function anotherfunction($i,$j)
. $i
dan $j
adalah variabel yang memiliki nilai 1 dan 2 ketika kita memanggil fungsi
anotherfunction(1,2)
Jika kita memiliki fungsi:
function add($i,$j) {
...
}
Dan anda memanggil fungsi tersebut dengan
add(1,2);
maka nilai $i
didalam fungsi tersebut adalah 1 dan nilai $j
adalah 2.
Jika anda memiliki fungsi:
function substract($i,$j,$k) {
...
}
Dan anda memanggil fungsi
substract(5,6,8);
maka nilai $i
= 5, $j
= 6
dan $k
= 8. Sekarang jika anda
memanggil fungsi seperti ini:$x=10;
substract(8,9,$x);
maka
$i=8
, $j=9
dan $k=10
.
Bagaimana? sebelum anda lanjut akan lebih baik jika anda pahami betul
mengenai fungsi, karena semakin besar kode PHP yang anda buat maka semakin
banyak fungsi yang akan anda gunakan. Anda bisa saja membuat kode PHP tanpa
fungsi, tetapi seperti yang saya bilang dengan fungsi anda bisa menghemat
penulisan kode yang berulang-ulang.
Forms
Didalam dunia World Wide Web, form HTML merupakan tempat dimana kita bisa
mengirimkan informasi dari pengguna ke server. PHP didesain agar dapat bekerja
dan menerima informasi dari form HTML. Oke sekarang cobalah kode berikut ini dan
simpan dengan nama form.php:
<form action="result.php" method="POST"> Name: <input type="text" name="myname" size="20"><br> Address: <input type="text" name="myaddress" size="40"><br> <input type="submit" name="submit" value="Send"> </form>
Sekarang tuliskan kode dibawah ini dan simpan dengan nama result.php:
<? print "Selamat Datang, $myname.<br>"; print "Alamat anda adalah $myaddress"; ?>
Jika anda buka result.php maka isi dari variabel
$myname
dan $myaddress
kosong, karena memang belum anda
deklarasikan isinya. Tetapi jika anda membuka file form.php terdapat text
field dengan nama "myname" dan "myaddress". Nah nama textfield ini akan menjadi
nama variabel apabila kita mengirimkannya ke PHP. Buka form.php dan coba anda
isi text nama dan alamat. Ketika tombol diklik maka variabel tersebut akan
dikirim ke file post.php. Dan file post.php akan menerimanya dan menampilkannya.
Anda dapat mengirim nilai variabel tersebut ke file itu sendiri. Metode ini
biasanya yang paling sering digunakan. Untuk mengirim variabel ke file dirinya
sendiri ubah saja form action ke
<?=$PHP_SELF?>
. Cobalah kode
dibawah ini dan simpan dengan nama self.php:<html> <head> </head> <body> <? If ($ok) { print "Selamat Datang, $myname.<br>"; print "Alamat anda adalah $myaddress<br>"; } ?> <form action="<?$PHP_SELF?>" method="POST"> Name: <input type="text" name="myname" size="20"><br> Address: <input type="text" name="myaddress" size="40"><br> <input type="submit" name="ok" value="Send"> </form> </body> </html>
Beberapa fungsi built in PHP
PHP memiliki buanyak fungsi didalamnya. Buanyak bukan banyak, karena memang
sangat banyak. Anda dapat membaca semua fungsinya di manual PHP. Belum lagi
class-class yang tersebar di internet. Dijamin anda akan menemukan apa yang anda
butuhkan. Oke, kembali ke fungsi. Saya akan menerangkan 3 fungsi dalam PHP yaitu
date()
, strlen()
dan substr()
.
Fungsi
date()
digunakan untuk menampilkan tanggal dari server. Kita bisa
mengatur hasil tampilan dari
date()
sesuka hati kita. Inilah kode-kode yang digunakan untuk
menampilkan format
date()
:Format | Deskripsi | Hasil |
a | 'am' atau 'pm' huruf kecil | pm |
A | 'AM' atau 'PM' huruf besar | PM |
d | Tanggal (dengan angka diawali dengan 0) | 20 |
D | Hari (3 huruf) | Thu |
F | Bulan | January |
Jam (format 12 jam - diawali dengan 0) | 03 | |
H | Jam (format 24 jam - diawali dengan 0) | 20 |
g | Jam (format 12 jam - tanpa 0) | 3 |
G | Jam (format 24 jam - tanpa 0) | 20 |
i | Menit | 47 |
j | Tanggal (tanpa 0) | 3 |
1 | Hari | Thursday |
L | Melompati tahun ('1' untuk ya, '0' untuk no) | 1 |
m | Bulan (angka - diawali dengan 0) | 01 |
M | Bulan (3 huruf) | Jan |
n | Bulan (angka - tanpa 0) | 1 |
s | Detik | 24 |
U | Time stamp | 1142743213 |
y | Tahun (2 digit) | 06 |
Y | Tahun (4 digit) | 2006 |
z | Jumlah hari dalam setahun (0-365) | 19 |
Z | Waktu dari GMT | 0 |
Contoh:
<? print "Today is "; print date("j of F Y, \a\\t g.i a"); ?>
Hasil:
Today is 11 of October 2007, at 11.42 am
Bagaimana? mudah bukan untuk menampilkan tanggal pada PHP,
sekarang kita pelajari
strlen()
strlen()
digunakan untuk mengetahu panjang dari
string atau jumlah karakter dalam string. strlen()
memerlukan
masukan berupa string dan akan mengembalikan nilai yang merupakan jumlah
karakter dalam string tersebut.substr()
digunakan untuk memotong suatu string
dengan menentukan posisi karakter awal dan jumlah karakter yang akan dipotong.
Daripada bingung cobalah kode berikut ini:<? $text="Computer"; print strlen("$text"); print "<br>"; print substr("$text",3); print "<br>"; print substr("$text",3,3); ?>
Hasil:
8
puter
put
Bagaimana? mudah kan. Semua yang telah anda baca, mulai dari
menginstall hingga bagian ini merupakan dasar-dasar dari PHP dan masih banyak
lagi yang harus dipelajari. Tetapi karena anda telah mengetahui dasarnya, maka
tidak akan terlalu sulit apabila anda ingin mempelajari PHP lebih dalam lagi.
Kamis, 16 Februari 2012
coding pendaftran with Borland
object frmpendaftaran: Tfrmpendaftaran
Left = 58
Top = 83
Width = 924
Height = 612
Caption = '.:: SMAN 1 SOREANG ::.'
Color = clMedGray
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 24
Top = 168
Width = 129
Height = 22
Caption = 'No pendaftaran'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -19
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 384
Top = 168
Width = 68
Height = 22
Caption = 'Tanggal'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -19
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 272
Top = 112
Width = 297
Height = 42
Caption = 'Form Pendaftaran'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -37
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object SpeedButton2: TSpeedButton
Left = 448
Top = 320
Width = 23
Height = 22
end
object Label12: TLabel
Left = 656
Top = 168
Width = 62
Height = 22
Caption = 'C A R I'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -19
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object DateTimePicker1: TDateTimePicker
Left = 592
Top = 168
Width = 25
Height = 21
Date = 40901.482018946760000000
Time = 40901.482018946760000000
TabOrder = 0
OnChange = DateTimePicker1Change
end
object edno: TEdit
Left = 192
Top = 168
Width = 177
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object Panel6: TPanel
Left = 0
Top = 0
Width = 905
Height = 89
Color = clLime
TabOrder = 2
object Panel: TPanel
Left = 424
Top = 8
Width = 433
Height = 73
BevelOuter = bvNone
Color = clLime
TabOrder = 0
object LBFONT: TLabel
Left = 72
Top = 22
Width = 340
Height = 44
Caption = 'SMAN 1 SOREANG'
Color = clLime
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -37
Font.Name = 'Beurk'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
end
end
object GroupBox1: TGroupBox
Left = 16
Top = 208
Width = 353
Height = 337
Caption = 'Data Siswa'
Color = clAppWorkSpace
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 3
object Label3: TLabel
Left = 24
Top = 30
Width = 34
Height = 15
Caption = 'Nama'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 24
Top = 54
Width = 73
Height = 15
Caption = 'Tempat_lahir'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 24
Top = 86
Width = 76
Height = 15
Caption = 'Tanggal_lahir'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 24
Top = 118
Width = 39
Height = 15
Caption = 'Agama'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 24
Top = 150
Width = 81
Height = 15
Caption = 'Jenis_kelamin'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 24
Top = 182
Width = 81
Height = 15
Caption = 'Alamat_rumah'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 24
Top = 246
Width = 75
Height = 15
Caption = 'Asal_sekolah'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 24
Top = 278
Width = 64
Height = 15
Caption = 'No_telepon'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object edtanggal: TEdit
Left = 169
Top = 86
Width = 121
Height = 21
CharCase = ecUpperCase
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object DateTimePicker2: TDateTimePicker
Left = 290
Top = 86
Width = 24
Height = 21
Date = 39182.936152523150000000
Time = 39182.936152523150000000
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnChange = DateTimePicker2Change
end
object ednama: TEdit
Left = 168
Top = 20
Width = 177
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object edtmp: TEdit
Left = 168
Top = 52
Width = 121
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
object cbagama: TComboBox
Left = 168
Top = 116
Width = 145
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 13
ParentFont = False
TabOrder = 4
end
object cbjk: TComboBox
Left = 168
Top = 148
Width = 145
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 13
ParentFont = False
TabOrder = 5
end
object edalm: TEdit
Left = 24
Top = 204
Width = 305
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
end
object edtlp: TEdit
Left = 168
Top = 276
Width = 121
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
end
object edasal: TEdit
Left = 168
Top = 244
Width = 121
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
end
end
object GroupBox2: TGroupBox
Left = 384
Top = 320
Width = 521
Height = 225
Caption = 'Data OrangTua'
Color = clAppWorkSpace
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 4
object Label18: TLabel
Left = 23
Top = 30
Width = 57
Height = 14
Caption = 'Nama_ayah'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 22
Top = 62
Width = 77
Height = 14
Caption = 'Pekerjaan_ayah'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label20: TLabel
Left = 24
Top = 102
Width = 47
Height = 14
Caption = 'Nama_ibu'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label21: TLabel
Left = 23
Top = 134
Width = 67
Height = 14
Caption = 'Pekerjaan_ibu'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label22: TLabel
Left = 19
Top = 158
Width = 58
Height = 14
Caption = 'Alamat_ortu'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label23: TLabel
Left = 22
Top = 190
Width = 61
Height = 14
Caption = 'No_telp_ortu'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object SbCetak: TSpeedButton
Left = 336
Top = 16
Width = 177
Height = 41
Caption = 'Cetak Data Pendaftaran'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
ParentFont = False
OnClick = SbCetakClick
end
object SbKeluar: TSpeedButton
Left = 336
Top = 104
Width = 177
Height = 41
Caption = '&Keluar'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333FFF3333F333333300033339333333337773F33733333330008033
933333333737F7F37333333307078733333933337337373F3337333077088803
33933337F37F337F3373333077088803393333F7337FF37F3733300777008803
9333377F33773F7F733307088808087333337F7F337F7F7F3FFF070777080873
99997F7F337F7F7F77770808880808733333737F337F737F3F33300888008803
93333773F377337F73F333308807880339333337F37F337F373F333088077803
339333373F73F37333733333087777333339333373F7F7F33F37333330807033
933333333737F73373F333333300033339333333337773333733}
NumGlyphs = 2
ParentFont = False
OnClick = SbKeluarClick
end
object SbTabelDaftar: TSpeedButton
Left = 336
Top = 64
Width = 177
Height = 33
Caption = '&Tabel Pendaftaran'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
OnClick = SbTabelDaftarClick
end
object EdTlpOrtu: TEdit
Left = 136
Top = 188
Width = 121
Height = 21
TabOrder = 0
end
object EdAlmOrtu: TEdit
Left = 136
Top = 156
Width = 353
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object EdIbu: TEdit
Left = 136
Top = 92
Width = 153
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object EdAyah: TEdit
Left = 136
Top = 28
Width = 153
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
object CbKerja: TComboBox
Left = 136
Top = 56
Width = 153
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 13
ParentFont = False
TabOrder = 4
end
object CbKerjaIbu: TComboBox
Left = 136
Top = 120
Width = 145
Height = 21
ItemHeight = 13
TabOrder = 5
end
end
object Panel5: TPanel
Left = 0
Top = 545
Width = 905
Height = 65
Align = alBottom
Color = clLime
TabOrder = 5
object lblteks: TLabel
Left = 152
Top = 25
Width = 609
Height = 32
AutoSize = False
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -24
Font.Name = 'Cooper Black'
Font.Style = [fsBold]
ParentFont = False
end
end
object Panel1: TPanel
Left = 672
Top = 208
Width = 233
Height = 105
Color = clAppWorkSpace
TabOrder = 6
object SbTambah: TSpeedButton
Left = 8
Top = 16
Width = 105
Height = 33
Caption = '&Tambah'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
00333377737FFFFF773333303300000003333337337777777333}
NumGlyphs = 2
ParentFont = False
OnClick = SbTambahClick
end
object SbBatal: TSpeedButton
Left = 8
Top = 64
Width = 105
Height = 33
Caption = '&Batal'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
333333333333337FF3333333333333903333333333333377FF33333333333399
03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
3333777777333333333333333333333333333333333333333333}
NumGlyphs = 2
ParentFont = False
OnClick = SbBatalClick
end
object SbHapus: TSpeedButton
Left = 120
Top = 64
Width = 105
Height = 33
Caption = '&Hapus'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B5555555555555575}
NumGlyphs = 2
ParentFont = False
OnClick = SbHapusClick
end
object SbSimpan: TSpeedButton
Left = 120
Top = 16
Width = 105
Height = 33
Caption = '&Simpan'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
5990555555555555577755555555555555555555555555555555}
NumGlyphs = 2
ParentFont = False
OnClick = SbSimpanClick
end
end
object EdTglDaftar: TEdit
Left = 472
Top = 168
Width = 121
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
end
object EdCari: TEdit
Left = 752
Top = 168
Width = 153
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnKeyPress = EdCariKeyPress
end
object GroupBox3: TGroupBox
Left = 384
Top = 208
Width = 281
Height = 105
Caption = 'Jalur Pendaftaran'
Color = clAppWorkSpace
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 9
object Label13: TLabel
Left = 8
Top = 53
Width = 76
Height = 15
Caption = 'Jalur Prestasi'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 160
Top = 21
Width = 54
Height = 15
Caption = 'Nilai NEM'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -12
Font.Name = 'Beurk'
Font.Style = []
ParentFont = False
end
object edNem: TEdit
Left = 160
Top = 36
Width = 105
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnExit = edNemExit
end
object CbJalur: TComboBox
Left = 8
Top = 20
Width = 137
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 13
ParentFont = False
TabOrder = 1
end
object edprestasi: TEdit
Left = 8
Top = 72
Width = 105
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnExit = edprestasiExit
end
object edhasil: TEdit
Left = 128
Top = 73
Width = 145
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
end
object Timer1: TTimer
Interval = 1
OnTimer = Timer2Timer
Left = 32
Top = 56
end
object Timer2: TTimer
Interval = 1
OnTimer = Timer1Timer
Left = 104
Top = 40
end
end
Langganan:
Postingan (Atom)