welcome to adhit8 blog's

Power Pivot pada Ms Excel 2010

2011-11-04T01:06:00.000-07:00

Tahukah kamu tentang Ms Excel?

Microsoft Excel adalah suatu software canggih untuk menampilkan data-data yang dibutuhkan sebagai bahan pelaporan dan analisis baik itu berupa tabel, grafik, pivot, dan sebagainya. Tampilannya berupa tabel layaknya tabel pada database. Namun, Ms Excel bukanlah suatu database seperti Oracle, MySQL, Ms SQL Server, firebird, PostgreSQL, dan lain-lain. Karena Ms Excel sendiri masih memiliki keterbatasan dalam mengelola data-data yang sifatnya kompleks dan besar. Jadi, fungsi dari Ms Excel ini hanya sebatas menyajikan data-data yang dibutuhkan.

Begitu banyak fitur-fitur yang disediakan oleh Ms Excel untuk mengolah data-data yang ada. Ms Excel 2010 merupakan generasi excel yang sangat powerfull. Anda bisa menampung data-data yang jumlahnya hingga milyaran data setiap sheet-nya. Ini sungguh software yang sangat disarankan untuk digunakan pada perusahaan-perusahaan yang memiliki ekspektasi tinggi terhadap penggunaan data-data dan menyajikannya dalam bentuk laporan yang bisa dibuka kapan pun selama kita meng-intsall software ini di PC kita. Sekarang Ms Excel 2010 sudah bisa melakukan analisis terhadap data-data yang diberikan dengan menambahkan komponen tambahan yaitu data mining. Selain melakukan analisis, kita bisa menarik data-data dari database lain menggunakan komponen power pivot. Komponen-komponen tersebut free untuk digunakan selama Anda menggunakan Ms Excel 2010 yang orisinal. Untuk artikel ini, saya akan membahas lebih dalam mengenai komponen tambahan power pivot pada Ms Excel 2010.

Komponen Tambahan Power Pivot pada Ms Excel

Komponen tambahan ini hanya bisa bekerja maksimal pada Ms Excel 2010. Power pivot merupakan alat untuk menganalisis suatu data yang memberikan kekuatan komputasi yang canggih secara langsung kepada pengguna. Anda juga dapat mengubah jumlah massa data dengan kecepatan yang signifikan yang menjadikannya informasi yang bermakna untuk mendapatkan jawaban yang dibutuhkan. PowerPivot bahkan dapat membantu departemen IT meningkatkan efisiensi operasional melalui SharePoint yang memfasilitasi suatu fitur untuk berbagi dan berkolaborasi sebagai suatu solusi self-service BI pada pengguna. Anda bisa mengunduh aplikasi tersebut disini. Disana telah tersedia pilihan aplikasi yang bisa diunduh sesuai dengan arsitektur pada komputer Anda, apakah 32 bit atau 64 bit. Berikut ini persyaratan sistem yang harus dipenuhi :

Sistem Operasi yang mendukung aplikasi ini adalah Windows 7, Windows Server 2008 R2 (64-bit), Windows XP with SP3 (32-bit), Windows Vista with SP2 (32-bit or 64-bit)*, Windows Server 2008 with SP2 (32-bit or 64-bit)*, Windows Server 2003 R2 (32-bit or 64-bit) diinstal dengan MSXML 6.0 , Terminal Server dan Windows on Windows (WOW)
Prosesor 500 MHz keatas 32-bit atau 64-bit
Sangat disarankan memori dengan ukuran 2 GB RAM keatas
HDD yang tersedia minimal 3.5 GB
Koneksi internet

Waw...cukup besar juga persyaratan yang harus disediakan untuk dapat menggunakan komponen tambahan ini pada Ms Excel 2010.

Instalasi Power Pivot pada Ms Excel

Klik aplikasi yang telah diunduh tadi sehingga muncul tampilan berikut ini :

Klik tombol "Next" sehingga muncul tampilan berikut :

Pilih "accept the terms in the license agreement" kemudian klik tombol "Next" sehingga muncul seperti tampilan di bawah ini :

Isi field berdasarkan gambar di atas, kemudian klik tombol "Next" sehingga muncul seperti tampilan di bawah ini :

Klik install untuk melanjutkan proses. Hal ini membutuhkan koneksi ke internet. jika ada kotak dialog muncul dan mengharuskan Anda untuk menginstal sesuatu ke internet tekan tombol "Yes" sehingga proses instalasi akan berjalan seperti gambar dibawah ini :

Instalasi telah selesai, klik tombol "Finish" kemudian Restart Ms Excel 2010 Anda jika telah membukanya atau buka baru Ms Excel 2010 Anda. Akan ada kotak dialog seperti di bawah ini :

Klik saja tombol "Install" tunggu hingga Add-In Power Pivot muncul pada Ms Excel 2010 Anda. Perhatikan gambar di bawah ini :

Tampilan Power Pivot pada Ms Excel 2010

Power Pivot dapat melakukan penarikan data ke berbagai sumber data yang ada. Baik itu Ms SQL Server, Ms Access, Ms Reporting Service report, Informix, IBM DB2, Text File, dan lain-lain. Ini layaknya sebuah software untuk menjalankan query yang ada untuk mengakses ke tabel pada database yang dituju.

Contoh Penarikan Data pada Ms Sql Server

Pada menu ribbon pilih menu "From Database", kemudian pilih "From SQL Server". Lihat gambar di bawah ini :

Sesuai gambar di atas, isi teks field "Server name" dan pilih "Database name". Untuk autentikasi tergantung setting pada database Ms Sql. Cobalah untuk melakukan tes koneksi terlebih dahulu. Jika muncul kotak dialog dengan pesan "Test connection succeeded", maka koneksi ke database berhasil dilakukan. Klik tombol "Next" sehingga muncul tampilan di bawah ini :

Untuk menarik data dengan melakukan query pilih "Write a query that will specify the data to import" lalu klik tombol "Next". Lihat gambar di bawah ini :

Pada gambar di atas, Friendly Query Name merupakan judul sheet pada excel power pivot sehingga memudahkan pengguna dalam mengidentifikasi hasil query yang telah dijalankan nantinya. Untuk melakukan simulasi penarikan, klik tombol "Design" sehingga muncul tampilan sebagai berikut :

Untuk melakukan query secara manual klik "Edit as Task", sedangkan untuk mengambil query dari file bisa klik "Import"

Untuk menjalankan query klik tanda seru yang berwarna merah. Jika Anda sudah mantap dengan hasil query Anda, maka klik tombol "OK". Maka, akan kembali pada gambar no. 3. Lalu script query Anda akan tampil, setelah itu klik "Finish". Tunggulah beberapa saat hingga hasil query Anda muncul pada halaman excel power pivot.

Instalasi Power Pivot pada Ms SQL Server 2008 R2

Klik file instalasi Ms SQL Server 2008 R2 lalu pilih "Installation" pada menu bar disamping sehingga muncul seperti gambar di bawah ini :

Pilih menu "New installation or add features to an exsisting installation" sehingga muncul seperti gambar di bawah ini :

Klik tombol "OK" untuk melanjutkan

Klik tombol "Install" untuk memulai instalasi

Klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Pilih "New istallation or add shared features" lalu klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Centang "I accept the license term" lalu klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Pilih "SQL Server PowerPivot for Sharepoint". Jangan lupa pada label "Add PowerPivot for Sharepoint to" pilih "existing farm". Klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Isi username dan password yang sesuai. Jika Anda salah menginputkan username dan password maka instalasi tidak bisa dilanjutkan. Setelah berhasil, klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Jika Anda masih ingin menambahkan autentikasi buat user baru lainnya, silakan ditambahkan pada form di atas. Setelah selasi menambahkan user, klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Klik tombol "Next" sehingga muncul seperti tampilan pada gambar di bawah ini :

Klik tombol "Install" sehingga muncul seperti tampilan pada gambar di bawah ini :

Klik tombol "Close", instalasi Powerpivot pada Ms SQL Server R2 untuk Sharepoint telah selesai.

Integrasi PowerPivot dengan Ms Sharepoint 2010

Pada server sharepoint anda klik menu start, klik All Programs, pilih Microsoft Sharepoint 2010 Products. Di dalamnya terdapat Sharepoint 2010 Central Administration, kemudian klik sehingga muncul seperti gambar di bawah ini :

Pada Quick Launch Menu di sebelah kiri, pilih Application Management sehingga muncul tampilan seperti pada gambar di bawah ini :

Pada section Service Applications, pilih Manage Services on Server sehingga muncul tampilan seperti pada gambar di bawah ini :

Pastikan service power pivot telah

Namun, menurut saya penggunaan power pivot ini tidak sepraktis editor tools lainnya untuk menarik data dari database. Ada beberapa kekurangan yang saya temukan ketika menggunakan komponen power pivot ini. Berikut keterangannya :

Kita tidak bisa memilih query mana yang akan kita execute dengan mem-block baris query yang kita inginkan. Query akan dibaca secara keseluruhan sesuai yang ditampilkan di text editor query.
Tidak ada petunjuk waktu mengenai berapa lama waktu yang ditempuh untuk mendapatkan hasil quaery di-execute tadi
Tidak bisa melakukan multitasking dalam menjalankan query. Dalam 1 file excel hanya bisa menjalankan 1 proses query saja.
Tidak bisa otomatis mendeteksi letak error pada script, harus di-tracking secara manual jika muncul pernyataan error

Create User dengan TOAD

2011-07-09T22:19:00.000-07:00

Dalam Oracle tidak ada istilah membuat database baru, melainkan membuat user baru sebagai alias untuk nama database-nya. Perhatikan langkah-langkah di bawah ini :

Buka aplikasi TOAD, dan masuk sebagai user SYS.Perhatikangambar berikut :

Lalu klik tombol Connect. Jika berhasil maka Anda akan masuk sebagai user SYS. Pada menu toolbar yang ada di atas, pilih scheme browse sehingga akan muncul tampilan seperti gambar berikut :

Pilih Users pada tab menu yang ada seperti gambar di atas, lalu pilih icon bergambar kertas putih di bawahnya yang berlabelkan Create User/New. Maka akan muncul seperti tampilan berikut :

Setelah mengisi field sesuai contoh pada gambar di atas, selanjutnya klik tab menu Tablespace seperti gambar berikut :

Isi field sesuai contoh di atas. Lalu lanjut pada tab menu Roles seperti gambar berikut :

Centang semua dengan meng-klik Default All. Kemudian lanjut klik pada tab menu System Previllages. Lihat gambar berikut :

Centang semua dengan meng-klik Admin All. Kemudian klik tombol Ok di bawahnya. User baru telah berhasil dibuat. Perhatikan penambahannya pada gambar berikut ini :

Setelah mengikuti semua proses di atas, Anda telah berhasil membuat user baru pada aplikasi TOAD. Sekian!

Membuat Halaman Navigasi pada Datagrid di ASP .NET dan C#

2011-07-09T22:04:00.000-07:00

Untuk membuat tabel seperti gambar di atas, biasanya pada ASP .NET menggunakan komponen datagrid atau viewgrid. Saya akan menjelaskan secara lengkap urutan pembuatannya mulai dari desain dan code-nya. Dalam hal ini, saya masih menggunakan tools developer Ms Visual Studio Team Suite 2008. Agar tabel berisi data-data yang memiliki banyak record, maka data-data tersebut diambil dari tabel yang ada dalam database. Dalam hal ini, saya menggunakan Oracle 10g XE sebagai database-nya. Perhatikan dengan seksama setiap langkah-langkah di bawah ini :

Langkah #1, membuat database

Buatlah user baru terlebih dahulu dengan nama TEST. Untuk lebih jelasnya, baca artikel saya tentang CREATE USER dengan TOAD.
Setelah berhasil membuat user baru dengan nama TEST, log out user SYS dan kembali login dengan user baru tersebut yaitu TEST. Jangan lupa pilih connect as Normal bukan SYSDBA karena ASP .NET sulit melakukan koneksi dengan user id yang melakukan koneksi sebagai SYSDBA.
Kita akan membuat data tentang negara, maka buatlah terlebih dahulu tabel negara kemudian inputkan datanya melalui query. Saya telah menyediakan query-nya untuk mempersingkat waktu Anda. Silakan download sql-nya disini.
Jalankan script yang Anda unduh tadi pada layar TOAD Anda, dan jangan lupa untuk melakukan commit setelah Anda melakukan Run program. Tabel Countries telah berhasil dibuat.

Jika Anda tidak mau mengunduh file query-nya, bisa copy paste query di bawah ini :

CREATE TABLE tb_countries 
(
    id_countries INT PRIMARY KEY NOT NULL,
    country_code char(2) NOT NULL,
    country_name varchar(100) NOT NULL
); 

BEGIN
INSERT INTO tb_countries VALUES (1, 'US', 'United States');
INSERT INTO tb_countries VALUES (2, 'CA', 'Canada');
INSERT INTO tb_countries VALUES (3, 'AF', 'Afghanistan');
INSERT INTO tb_countries VALUES (4, 'AL', 'Albania');
INSERT INTO tb_countries VALUES (5, 'DZ', 'Algeria');
INSERT INTO tb_countries VALUES (6, 'DS', 'American Samoa');
INSERT INTO tb_countries VALUES (7, 'AD', 'Andorra');
INSERT INTO tb_countries VALUES (8, 'AO', 'Angola');
INSERT INTO tb_countries VALUES (9, 'AI', 'Anguilla');
INSERT INTO tb_countries VALUES (10, 'AQ', 'Antarctica');
INSERT INTO tb_countries VALUES (11, 'AG', 'Antigua and/or Barbuda');
INSERT INTO tb_countries VALUES (12, 'AR', 'Argentina');
INSERT INTO tb_countries VALUES (13, 'AM', 'Armenia');
INSERT INTO tb_countries VALUES (14, 'AW', 'Aruba');
INSERT INTO tb_countries VALUES (15, 'AU', 'Australia');
INSERT INTO tb_countries VALUES (16, 'AT', 'Austria');
INSERT INTO tb_countries VALUES (17, 'AZ', 'Azerbaijan');
INSERT INTO tb_countries VALUES (18, 'BS', 'Bahamas');
INSERT INTO tb_countries VALUES (19, 'BH', 'Bahrain');
INSERT INTO tb_countries VALUES (20, 'BD', 'Bangladesh');
INSERT INTO tb_countries VALUES (21, 'BB', 'Barbados');
INSERT INTO tb_countries VALUES (22, 'BY', 'Belarus');
INSERT INTO tb_countries VALUES (23, 'BE', 'Belgium');
INSERT INTO tb_countries VALUES (24, 'BZ', 'Belize');
INSERT INTO tb_countries VALUES (25, 'BJ', 'Benin');
INSERT INTO tb_countries VALUES (26, 'BM', 'Bermuda');
INSERT INTO tb_countries VALUES (27, 'BT', 'Bhutan');
INSERT INTO tb_countries VALUES (28, 'BO', 'Bolivia');
INSERT INTO tb_countries VALUES (29, 'BA', 'Bosnia and Herzegovina');
INSERT INTO tb_countries VALUES (30, 'BW', 'Botswana');
INSERT INTO tb_countries VALUES (31, 'BV', 'Bouvet Island');
INSERT INTO tb_countries VALUES (32, 'BR', 'Brazil');
INSERT INTO tb_countries VALUES (33, 'IO', 'British lndian Ocean Territory');
INSERT INTO tb_countries VALUES (34, 'BN', 'Brunei Darussalam');
INSERT INTO tb_countries VALUES (35, 'BG', 'Bulgaria');
INSERT INTO tb_countries VALUES (36, 'BF', 'Burkina Faso');
INSERT INTO tb_countries VALUES (37, 'BI', 'Burundi');
INSERT INTO tb_countries VALUES (38, 'KH', 'Cambodia');
INSERT INTO tb_countries VALUES (39, 'CM', 'Cameroon');
INSERT INTO tb_countries VALUES (40, 'CV', 'Cape Verde');
INSERT INTO tb_countries VALUES (41, 'KY', 'Cayman Islands');
INSERT INTO tb_countries VALUES (42, 'CF', 'Central African Republic');
INSERT INTO tb_countries VALUES (43, 'TD', 'Chad');
INSERT INTO tb_countries VALUES (44, 'CL', 'Chile');
INSERT INTO tb_countries VALUES (45, 'CN', 'China');
INSERT INTO tb_countries VALUES (46, 'CX', 'Christmas Island');
INSERT INTO tb_countries VALUES (47, 'CC', 'Cocos (Keeling) Islands');
INSERT INTO tb_countries VALUES (48, 'CO', 'Colombia');
INSERT INTO tb_countries VALUES (49, 'KM', 'Comoros');
INSERT INTO tb_countries VALUES (50, 'CG', 'Congo');
INSERT INTO tb_countries VALUES (51, 'CK', 'Cook Islands');
INSERT INTO tb_countries VALUES (52, 'CR', 'Costa Rica');
INSERT INTO tb_countries VALUES (53, 'HR', 'Croatia (Hrvatska)');
INSERT INTO tb_countries VALUES (54, 'CU', 'Cuba');
INSERT INTO tb_countries VALUES (55, 'CY', 'Cyprus');
INSERT INTO tb_countries VALUES (56, 'CZ', 'Czech Republic');
INSERT INTO tb_countries VALUES (57, 'DK', 'Denmark');
INSERT INTO tb_countries VALUES (58, 'DJ', 'Djibouti');
INSERT INTO tb_countries VALUES (59, 'DM', 'Dominica');
INSERT INTO tb_countries VALUES (60, 'DO', 'Dominican Republic');
INSERT INTO tb_countries VALUES (61, 'TP', 'East Timor');
INSERT INTO tb_countries VALUES (62, 'EC', 'Ecudaor');
INSERT INTO tb_countries VALUES (63, 'EG', 'Egypt');
INSERT INTO tb_countries VALUES (64, 'SV', 'El Salvador');
INSERT INTO tb_countries VALUES (65, 'GQ', 'Equatorial Guinea');
INSERT INTO tb_countries VALUES (66, 'ER', 'Eritrea');
INSERT INTO tb_countries VALUES (67, 'EE', 'Estonia');
INSERT INTO tb_countries VALUES (68, 'ET', 'Ethiopia');
INSERT INTO tb_countries VALUES (69, 'FK', 'Falkland Islands (Malvinas)');
INSERT INTO tb_countries VALUES (70, 'FO', 'Faroe Islands');
INSERT INTO tb_countries VALUES (71, 'FJ', 'Fiji');
INSERT INTO tb_countries VALUES (72, 'FI', 'Finland');
INSERT INTO tb_countries VALUES (73, 'FR', 'France');
INSERT INTO tb_countries VALUES (74, 'FX', 'France, Metropolitan');
INSERT INTO tb_countries VALUES (75, 'GF', 'French Guiana');
INSERT INTO tb_countries VALUES (76, 'PF', 'French Polynesia');
INSERT INTO tb_countries VALUES (77, 'TF', 'French Southern Territories');
INSERT INTO tb_countries VALUES (78, 'GA', 'Gabon');
INSERT INTO tb_countries VALUES (79, 'GM', 'Gambia');
INSERT INTO tb_countries VALUES (80, 'GE', 'Georgia');
INSERT INTO tb_countries VALUES (81, 'DE', 'Germany');
INSERT INTO tb_countries VALUES (82, 'GH', 'Ghana');
INSERT INTO tb_countries VALUES (83, 'GI', 'Gibraltar');
INSERT INTO tb_countries VALUES (84, 'GR', 'Greece');
INSERT INTO tb_countries VALUES (85, 'GL', 'Greenland');
INSERT INTO tb_countries VALUES (86, 'GD', 'Grenada');
INSERT INTO tb_countries VALUES (87, 'GP', 'Guadeloupe');
INSERT INTO tb_countries VALUES (88, 'GU', 'Guam');
INSERT INTO tb_countries VALUES (89, 'GT', 'Guatemala');
INSERT INTO tb_countries VALUES (90, 'GN', 'Guinea');
INSERT INTO tb_countries VALUES (91, 'GW', 'Guinea-Bissau');
INSERT INTO tb_countries VALUES (92, 'GY', 'Guyana');
INSERT INTO tb_countries VALUES (93, 'HT', 'Haiti');
INSERT INTO tb_countries VALUES (94, 'HM', 'Heard and Mc Donald Islands');
INSERT INTO tb_countries VALUES (95, 'HN', 'Honduras');
INSERT INTO tb_countries VALUES (96, 'HK', 'Hong Kong');
INSERT INTO tb_countries VALUES (97, 'HU', 'Hungary');
INSERT INTO tb_countries VALUES (98, 'IS', 'Iceland');
INSERT INTO tb_countries VALUES (99, 'IN', 'India');
INSERT INTO tb_countries VALUES (100, 'ID', 'Indonesia');
INSERT INTO tb_countries VALUES (101, 'IR', 'Iran (Islamic Republic of)');
INSERT INTO tb_countries VALUES (102, 'IQ', 'Iraq');
INSERT INTO tb_countries VALUES (103, 'IE', 'Ireland');
INSERT INTO tb_countries VALUES (104, 'IL', 'Israel');
INSERT INTO tb_countries VALUES (105, 'IT', 'Italy');
INSERT INTO tb_countries VALUES (106, 'CI', 'Ivory Coast');
INSERT INTO tb_countries VALUES (107, 'JM', 'Jamaica');
INSERT INTO tb_countries VALUES (108, 'JP', 'Japan');
INSERT INTO tb_countries VALUES (109, 'JO', 'Jordan');
INSERT INTO tb_countries VALUES (110, 'KZ', 'Kazakhstan');
INSERT INTO tb_countries VALUES (111, 'KE', 'Kenya');
INSERT INTO tb_countries VALUES (112, 'KI', 'Kiribati');
INSERT INTO tb_countries VALUES (113, 'KP', 'Korea, Democratic People''s Republic of');
INSERT INTO tb_countries VALUES (114, 'KR', 'Korea, Republic of');
INSERT INTO tb_countries VALUES (115, 'KW', 'Kuwait');
INSERT INTO tb_countries VALUES (116, 'KG', 'Kyrgyzstan');
INSERT INTO tb_countries VALUES (117, 'LA', 'Lao People''s Democratic Republic');
INSERT INTO tb_countries VALUES (118, 'LV', 'Latvia');
INSERT INTO tb_countries VALUES (119, 'LB', 'Lebanon');
INSERT INTO tb_countries VALUES (120, 'LS', 'Lesotho');
INSERT INTO tb_countries VALUES (121, 'LR', 'Liberia');
INSERT INTO tb_countries VALUES (122, 'LY', 'Libyan Arab Jamahiriya');
INSERT INTO tb_countries VALUES (123, 'LI', 'Liechtenstein');
INSERT INTO tb_countries VALUES (124, 'LT', 'Lithuania');
INSERT INTO tb_countries VALUES (125, 'LU', 'Luxembourg');
INSERT INTO tb_countries VALUES (126, 'MO', 'Macau');
INSERT INTO tb_countries VALUES (127, 'MK', 'Macedonia');
INSERT INTO tb_countries VALUES (128, 'MG', 'Madagascar');
INSERT INTO tb_countries VALUES (129, 'MW', 'Malawi');
INSERT INTO tb_countries VALUES (130, 'MY', 'Malaysia');
INSERT INTO tb_countries VALUES (131, 'MV', 'Maldives');
INSERT INTO tb_countries VALUES (132, 'ML', 'Mali');
INSERT INTO tb_countries VALUES (133, 'MT', 'Malta');
INSERT INTO tb_countries VALUES (134, 'MH', 'Marshall Islands');
INSERT INTO tb_countries VALUES (135, 'MQ', 'Martinique');
INSERT INTO tb_countries VALUES (136, 'MR', 'Mauritania');
INSERT INTO tb_countries VALUES (137, 'MU', 'Mauritius');
INSERT INTO tb_countries VALUES (138, 'TY', 'Mayotte');
INSERT INTO tb_countries VALUES (139, 'MX', 'Mexico');
INSERT INTO tb_countries VALUES (140, 'FM', 'Micronesia, Federated States of');
INSERT INTO tb_countries VALUES (141, 'MD', 'Moldova, Republic of');
INSERT INTO tb_countries VALUES (142, 'MC', 'Monaco');
INSERT INTO tb_countries VALUES (143, 'MN', 'Mongolia');
INSERT INTO tb_countries VALUES (144, 'MS', 'Montserrat');
INSERT INTO tb_countries VALUES (145, 'MA', 'Morocco');
INSERT INTO tb_countries VALUES (146, 'MZ', 'Mozambique');
INSERT INTO tb_countries VALUES (147, 'MM', 'Myanmar');
INSERT INTO tb_countries VALUES (148, 'NA', 'Namibia');
INSERT INTO tb_countries VALUES (149, 'NR', 'Nauru');
INSERT INTO tb_countries VALUES (150, 'NP', 'Nepal');
INSERT INTO tb_countries VALUES (151, 'NL', 'Netherlands');
INSERT INTO tb_countries VALUES (152, 'AN', 'Netherlands Antilles');
INSERT INTO tb_countries VALUES (153, 'NC', 'New Caledonia');
INSERT INTO tb_countries VALUES (154, 'NZ', 'New Zealand');
INSERT INTO tb_countries VALUES (155, 'NI', 'Nicaragua');
INSERT INTO tb_countries VALUES (156, 'NE', 'Niger');
INSERT INTO tb_countries VALUES (157, 'NG', 'Nigeria');
INSERT INTO tb_countries VALUES (158, 'NU', 'Niue');
INSERT INTO tb_countries VALUES (159, 'NF', 'Norfork Island');
INSERT INTO tb_countries VALUES (160, 'MP', 'Northern Mariana Islands');
INSERT INTO tb_countries VALUES (161, 'NO', 'Norway');
INSERT INTO tb_countries VALUES (162, 'OM', 'Oman');
INSERT INTO tb_countries VALUES (163, 'PK', 'Pakistan');
INSERT INTO tb_countries VALUES (164, 'PW', 'Palau');
INSERT INTO tb_countries VALUES (165, 'PA', 'Panama');
INSERT INTO tb_countries VALUES (166, 'PG', 'Papua New Guinea');
INSERT INTO tb_countries VALUES (167, 'PY', 'Paraguay');
INSERT INTO tb_countries VALUES (168, 'PE', 'Peru');
INSERT INTO tb_countries VALUES (169, 'PH', 'Philippines');
INSERT INTO tb_countries VALUES (170, 'PN', 'Pitcairn');
INSERT INTO tb_countries VALUES (171, 'PL', 'Poland');
INSERT INTO tb_countries VALUES (172, 'PT', 'Portugal');
INSERT INTO tb_countries VALUES (173, 'PR', 'Puerto Rico');
INSERT INTO tb_countries VALUES (174, 'QA', 'Qatar');
INSERT INTO tb_countries VALUES (175, 'RE', 'Reunion');
INSERT INTO tb_countries VALUES (176, 'RO', 'Romania');
INSERT INTO tb_countries VALUES (177, 'RU', 'Russian Federation');
INSERT INTO tb_countries VALUES (178, 'RW', 'Rwanda');
INSERT INTO tb_countries VALUES (179, 'KN', 'Saint Kitts and Nevis');
INSERT INTO tb_countries VALUES (180, 'LC', 'Saint Lucia');
INSERT INTO tb_countries VALUES (181, 'VC', 'Saint Vincent and the Grenadines');
INSERT INTO tb_countries VALUES (182, 'WS', 'Samoa');
INSERT INTO tb_countries VALUES (183, 'SM', 'San Marino');
INSERT INTO tb_countries VALUES (184, 'ST', 'Sao Tome and Principe');
INSERT INTO tb_countries VALUES (185, 'SA', 'Saudi Arabia');
INSERT INTO tb_countries VALUES (186, 'SN', 'Senegal');
INSERT INTO tb_countries VALUES (187, 'SC', 'Seychelles');
INSERT INTO tb_countries VALUES (188, 'SL', 'Sierra Leone');
INSERT INTO tb_countries VALUES (189, 'SG', 'Singapore');
INSERT INTO tb_countries VALUES (190, 'SK', 'Slovakia');
INSERT INTO tb_countries VALUES (191, 'SI', 'Slovenia');
INSERT INTO tb_countries VALUES (192, 'SB', 'Solomon Islands');
INSERT INTO tb_countries VALUES (193, 'SO', 'Somalia');
INSERT INTO tb_countries VALUES (194, 'ZA', 'South Africa');
INSERT INTO tb_countries VALUES (195, 'GS', 'South Georgia South Sandwich Islands');
INSERT INTO tb_countries VALUES (196, 'ES', 'Spain');
INSERT INTO tb_countries VALUES (197, 'LK', 'Sri Lanka');
INSERT INTO tb_countries VALUES (198, 'SH', 'St. Helena');
INSERT INTO tb_countries VALUES (199, 'PM', 'St. Pierre and Miquelon');
INSERT INTO tb_countries VALUES (200, 'SD', 'Sudan');
INSERT INTO tb_countries VALUES (201, 'SR', 'Suriname');
INSERT INTO tb_countries VALUES (202, 'SJ', 'Svalbarn and Jan Mayen Islands');
INSERT INTO tb_countries VALUES (203, 'SZ', 'Swaziland');
INSERT INTO tb_countries VALUES (204, 'SE', 'Sweden');
INSERT INTO tb_countries VALUES (205, 'CH', 'Switzerland');
INSERT INTO tb_countries VALUES (206, 'SY', 'Syrian Arab Republic');
INSERT INTO tb_countries VALUES (207, 'TW', 'Taiwan');
INSERT INTO tb_countries VALUES (208, 'TJ', 'Tajikistan');
INSERT INTO tb_countries VALUES (209, 'TZ', 'Tanzania, United Republic of');
INSERT INTO tb_countries VALUES (210, 'TH', 'Thailand');
INSERT INTO tb_countries VALUES (211, 'TG', 'Togo');
INSERT INTO tb_countries VALUES (212, 'TK', 'Tokelau');
INSERT INTO tb_countries VALUES (213, 'TO', 'Tonga');
INSERT INTO tb_countries VALUES (214, 'TT', 'Trinidad and Tobago');
INSERT INTO tb_countries VALUES (215, 'TN', 'Tunisia');
INSERT INTO tb_countries VALUES (216, 'TR', 'Turkey');
INSERT INTO tb_countries VALUES (217, 'TM', 'Turkmenistan');
INSERT INTO tb_countries VALUES (218, 'TC', 'Turks and Caicos Islands');
INSERT INTO tb_countries VALUES (219, 'TV', 'Tuvalu');
INSERT INTO tb_countries VALUES (220, 'UG', 'Uganda');
INSERT INTO tb_countries VALUES (221, 'UA', 'Ukraine');
INSERT INTO tb_countries VALUES (222, 'AE', 'United Arab Emirates');
INSERT INTO tb_countries VALUES (223, 'GB', 'United Kingdom');
INSERT INTO tb_countries VALUES (224, 'UM', 'United States minor outlying islands');
INSERT INTO tb_countries VALUES (225, 'UY', 'Uruguay');
INSERT INTO tb_countries VALUES (226, 'UZ', 'Uzbekistan');
INSERT INTO tb_countries VALUES (227, 'VU', 'Vanuatu');
INSERT INTO tb_countries VALUES (228, 'VA', 'Vatican City State');
INSERT INTO tb_countries VALUES (229, 'VE', 'Venezuela');
INSERT INTO tb_countries VALUES (230, 'VN', 'Vietnam');
INSERT INTO tb_countries VALUES (231, 'VG', 'Virigan Islands (British)');
INSERT INTO tb_countries VALUES (232, 'VI', 'Virgin Islands (U.S.)');
INSERT INTO tb_countries VALUES (233, 'WF', 'Wallis and Futuna Islands');
INSERT INTO tb_countries VALUES (234, 'EH', 'Western Sahara');
INSERT INTO tb_countries VALUES (235, 'YE', 'Yemen');
INSERT INTO tb_countries VALUES (236, 'YU', 'Yugoslavia');
INSERT INTO tb_countries VALUES (237, 'ZR', 'Zaire');
INSERT INTO tb_countries VALUES (238, 'ZM', 'Zambia');
INSERT INTO tb_countries VALUES (239, 'ZW', 'Zimbabwe'); 
end;

SELECT * FROM tb_countries

Langkah #2, Membuat File Project

Sebelum memulai penulisan code script programnya, alangkah baiknya kita membuat suatu file project. Saya membuat suatu solution yang diberi nama TestProject. Kemudian, buat 3 buah project pada solution Testproject tadi yang diberi nama WebApp, BussinessLayer, dan DataAccessLayer. Pada project WebApp tadi pilih ASP .NET Web Application yang berekstensikan *.ASPX dengan code behind yang berkestensikan *.CS. Sedangkan pada project BussinessLayer dan DataAccessLayer pilih Class Library dengan code behind yang berkestensikan *.CS. Untuk lebih jelasnya mengenai ini, Anda bisa lihat artikel saya tentang Bagaimana Bekerja dengan Ms Visual Studio ?.

Langkah #3, Membuat Template Halaman Web

Pada project WebApp, klik saja file Default.ASPX dan isi dengan code html berikut :

<%@ Page Language="C#" AutoEventWireup="true" CodeBehind="Default.aspx.cs" Inherits="WebApp._Default" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Test Datagrid Paging</title>
    <link href="../Include/Css/Styles.css"  rel="stylesheet" type="text/css" />
</head>
<body>
    <form id="form1" runat="server">
    <div class="lbltext">
        <table width="100%">
            <tbody>
                <tr>
                    <td align="left" style="width:10%"><asp:Label ID="lblSearch" runat="server" Text="Search By"></asp:Label></td>
                    <td align="left" style="width:15%">
                        <asp:DropDownList ID="ddlSearchBy" runat="server" Width="100%">
                        </asp:DropDownList>
                    </td>
                    <td align="left" style="width:25%"><asp:TextBox ID="txtSearchBy" runat="server" Width="90%"></asp:TextBox></td>
                    <td align="left" style="width:55%"></td>
                </tr>
            </tbody>
        </table>
        <asp:Button ID="btnReset" runat="server" Text="Reset"/>
        <asp:Button ID="btnSearch" runat="server" Text="Search"/>
        <table width="100%">
            <tbody>
                <tr>
                     <th align="center" colspan="3" class="headertable" >
                        <asp:Label ID="lblHeader" runat="server" Text="COUNTRIES"></asp:Label>
                     </th>
                </tr>
                <tr>
                    <td>
                        <asp:DataGrid ID="dtgData" runat="server" Width="100%" AutoGenerateColumns="False"
                                CssClass="auto-style2" HeaderStyle-BackColor="#eaf9df" ItemStyle-CssClass="tdganjil" 
                                AlternatingItemStyle-CssClass="tdgenap" AllowPaging="true">
                                    <AlternatingItemStyle CssClass="tdgenap" />
                                    <ItemStyle CssClass="tdganjil" />
                                        <Columns>
                                            <asp:TemplateColumn HeaderText="No">
                                                <HeaderStyle HorizontalAlign="Center" Width="10%" />
                                                <ItemStyle HorizontalAlign="Center" />
                                                <ItemTemplate>
                                                    <asp:Label ID="lblNum" runat="server" 
                                                        Text='<%# DataBinder.Eval(Container.DataItem,"No") %>'></asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateColumn>
                                            <asp:TemplateColumn HeaderText="Code">
                                                <HeaderStyle HorizontalAlign="Center" Width="15%" />
                                                <ItemStyle HorizontalAlign="Center" />
                                                <ItemTemplate>
                                                    <asp:Label ID="lblCode" runat="server" 
                                                        Text='<%# DataBinder.Eval(Container.DataItem,"Code") %>'>
                                                    </asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateColumn>
                                            <asp:TemplateColumn HeaderText="Countries Name">
                                                <HeaderStyle HorizontalAlign="Center" Width="60%" />
                                                <ItemStyle HorizontalAlign="Left" />
                                                <ItemTemplate>
                                                    <asp:Label ID="lblCountries" runat="server" 
                                                        Text='<%# DataBinder.Eval(Container.DataItem,"Countries Name") %>'>
                                                    </asp:Label>
                                                </ItemTemplate>
                                            </asp:TemplateColumn>                                        
                                        </Columns>
                                  <HeaderStyle CssClass="atmSubHeader" />
                          </asp:DataGrid>
                    </td>
                </tr>
                <tr>
                    <td class="footerTable"></td>
                </tr>
                <tr>
                    <td>
                        <table width="100%">
                            <tbody>
                                <tr>
                                    <td align="center" width="4%">
                                        <asp:ImageButton ID="ImgFirst" runat="server" 
                                            ImageUrl="../Images/ForwardPrev_icon.png" onclick="ImgFirst_Click" />
                                    </td>
                                    <td align="center" width="4%">
                                        <asp:ImageButton ID="ImgPrev" runat="server" ImageUrl="../Images/prev_icon.png" 
                                            onclick="ImgPrev_Click"/>
                                    </td>
                                    <td align="center" width="4%">
                                        <asp:ImageButton ID="ImgNext" runat="server" ImageUrl="../Images/next_icon.png" 
                                            onclick="ImgNext_Click"/>
                                    </td>
                                    <td align="center" width="4%">
                                        <asp:ImageButton ID="ImgLast" runat="server" 
                                            ImageUrl="../Images/ForwardNext_icon.png" onclick="ImgLast_Click"/>
                                    </td>
                                    <td align="center" width="5%">
                                        <asp:Label ID="lblPage" runat="server" Text="Page"></asp:Label>
                                    </td>
                                    <td align="left" width="3%">
                                        <asp:TextBox ID="txtPage" runat="server" Width="30px"></asp:TextBox>
                                    </td>
                                    <td align="center" width="3%">
                                        <asp:Button ID="btnGo" runat="server" Text="GO" onclick="btnGo_Click" ></asp:Button>                                      
                                    </td>
                                    <td align="left" width="15%">
                                        <asp:RegularExpressionValidator ID="RegularExpressionValidator1" runat="server" ControlToValidate="txtPage" ValidationExpression="^[0-9]+$" 
                                   ErrorMessage="Only Number" Display="Dynamic"></asp:RegularExpressionValidator>
                                    </td>
                                    <td align="right" width="59%">
                                        <asp:Label ID="txtInfoTable" runat="server" Text=""></asp:Label>
                                    </td>
                                </tr>
                            </tbody>
                        </table>
                    </td>
                </tr>
            </tbody>
        </table>
    </div>
    </form>
</body>
</html>

cari folder TestProject dimana project kamu disimpan, kemudian pada folder WebApp, buat folder baru dengan nama Include. Dan didalam folder Include tadi buat folder Css. Kembali ke Ms Visual Studio pada project webApp tambahkan item stylesheet atau css dan simpan dalam folder Css tadi. Jangan lupa menambahkan References untuk folder tersebut agar dikenali. Isi dengan Script css berikut :

body
{
}

td 
{
    border-color : #e8e3e9;
}

th.headertable 
{

    background-color:#90bbf6;
    -moz-border-radius-topleft: 10px;
    -moz-border-radius-topright: 10px;
    -webkit-border-top-left-radius: 10px;
    -webkit-border-top-right-radius: 10px;
    -khtml-border-radius-topleft: 10px;
    -khtml-border-radius-topright: 10px;
    border-top-left-radius: 10px;
    border-top-right-radius: 10px;
    font-family: Verdana, Arial, Tahoma, sans-serif;
 font-size: 11px;
 height:20px;
}

td.footerTable 
{

    background-color:#90bbf6;
    -moz-border-radius-bottomleft: 10px;
    -moz-border-radius-bottomright: 10px;
    -webkit-border-bottom-left-radius: 10px;
    -webkit-border-bottom-right-radius: 10px;
    -khtml-border-radius-bottomleft: 10px;
    -khtml-border-radius-bottomright: 10px;
    border-bottom-left-radius: 10px;
    border-bottom-right-radius: 10px;
    height : 10px;
    
}


td.leftcolumn
{
 background-color:#F4F4F4;
}

tr.style1 
{
    height:25px;
    padding: 10px;
    border:solid 1px #E7E3E7;
}

.lbltext
{
    font-family: Verdana, Arial, Tahoma, sans-serif;
 font-size: 11px;
}

td .rowdate
{
 display:inline;
}

#btnSearch
{
    margin-right:10px;
}

#btnReset, #btnSearch
{
    float:right;
    font: Bold 12px Cal Black;
    padding:5px;
    margin-top:20px;
    margin-bottom:20px;
    width:80px;
}

.atmHeader {
 font: bold 10pt Tahoma,Verdana ;
 color: #FFFFFF;
}
.atmSubheader
{
 font: bold 10pt Tahoma,Verdana ;
 background-color:#C5DBE6;
}

.tdganjil {
 background: #FFFFFF;
}

.tdgenap {
 background: #C5DBE6;
}

.auto-style1 {
 background: #f4faff;
 text-align: left;
 font: Arial;
 
}
.auto-style2 {
 border-collapse : collapse;
 border: 1px solid #e7e3e7;
 background: #FFFFFF;
 font: 9pt  Arial, Helvetica, sans-serif;
 color: #000000;
}
.auto-style3 {
 background: #eaf9df;
 text-align: left;
 color: #000000;
 border-collapse : collapse;
 border: 1px solid #e7e3e7;
 font: bold 9pt  Arial, Helvetica, sans-serif;
}

Langkah #4, Koneksi ke database Oracle 10g XE

Hal yang paling penting adalah bagaimana membuat suatu koneksi ke database

Google Plus

2011-07-09T04:43:00.000-07:00

Google plus merupakan jejaring sosial terbaru saat ini yang dibuat oleh perusahaan ternama dunia yaitu google. Google plus mengklaim bahwa "situs ini merupakan jejaring sosial terakhir setelah facebook dan twitter" yang menghebohkan dunia dan memiliki banyak pengguna diseluruh dunia. Jika Anda telah memiliki akun mail dari gmail.com maka Anda akan mudah untuk mendaftar di google plus hanya sekali klik dan memasukkan akun gmail Anda maka secara otomatis Anda terdaftar di google plus. Jadi, bagi pengguna akun gmail tidak perlu lagi membuat akun baru di google plus. Namun, sampai saat ini google plus memberikan keterbatasan bagi pengguna di seluruh dunia untuk dapat menggunakannya karena proyek ini masih dalam tahap uji coba. Pihak google membutuhkan banyak feedback dari pengguna yang berhasil masuk ke halaman beranda situs google plus mereka agar situs ini benar-benar layak dan siap untuk dipublikasikan maupun digunakan oleh pengguna jejaring sosial di seluruh dunia.

Google menawarkan konsep yang unik pada google plus. Semua produk-produk google dapat diintegrasikan secara otomatis di google plus seperti google buzz (aplikasi jejaring sosial via gmail), google contacts (aplikasi penyimpanan data kontak dari gmail), picasa (aplikasi penyimpanan dan berbagi foto-foto), google news (aplikasi informasi berita terkini), dan lain-lain. Proses integrasi inilah yang sangat memudahkan kita jika sebelumnya kita aktif menggunakan aplikasi-aplikasi google tersebut. Kita tidak perlu melakukan pengisian data baru melainkan cukup menambahkan informasi yang kurang serta mengubah beberapa informasi yang ada. Dengan adanya integrasi ini kita tidak akan pernah benar-benar meninggalkan google. Desain yang ditampilkan sangat elegan dan sederhana. Fungsi-fungsi yang digunakan pun sangat mudah sekali. Salah satunya dengan men-drag/menarik ikon teman-teman kita untuk menambahkan atau menghapusnya dari circles.

Apa saja fitur-fitur di Google plus ?

Stream

Sama halnya dengan update status di FB, Stream merupakan fitur dari google plus untuk mendapatkan dan menemukan apa yang sedang terjadi melalui update yang ditulis oleh teman-teman kamu yang ada dalam cicrcles kamu. Disini kamu bisa melakukan pengaturan secara langsung tentang berita terbaru yang ingin kamu buat pada stream, apakah dipublikasikan secara umum atau untuk spesifikasi orang-orang tertentu yang kamu inginkan untuk dilihat. Jadi, dalam jejaring sosial Google plus ini, pengguna bisa dengan mudah memilih hanya kelompok tertentu dalam jaringan sosialnya untuk melihat aktivitas berbaginya (sharing). Kenapa begitu? Karena di jaringan sosial Google plus ini, Google lebih mementingkan privasi pengguna agar tampak berbeda daripada jejaring sosial yang terlebih dahulu ada, Seperti Facebook dan Twitter. Apa yang kamu tulis dan apa yang kamu lihat pada fiture stream dapat dikomentari. Selain itu kamu juga bisa meng-edit posting-an kamu dan komentar kamu pada fitur ini bahkan kamu juga bisa mengatur posting-an kamu apakah bisa dikomentari oleh yang lainnya atau tidak.

Sparks

Sparks merupakan media online dari google news. Dalam hal ini, fitur sparks memudahkan bagi kamu untuk melakukan share secara praktis tentang berita-berita yang disediakan oleh google news secara terkini pada halaman stream kamu. Kamu bisa menuliskan tentang sesuatu apapun mengenai artikel yang kamu ambil tadi untuk di-share kemudian kamu bisa melakukan pengaturan secara langsung tentang berita terbaru yang ingin kamu buat pada stream, apakah dipublikasikan secara umum atau untuk spesifikasi orang-orang tertentu yang kamu inginkan untuk dilihat. Apa yang kamu share bisa dikomentari oleh teman-teman kamu yang melihatnya.

Hangouts

Inilah fitur yang paling unik, yang belum terdapat dijejaring sosial manapun. Fitur ini memungkinkan kamu untuk dapat melakukan live webcame dengan teman-teman yang ada dalam circle kamu. Tidak hanya secara personal, namun fitur ini juga dapat melakukan live webcame secara grup.

Tampilan awal, integrasi secara otomatis dengan webcame kamu

Tampilan chat dengan teman-teman kamu pada sebelah kiri layar kamu

Tampilan invite teman-teman untuk bergabung dengan kamu pada sebelah kiri layar kamu

Circles

Ketika kamu mengundang teman untuk bergabung sebagai teman di google plus, maka kamu harus memasukkan teman kamu kedalam circle yang kamu buat atau yang kamu sediakan. Circle ini bisa juga kita sebut grup. Kita dapat mengelompokkan teman-teman kedalam grup-grup atau circles sesuai keinginan kita.

Huddle

Sepertinya fitur ini terdapat pada aplikasi google plus via mobile yang memungkinkan kamu untuk chatting dengan teman-teman kamu yang ada dalam circles kamu. Layaknya fitur chatting pada FB dan Y! Massenger, kita dapat melakukan chatting secara grup maupun secara personal saja.

+1's

Tombol +1 adalah istilah singkat untuk "ini lumayan keren" atau "kamu harus melihat ini". Klik +1 untuk memberikan cap persetujuan kamu pada sesuatu secara publik. Sama halnya dengan "Like" pada FB hanya saja +1 yang kamu berikan pada google plus dapat membantu teman, kenalan, dan orang lain yang ada di web menemukan pencarian terbaik sewaktu mereka menelusurinya. Fitur ini mendatangkan kabar buruk bagi penyedia konten dengan kualitas rendah. Sayangnya google plus tidak menambahkannya dengan memberikan -1's untuk memberikan penilaian terhadap hasil penulusuran yang orang-orang tidak menyukainya saat melihatnya (kualitas rendah). Mungkin google plus terlalu berbaik hati pada penggunanya heheheheehe :D.

Tampilan lainnya

Quick Share

Ini adalah menu dari google plus yang terletak pada bagian kanan atas halaman web untuk mempercepat pengguna dalam melakukan sharing tentang apapun di situs google plus ini ketika sedang membuka halaman yang lainnya.

Notifications

Ini adalah menu dari google plus yang terletak pada bagian kanan atas halaman web untuk memberitahukan kepada pengguna segala aktifitas yang berkaitan dengan pengguna tersebut layaknya notifikasi pada FB. Namun, pada google plus sedikit berbeda. Info yang diberikan pada notifikasi akan diproses pada notifikasi tersebut tanpa merujuk pada halaman kejadian saat notifikasi.

Account

Ini adalah menu dari google plus yang terletak pada bagian kanan atas halaman web untuk menjelajah secara cepat hal-hal yang berkaitan dengan akun pengguna.

Edit Profile

Pada halaman edit profil google plus sangatlah sederhana. Cukup klik link edit porfil, maka halaman edit profil akan tampil dan klik saja pada poin-poin yang ada untuk mengubah isinya.

Photos

Pada menu foto ini, ada 4 kategori foto-foto yang ditampilkan yaitu dari circles kamu, dari handphone kamu, dari album, dan foto-foto pada picasa.

Chat

Google plus juga menyediakan integrasi chat pada kontak akun gmail kamu tanpa perlu membuka email kamu terlebih dahulu agar bisa mengobrol dan berkomunikasi secara bebas pada halaman beranda kamu. Selain itu, kamu juga bisa chatting dengan teman-teman yang ada didalam circles kamu. Fitur ini terdapat pada halaman beranda kamu di bagian kiri.

Jika google plus sudah siap untuk digunakan, coba kunjungi situsnya disini dan cobalah fitur-fitur yang terdapat di dalamnya. Selamat Mencoba!

Bagaimana bekerja dengan MS Visual Studio ?

2011-06-03T22:17:00.000-07:00

Mungkin bagi Anda sebagai pemula (NEWBIE) akan merasa sedikit bingung bagaimana cara memulai bekerja menggunakan aplikasi ini. Baiklah, saya akan menuntun Anda bagaimana cara memulai membangun suatu aplikasi dengan baik dan benar.

Pada dasarnya, aplikasi yang akan kita bangun bisa berupa web maupun aplikasi desktop (menggunakan VB atau C#). Pada MS Visual Studio, hal tersebut tidaklah menjadi masalah yang cukup berarti. Aplikasi yang akan kita bangun nantinya harus terintegrsi dengan database, baik itu Oracle, MySQL, SQL Server, dll. Saya akan mengilustrasikan konsep dalam membangun suatu aplikasi sebagai berikut :

Ini hanyalah suatu ilustrasi style rancangan suatu aplikasi, bisa saja setiap kita memiliki rancangan tersendiri yang menurutnya baik dan aman untuk diterapkan. Pada ilustrasi gambar di atas, Aplikasi yang dimaksud dalam konsep tersebut adalah User Interface (tampilan form dari suatu aplikasi). Aplikasi tidak akan langsung berhubungan dengan database, melainkan melewati suatu proses yang saya namakan dengan Bussiness Layer. Inilah inti dari tujuan perancangan konsep di atas, dimana menghindari aplikasi agar tidak berhubungan langsung dengan database terkait masalah keamanan. Layer ini akan menjadi jembatan akses untuk pengambilan suatu data-data pada layer berikutnya. Layer berikutnya saya namakan Data Access Layer, dimana pada layer ini semua koneksi yang berhubungan dengan database ditampilkan baik itu pemanggilan stored procedure, table/view, manipulasi data, dll. Baiklah, untuk lebih mempermudah pemahan mengenai konsep ini alangkah baiknya kita coba mengimplementasikannya.

Implementasi Konsep dengan MS Visual Studio

Silakan buka aplikasi MS Visual Studio sehingga muncul seperti gambar berikut :

Untuk memulai suatu pekerjaan, pilih menu File->New Project seperti gambar berikut :

Kemudian klik sehingga muncul seperti gambar berikut :

Untuk membuat poject baru, maka Anda perlu membuat solution terlebih dahulu. Expand Other Projects Type pada menu Tree kemudian pilih Visual Studio Solutions seperti gambar berikut :

Klik tombol "OK", maka Anda sudah membuat solution baru untuk memulai kerja pada suatu project. Tadi kita telah membuat sebuah solution baru dengan nama "TestProject". Coba cek pada solution explorer, biasanya terletak pada sebelah kanan layar monitor Anda. Jika muncul Solution 'TestProject' arahkan cursor pada bagian tersebut kmudian klik kanan. Pilih Add -> New Project untuk membuat module atau page suatu aplikasi. Contoh bisa dilihat pada gambar berikut :

Klik sub menu New Project tadi maka akan muncul seperti gambar berikut :

Gambar di atas, menampilkan pembuatan project atau folder baru yaitu ASP .NET Web Application yang berekstensikan .ASPX dengan code behind yang berkestensikan .CS. Jadi, fungsi-fungsi atau methode pada ASPX akan ditanamkan pada code behind berbasis C#. Klik saja tombol "OK", secara otomatis akan tampil pada layar sebelah kanan Anda.
Jika Anda ingin menambahkan project atau module seperti Bussiness Layer dan Data Access Layer, sama halnya dengan langkah no 5, namun apabila kita telah membuat 1 project atau module, biasanya solution tidak muncul. Untuk itu, klik menu New -> Add -> New Project. Project akan secara otomatis ditambahkan ke dalam solution baru tadi.
Untuk menambahkan item atau file pada suatu project, arahkan cursor pada project dalam Solution Explorer tersebut. Klik kanan maka pilih Add -> Add Item. Item akan ditambahkan pada Project dalam Solution Explorer tersebut.

Notes :

Lakukan Build setiap Anda melakukan perubahan code pada setiap file maupun projects. Arahkan cursor pada Solution lalu klik kanan pilih "Build"
Selalu save file setiap melakukan perubahan
Tentukan browser default ketika Anda ingin running program. Pilih file utama (misal, Default.aspx) kemudian klik kanan lalu pilih Browser. Pilih browser yang Anda ingin tampilkan kemudian klik tombol "Default". Maka, setiap running program aplikasi Anda akan tampil beserta default browser tersebut.
Selamat Mencoba!

Instalasi Microsoft Visual Studio Team System 2008 Team Suite

2011-06-03T21:43:00.000-07:00

Meskipun software ini sudah tergolong usang saat ini, Anda masih bisa menggunakannya untuk membangun aplikasi-aplikasi berbasis .NET Framework. Microsoft telah lama me-realase MS Visual Studio 2010 yang lebih baik dan lengkap dari versi sebelumnya MS Visual Studio 2008. Adapun produk-produk MS Visual Studio 2008 sebagai berikut :

Visual Web Developer 2008 Express Edition
Visual Basic 2008 Express Edition
Visual C# 2008 Express Edition
Visual C++ 2008 Express Edition
Visual Studio 2008 Standard Edition
Visual Studio 2008 Professional Edition
Visual Studio Team System 2008 Architecture Edition
Visual Studio Team System 2008 Database Edition
Visual Studio Team System 2008 Development Edition
Visual Studio Team System 2008 Test Edition
Visual Studio Team System 2008 Team Suite

Waw...cukup banyak bukan program-program yang ditawarkan oleh Microsoft? Demikian juga dengan MS Visual Studio 2010 yang juga memiliki produk-produk seperti yang disebutkan di atas. Untuk lebih jelasnya lagi mengenai produk-produk di atas, Anda dapat langsung mengunjungi website resminya disini.

Adapun langkah-langkah instalasi MS Visual Studio Team System 2008 Team Suite sebagai berikut :

Masukkan DVD software MS Visual Studio Team System 2008 Team Suite kedalam DVD Room PC/laptop Anda, kemudian akan muncul auto run CD. Jika tidak muncul maka klik file Setup.exe sehingga muncul seperti gambar berikut ini :

Kemudian pilih menu yang paling atas yaitu "Install Visual Studio 2008", lalu klik sehingga muncul seperti gambar berikut ini :

Tunggulah hingga progressbar selesai loading sehingga muncul tombol "Next" seperti gambar berikut ini :

Kemudian klik tombol "Next" di atas sehingga muncul seperti gambar berikut ini :

Karena saya menggunakan lisensi yang disediakan oleh kantor saya, maka secara otomatis product key number akan terisi. Jangan lupa pilih "I have read and accept the license terms" lalu klik tombol "Next" lagi sehingga muncul seperti gambar berikut ini :

Pilih saja fitur "Default" sesuai rekomendasi sistem. Jika, tampilan Anda sudah sesuai dengan gambar di atas. Silakan klik tombol "Install" sehingga muncul seperti gambar berikut ini :

Inilah proses instalasi komponen, tunggulah beberapa menit hingga proses benar-benar selaesai. Lalu muncul seperti gambar berikut ini :

Instalasi telah selesai dilakukan maka klik tombol "Finish". Perlu diketahui bahwa sebelumnya saya sudah melakukan instalasi Microsoft .NET 2.0, 3.0, dan 3.5.

Sekian dulu dari saya untuk instalasi MS Visual Studio Team System 2008 Team Suite, semoga bermanfaat.

Instalasi Oracle XE 10.g dan Toad Ver 9.6.1.1 pada Windows 7 64 bit

2011-05-14T09:21:00.000-07:00

Instalasi Oracle XE 10.g ?

Double klik aplikasi OracleXE.exe, sehingga muncul tampilan seperti gambar berikut :

Tunggu beberapa saat hingga proses inisialisasi selesai kemudian muncul tampilan seperti gambar berikut :

Klik tombol Next sehingga muncul tampilan seperti gambar berikut :

Pilih accept, lalu klik tombol Next sehingga muncul tampilan seperti gambar berikut :

Klik tombol Next sehingga muncul tampilan seperti gambar berikut :

Isi field password, Ingat! password ini akan digunakan untuk koneksi ke database. Klik tombol Next sehingga muncul tampilan seperti gambar berikut :

klik tombol Next sehingga muncul tampilan seperti gambar berikut :

Tunggulah proses di atas hingga benar-benar selesai kemudian klik tombol Finish maka instalasi oracle telah selesai.

Instalasi Toad for Oracle Ver 9.6.1.1

Klik aplikasi Toad sehingga muncul tampilan seperti gambar berikut :

Tunggulah hingga proses di atas selesai, maka akan muncul tampilan seperti gambar berikut :

klik tombol Next sehingga muncul tampilan seperti gambar berikut :

klik tombol Next sehingga muncul dialog box seperti gambar berikut :

klik tombol Yes sehingga muncul tampilan seperti gambar berikut :

Klik tombol Next sehingga muncul tampilan seperti gambar berikut :

klik tombol Install sehingga muncul tampilan seperti gambar berikut :

Tunggulah beberapa saat hingga proses di atas selesai, sehingga muncul tampilan seperti gambar berikut :

Klik tombol Finish, instalasi selesai

Bekerja Menggunakan Aplikasi TOAD

Jika Anda meng-install TOAD pada windows 7 64 bit, copy folder Quest Software yang mana merupakan tempat hasil instalasi TOAD pada path C:\\Program Files (x86)\ ke C:\\Program Files\ untuk menghindari perintah error "Can not open" ketika koneksi ke database.
Double Klik aplikasi TOAD yang ada pada path C:\\Program Files\Quest Software\Toad for Oracle\ yang telah di-install dan dipindahkan tadi sehingga muncul seperti gambar berikut ini :

Pilih Tabs Multiple Row, kemudian klik tombol Next sehingga muncul tampilan seperti gambar berikut :

Centang pilihan sesuai gambar di atas, kemudian klik tombol Next sehingga muncul tampilan seperti gambar berikut :

Centang Sort Alphabetically, kemudian klik tombol Next sehingga muncul tampilan seperti gambar berikut :

Centang dan pilih sesuai gambar di atas, kemudian klik tombol Finish sehingga muncul tampilan seperti gambar berikut :

Sesuaikan pengisian field dengan gambar di atas. Password yang digunakan adalah password ketika Anda meng-install database oracle.
Program ini memiliki lisensi dan merupakan trial program sehingga harus menggunakan crack terlebih dahulu

Download aplikasi Oracle 10.g XE dan TOAD Ver 9.6.1.1 disini

Instalasi DHCP dan DNS pada Windows Server 2003 Standart Edition

2011-05-14T03:17:00.000-07:00

Apa itu Windows Server 2003 ?

Windows Server adalah suatu sistem operasi dari Microsoft yang diperuntukkan untuk kebutuhan server dalam mengelola jaringan komputer. Ada beberapa macam jenis produk dari windows server 2003 yaitu :

Windows Server 2003 Standard Edition
Windows Server 2003 Enterprise Edition
Windows Server 2003 Datacenter Edition
Windows Server 2003 Web Edition
Windows Small Business Server 2003
Windows Storage Server 2003

Edisi windows server 2003 ini dibuat untuk menggantikan windows 2000 Server dan Windows NT 4.0 Server yang telah lama digunakan banyak perusahaan dalam membangun server untuk jaringan komputer. Saat ini telah di-release Windows Server 2008. Adapun fitur-fitur yang ditawarkan oleh windows server 2003 standart edition yaitu :

Fitur standar sebuah server: file service, print service, atau application server yang dapat diinstalasi (seperti Microsoft Exchange Server, SQL Server, atau aplikasi lainnya)
Domain Controller server
PKI (public key infrastructure) server
Domain Name System (DNS)
Dynamic Host Configuration Protocol (DHCP)
Windows Internet Name Service (WINS)
Windows Terminal Services, meski kurang ideal untuk diimplementasikan dalam jaringan skala besar akibat adanya limitasi prosesordan memori
Mendukung pembagian beban jaringan, meski tidak dapat digunakan sebagai sebuah cluster

Dalam artikel yang saya buat ini, saya tidak akan menjelaskan kseluruhan fitur-fitur yang tersedia di atas. amun, saya akan lebih memfokuskan pada fitur DHCP dan DNS yang sering digunakan kebanyakan orang atau perusahaan dalam mengelola jaringan komputernya. Namun, sebelum kita melakukan instalasi komponen DNS dan DHCP. Cek terlebih dahulu pada PC Anda apakah komponen tersebut telah terinstal atau belum. Biasanya, windows server 2003 standart edition tidak secara otomatis menginstal komponen-komponen tersebut. Jika belum ada, instal terlebih dahulu dan ikutilah langkah-langkah berikut :

Masukkan CD Windows Server 2003 Standart Edition
Buka Control Panel > Add Or Remove Programs, seperti gambar berikut :

Pada panel di sebelah kiri Anda, pilih Add/Remove Windows Components, sehingga muncul seperti tampilan pada gambar berikut :
Pilih Network Service, lalu klik tombol Advanced sehingga muncul seperti tampilan pada gambar berikut :

Centang komponen DNS dan DHCP, lalu klik tombol OK sehingga muncul seperti tampilan berikut ini :

Tunggulah hingga proses konfigurasi selesai dan Anda telah berhasil menginstal komponen DNS dan DHCP. Silakan cek pada Control Panel > Administrative Tools.

Apa itu Domain Name System (DNS) ?

Domain Name System (DNS) adalah sistem penamaan hirarkis yang dibangun pada database yang terdistribusi untuk sekumpulan komputer yang terhubung ke Internet atau jaringan pribadi. Sebuah analogi yang menjelaskan DNS bahwa kita akan lebih mudah mengingat suatu nama dibandingkan dengan sederetan angka-angka. Misal, ketika kita memiliki data kontak teman-teman kita berupa nomor handphone. Kemudian kita memberi nama yang mudah kita ingat untuk menyimpan data kontak tadi. Sehingga dengan memanggil nama yang ada di-list data kontak kita, secara otomatis kita akan terhubung kepada nomor handphone yang bersangkutan. Inilah konsep yang digunakan pada DNS.

DNS mendistribusikan tanggung jawab dalam menetapkan nama domain dan pemetaan nama ke alamat IP dengan menunjuk otorisasi name server untuk setiap domain. Otorisasi name server yang ditugaskan ini, bertanggung jawab khusus pada domainnya. Pada saatnya nanti dapat menetapkan otorisasi name server lain untuk subdomain-nya. Mekanisme ini telah membuat DNS terdistribusi dan fault tolerant terbantu menghindari kebutuhan pendaftaran terpusat sehinga dapat terus berkonsultasi dan diperbarui. Secara umum, DNS juga menyimpan jenis informasi lainnya, seperti daftar mail server yang menerima email untuk domain Internet tertentu. Dengan menyediakan sebuah worlwide, mendistribusikan kata kunci berdasarkan pengalihan layanan, DNS adalah komponen penting dari fungsionalitas dari Internet . Pengenal lainnya seperti tag RFID , UPCs , karakter International di alamat email dan nama host, dan berbagai pengenal lainnya berpotensi menggunakan DNS. DNS juga menetapkan fungsi teknis layanan ini dalam database. Hal ini mendefinisikan protokol DNS, terdefinisi secara rinci tentang struktur data dan pertukaran komunikasi yang digunakan dalam DNS, sebagai bagian dari Internet Protocol Suite.

Konfigurasi DNS pada Windows Server 2003 ?

Pilih Start Menu > Administrative Tools > DNS

Klik tombol Next sehingga muncul seperti gambar berikut :

Pilih “This server maintains the zone”, kemudian klik tombol Next sehingga muncul seperti gambar berikut :

Ketik domain name yang ingin dikonfigurasi, kemudian klik tombol Next sehingga muncul seperti gambar berikut :

Klik tombol Next sehingga muncul seperti gambar berikut :

Pilih “No, it should not forward queries”, kemudian klik tombol Next sehingga muncul seperti gambar berikut :

Konfigurasi DNS selesai

Apa itu Dynamic Host Configuration Protocol (DHCP) ?

Dynamic Host Configuration Protocol (DCHP) adalah protokol yang berbasis arsitektur client/server yang dipakai untuk memudahkan pengalokasian alamat IP dalam satu jaringan. Sebuah jaringan lokal yang tidak menggunakan DHCP harus memberikan alamat IP kepada semua komputer secara manual. Jika DHCP dipasang di jaringan lokal, maka semua komputer yang tersambung dalam jaringan akan mendapatkan alamat IP secara otomatis dari server DHCP. Selain alamat IP, banyak parameter jaringan yang dapat diberikan oleh DHCP, seperti default gateway dan DNS server. DHCP didefinisikan dalam RFC 2131 dan RFC 2132 yang dipublikasikan oleh Internet Engineering Task Force. DHCP merupakan ekstensi dari protokol Bootstrap Protocol (BOOTP).

Konfigurasi DHCP pada Windows Server 2003 ?

Pilih Start Menu > Administrative Tools > DHCP

Membuat scope pada DHCP, kemudian klik sehingga muncul seperti gambar berikut :

Klik tombol Next sehingga muncul seperti gambar berikut :

Isi field Name, kemudian klik tombol Next sehingga muncul seperti gambar berikut :

Isi field start IP address dan End IP address, ikuti seperti contoh di atas kemudian klik tombol Next sehingga muncul seperti gambar berikut :

Kosongkan saja field-nya, klik tombol Next sehingga muncul seperti gambar berikut :

Wizard ini akan men-generate IP address masing-masing PC berdsarkan waktu yang ditentukan. Klik tombol Next sehingga muncul seperti gambar berikut :

Pilih Yes lalu klik tombol Next sehingga muncul seperti gambar berikut :

Kosongkan saja field-nya lalu klik tombol Next sehingga muncul seperti gambar berikut :

Kosongkan saja field-nya lalu klik tombol Next sehingga muncul seperti gambar berikut :

Kosongkan saja field-nya lalu klik tombol Next sehingga muncul seperti gambar berikut :

Pilih Yes kemudian klik tombol Next sehingga muncul seperti gambar berikut :

Klik tombol finish, konfigurasi selesai

Membuat Navigasi Halaman (Page Navigation) pada Blogspot

2011-03-16T18:28:00.000-07:00

Berawal dari melihat-lihat tampilan blog saya, pada bagian footer rasanya ada hal yang kurang sedap bila dipandang mata. Salah satu penyebabnya adalah idak adanya halaman navigasi sehingga cukup merepotkan saya walaupun sebenarnya secara default blogger mem-filter setiap postingan berdasarkan tahun dan bulan pada sebelah kanan layar anda. Selain itu, navigasi yang disediakan pun hanya Newest dan Older atau Next saja. Jika halamannya sedikit tentu tidak akan ada masalah, tapi jika kita rajin mem-posting tentu halamannya akan menjadi bertambah banyak bahkan puluhan hingga ratusan halaman. Bisa pegel tangan pembaca untuk mencari keberadaan suatu artikel pada halaman tertentu. Misal, ada 100 halaman dan artikel yang dicari ada pada halaman 56. Apakah kita akan terus meng-klik tombol Next atau Older?

Banyak blogger yang menulis artikel tentang cara menampilkan halaman navigasi di blog-nya. Beberapa sumber saya dapatkan untuk dapat mengetahui cara membuat halaman navigasi pada blogspot. Hanya sebagai catatan pribadi saya dan daripada saya melihat-lihat blog orang lain lagi secara terus menerus untuk hal yang sama. Alangkah baiknya saya menulis di blog saya sendiri dan jika dibutuhkan sewaktu-waktu bisa melihat di blog saya lagi. Sekalian menghargai dan mengunjungi web sendiri heheheheee. Baiklah untuk tidak memperpanjang kalimat lagi, segera kita mulai saja langkah-langkah untuk membuat halaman navigasi pada blogger sebagai berikut :

Masuk atau login terlebih dahulu ke http://www.blogger.com/. Anda akan memasuki dasbor blogger.
Silakan memilih "Rancangan", kemudian pilih "Edit HTML" dan centang "Expand Widget"

Anda akan melihat code html dan css di bawahnya. Kemudian anda cari code

]]></b:skin>

Di atas code tersebut anda masukkan css di bawah ini :

.showpageArea a {
text-decoration:underline;
}
.showpageNum a {
text-decoration:none;
border: 1px solid #cccccc;
margin:0 3px;
padding:3px;
}
.showpageNum a:hover {
border: 1px solid #cccccc;
background-color:#cccccc;
}
.showpagePoint {
color:#333;
text-decoration:none;
border: 1px solid #cccccc;
background: #cccccc;
margin:0 3px;
padding:3px;
}
.showpageOf {
text-decoration:none;
padding:3px;
margin: 0 3px 0 0;
}
.showpage a {
text-decoration:none;
border: 1px solid #cccccc;
padding:3px;
}
.showpage a:hover {
text-decoration:none;
}
.showpageNum a:link,.showpage a:link {
text-decoration:none;
color:#333333;
}

Setelah itu, cari lagi code di bawah ini :

<div id='footer'>

pada template html blog anda. Kemudian masukkan code javascript di bawah ini :

<script type='text/javascript'>
var pageCount=5;
var displayPageNum=5;
var upPageWord ='Previous';
var downPageWord ='Next';
</script>

Download file javascript berikutnya disini. Silakan copy paste source code yang telah diunduh tadi lalu taruh di bawah code variable var downPageWord ='Next';
Coba lihat kembali blog Anda dan perhatikan perubahannya pada footer anda seperti gambar berikut ini :

Program Console Kamus Sederhana dengan Operasi File Teks pada Java

2011-03-15T16:11:00.000-07:00

Deskripsi :

Program ini layaknya kamus Inggris-Indonesia dan Indonesia-Inggris. Namun, program ini dirancang sangat sederhana sekali dan tidak terlalu kompleks. Proses penyimpanan data kamus hanya menggunakan file teks dengan format *.txt. Program ini juga tidak dirancang dengan algoritma yang rumit untuk mencari pembendaharaan kata yang ditulis sebagai pencarian. Hanya dengan menggunakan kondisi if dan array saja yang merupakan dasar-dasar pemrograman untuk melakukan metode pencarian. Tidak ada rumus khusus yang digunakan sehingga hasil pencarian pun lebih akurat. Sehingga program ini dapat memberikan pencerahan pada pembaca yang ingin sekali mengenal pemrograman dan memahami pengondisian, iterasi, array, serta input dan output stream pada pemrograman khususnya java. Berikut ini contoh penyimpanan data-data kata dalam file teks seperti terlihat pada gambar berikut ini :

Source Code Program :

import java.lang.*; //menangani eksepsi
import java.io.*; //menangani stream
import java.util.*;//menangani scanner

public class Kamus 
{
 private String kata;
 
    private String english[] = new String[100];
    private String indonesian[] = new String[100];
 private int counter;
 
 public Kamus()
 {
  kata=null;
  counter=0;
 }
 
 public Kamus(String _kata)
 {
  kata=_kata;
 }
 
 public void ReadFile () 
    {
        //Deklarasi baca inputan dari file
     FileReader fReader = null;
     //Deklarasi streamTokenizer
        StreamTokenizer stInput = null;
        
        int i =0;
        String output=null; 
          
        try
        {
           //Blok yang akan ditangkap sekiranya terjadi eksepsi
           //Membuat File input stream
         fReader = new FileReader("Kamus.txt");
     
           //Membuat streamTokenezere untuk file input stream
         stInput = new StreamTokenizer(fReader);
         stInput.nextToken();
       

         while(stInput.ttype!= StreamTokenizer.TT_EOF)
         {
        
         if(stInput.ttype == StreamTokenizer.TT_WORD)
                  english[i] = stInput.sval;
            else
                 System.out.println("Bad file format");
              
            if(stInput.nextToken()== StreamTokenizer.TT_WORD)
                 indonesian[i] = stInput.sval;  
            else
                 System.out.println("Bad file format");                      
              
              stInput.nextToken(); 
              i++; 
              counter = counter + 1;   
      }//end while
             
           
       }//end try
        
          
         catch(FileNotFoundException ex) 
       {
       //Blok yang akan dijalankan kalau terjadi eksepsi
       System.out.println("File Not found :Kamus.txt");
       }
       catch(IOException ex)
       {
       //Blok yang akan dijalankan kalau terjadi eksepsi
       System.out.println(ex.getMessage());
       }
       finally
       {
          //Blok yang akan dijalankan terakhir kali
       try
       {
        //Blok yang akan ditangkap sekiranya terjadi eksepsi
        if(fReader!=null) fReader.close();
       }
       catch(IOException ex)
          {
           //Blok yang akan dijalankan kalau terjadi eksepsi
        System.out.println(ex);
          }
       }
     }
     
     
     public String Cari (int a) 
     {
      int i;
      String output=kata+" tidak ada dalam kamus";
      for (i=0; i < counter; i++)
      {
       if (a==0)
       {
        if (kata.equalsIgnoreCase(english[i])==true)
            output=indonesian[i];  
       }
       else if (a==1)
       {
        if (kata.equalsIgnoreCase(indonesian[i])==true)
            output=english[i];   
       }                    
      }
      return output;  
     }
     
     public static void main(String[] args)
     {
        String input, a, b;
        
        System.out.println("******************************");
  System.out.println("Welcome to Dictionary Software");
  System.out.println("      English-Indonesian      ");
  System.out.println("      Indonesian-English      ");
  System.out.println("******************************");
  System.out.println();

        int pilih;
  do
  {
   // Menu program
   System.out.println("Menu Program");
   System.out.println("1. English-Indonesian");
   System.out.println("2. Indonesian-English");
   System.out.println("0. Keluar");
   System.out.print("Pilih menu ");
   Scanner plh = new Scanner(System.in);
   pilih=plh.nextInt();
    
   switch (pilih)
   {
   
    case 1 :
            System.out.print("Masukkan kata dalam bahasa inggris = ");
      Scanner st1= new Scanner(System.in);
      input=st1.nextLine();
  
      Kamus kms1 = new Kamus(input); //penciptaan objek baru
      
      kms1.ReadFile();
      
      a=kms1.Cari(0);
      if (a.equals(input+" tidak ada dalam kamus"))
                           System.out.println(""+kms1.Cari(0)); 
                        else
                           System.out.println(""+input+" artinya "+kms1.Cari(0));
      break;
  
    case 2 :
      System.out.print("Masukkan kata dalam bahasa indonesia = ");
      Scanner st2= new Scanner(System.in);
      input=st2.nextLine();
  
      Kamus kms2 = new Kamus(input); //penciptaan objek baru
      kms2.ReadFile();
                        
      b=kms2.Cari(1);
      if (b.equals(input+" tidak ada dalam kamus"))
                           System.out.println(""+kms2.Cari(1)); 
                        else
                           System.out.println(""+input+" artinya "+kms2.Cari(1));
      break; 
      }
  }
  while(pilih!=0);       
     }
}

Output Program :

Install Framework Yii pada XAMPP

2011-03-15T05:54:00.003-07:00

Tentang Framework Yii :

Yii adalah framework php berkinerja tinggi terbaik dan sangat akurat untuk mengembangkan aplikasi web 2.0. Yii merupakan akronim dari Yes It Is untuk menanggapi secara ringkas berbagai pertanyaan seperti Is it fast? ... Is it secure? ... Is it professional? ... Is it right for my next project? ... Yes, it is! Yii ini gratis untuk digunakan dan dikembangkan. Selain itu juga open source yang ditulis dengan bahasa pemrograman PHP5. Yii ini digagas oleh Quang Xue yang mulai diproyeksikan pada 1 januari 2008 dan di-release versi 1.0 pada 3 Desember 2008.

Apakah Yii cepat?

Yii hanya akan me-load fitur-fitur yang dibutuhkan saja. Yii telah didukung secara penuh dengan sistem cache. Yii secara eksplisit dirancang bekerja secara efisien dengan AJAX.

Apakah Yii aman?

Keamanan menjadi hal yang standar bagi Yii meliputi validasi input, hasil yang telah di-filter, injeksi SQL, dan pencegahan cross-site script.

Apakah Yii profesional?

Yii membantu mengembangkan dan menggunakan kembali code yang ada. Hal ini mengikuti pola MVC, memastikan pemisah yang jelas dari logika dan presentasi.

Fitur-fitur Yii :

Yii hadir dengan kaya fitur seperti MVC, DAO/ActiveRecord, I18N/L10N, caching, authentication and role-based access control, scaffolding, testing, dll. Sehingga dapat mengurangi waktu pengembangan secara signifikan. Berikut ini penjelasan dari beberapa fitur yang ditawarkan oleh framework Yii :

Model-View-Controller (MVC, Yii mengadopsi arsitektur MVC yang mengijinkan penghilangan separation of concerns (SoC).
Database Access Objects (DAO), Query Builder, Active Record, DBMigration, Yii mengijinkan para developer untuk memodelkan data-data mereka pada database dalam hal pengobjekan dan menghindari kebosanan dan kompleksitas dari penulisan sql yang berulang.
Form input dan validasi, Yii membuat kumpulan form input sangat mudah dan aman. Dengan satu set validator serta berbagai metode helper dan widget untuk menyederhanakan tugas form input dan validasi.
Widget AJAX-enabled, Terintegrasi dengan JQuery, Yii hadir dengan satu set widget AJAX-enabled seperti field input otomatis yang komplit , treeview, data grid, yang memungkinkan UI menulis secara efisien dan sangat sederhana.
Authentication dan authorization, Yii telah dibangun dengan dukungan otontikasi dan otorisasi melalui hierarchical role-based access control (RBAC).
Skinning dan theming, Yii diterapkan dengan mekanisme skinning dan theming yang memungkinkan website beralih pandangan secara cepat.
Layanan Web, Yii mendukung pembuat otomatis dari spesifikasi layanan WSDL kompleks dan manajemen dari penanganan permintaan layanan web.
Internationalization (I18N) dan localization (L10N), Yii mendukung pemindahan pesan, tanggal, dan format waktu, format angka, dan lokalisasi antarmuka.
Skema Lapisan Cache, Yii mendukung data caching, halaman caching, penggalan caching, konten dinamis. Media penyimpanan dari caching dapat diganti dengan mudah tanpa menyentuh kode aplikasi.
Error Handling dan Logging, Error ditangani dan disajikan lebih bagus dan pesan log dapat dikategorikan, di-filter, dan diarahkan untuk membedakan tujuan.
Pembuat Kode Otomatis, Yii menyediakan satu set intuitif dan alat pembuat code yang sangat extensible yang dapat menolong anda men-generate code yang Anda butuhkan dengan cepat untuk fitur-fitur seperti form input, CRUD.
Keamanan, Yii dilengkapi dengan banyak langkah-langkah keamanan untuk membantu mencegah aplikasi Web Anda dari serangan seperti injeksi SQL, cross-site scripting (XSS), cross-site request forgery (CSRF), dan cookie tampering.
Pengujian Unit dan Fungsionalitas, Yii menyediakan dukungan untuk menulis dan menjalankan tes unit serta tes fungsionalitas berdasarkan pada unit PHP dan Selenium.
Penyesuaian ke XHTML, kode HTML dihasilkan oleh komponen Yii dan pembuat kode sesuai dengan standart XHTML.
Berbasis Object-Oriented, Framework Yii menonjolkan paradigma OOP dengan seksama, tidak didefinisikan banyak fungsi global atau variabel. Dan hirarki class yang mendefenisikan kemungkinan reusabilitas maksimum dan kustomisasi.
Sangat Ramah dengan Kode Pihak Ketiga, Yii dengan hati-hati dirancang untuk bekerja dengan baik dengan kode pihak ketiga. Sebagai contoh, Anda dapat menggunakan kode dari framework PEAR dan ZEND di dalam aplikasi Yii.
Dokumentasi yang Rinci, Setiap metode atau properti secara jelas didokumentasikan. Sebuah buku dan tutorial komprehensif juga tersedia secara sistematis mempelajari Yii.
Library Ekstensi, Yii menyediakan library ekstensi yang terdiri dari komponen user-contributed. Hal ini membuat daftar fitur di atas tidak pernah berakhir.

Kinerja Framework Yii :

Framework Yii merupakan framework berkinerja tinggi. Grafik di atas ini menunjukkan bagaimana Yii sangat efisien bila dibandingkan dengan framework PHP yang populer lainnya. Dalam grafik, RPS singkatan dari "request per second" yang menjelaskan berapa banyak permintaan aplikasi yang ditulis dalam framework yang dapat diproses per detiknya. Semakin tinggi jumlahnya, maka framework menjadi lebih efisien. Seperti yang bisa kita lihat bahwa framework Yii ini melebihi semuanya dari framework lainnya dalam perbandingan ini. Keuntungan kinerja Yii sangat signifikan ketika secara luas digunakannya ekstensi APC yang diaktifkan.

Apakah Anda tertarik untuk menggunakan framework Yii ini sebagai framework pengembang aplikasi web Anda dengan fitur-fitur yang kaya dan tentunya sangat menarik ?

Instalasi Framework Yii pada XAMPP :

Sebelum melakukan instalasi, terlebih dahulu Anda harus memperhatikan web service yang Anda miliki. Apakah support PHP 5.1? Karena framework Yii ini dapat bekerja maksimal pada PHP 5.1.

Download file framework Yii http://www.yiiframework.com/download/
Hasil unduhan berupa file yii-1.1.6.r2877.zip, extract file tersebut pada folder xampp
Kemudian buka command prompt pada komputer anda. Start Menu-All Programs-Accessories-Command Prompt. Setelah itu kita akan lakukan instalasi melalui command prompt ini.
Secara default akan tampil direktori C:\. Berhubung folder xampp pada komputer saya ada di drive D: maka saya harus memindahkan terlebih dahulu ke drive D: dengan cara ketik D: lalu tekan tombol enter sehingga muncul tulisan di bawahnya seperti D:\>.
Lalu ketik cd D:\xampp\php sehingga akan muncul tulisan di bawahnya seperti D:\xampp\php>
Ketik php.exe D:\xampp\yii-1.1.6.r2877\framework\yiic webapp D:\xampp\htdocs\yiiframework , tulisan ini akan meng-install framework Yii dan memindahkan folder hasil instalasi ke dalam folder htdocs.
Lalu akan muncul tulisan Create a Web application under 'D:\xampp\htdocs\yiiframework'? [Yes | No ] kemudian ketik Yes. Maka, akan muncul tulisan-tulisan seperti gambar berikut :
Instalasi selesai, silakan buka web browser anda lalu ketikkan "http://localhost/yiiframework" sehingga muncul seperti gambar berikut :

Install Joomla Versi 1.6 pada XAMPP

2011-03-14T17:59:00.000-07:00

Sebelum melakukan instalasi joomla, anda harus meng-install terlebih dahulu web service yang kita kenal dengan apache. Dalam hal ini, saya menggunakan aplikasi xampp 1.7.1 sebagai pendukung aplikasi service web-nya. Dalam aplikasi xampp tersebut telah support php 5.2.9, mysql client server 5.0.5.1a, dan apache 2.2.11. Anda bisa mengunduh aplikasi tersebut di website resmi xampp http://www.apachefriends.org/en/xampp.html secara gratis. Setelah mengunduh file tersebut, anda bisa melakukan instalasi pada komputer anda dan jangan lupa bahwa instalasi dialamatkan pada direktori drive bukan folder. Misal, C:\xampp atau D:\xampp.

Berikut ini adalah langkah-langkah instalasi joomla versi 1.6 di xampp pada Windows 7 :

Download joomla versi 1.6 disini
Buat folder baru dan beri nama sesuka anda. Misal, "joomla1.6"
Extract file zip hasil unduhan tadi ke dalam folder baru tersebut
Folder "joomla1.6" tersebut dapat anda copy ke dalam folder htdocs yang ada pada folder xampp hasil instalasi
Setelah itu, silakan buka web browser anda dan ketikkan "http://localhost/joomla1.6/" kemudian akan muncul seperti gambar berikut ini :
Lalu pilih bahasa yang akan anda gunakan, klik tombol next pada pojok kanan atas sehingga muncul gambar berikut ini :
Abaikan saja, lalu klik tombol next pada pojok kanan atas sehingga muncul gambar berikut ini :
Abaikan saja, lalu klik tombol next pada pojok kanan atas sehingga muncul gambar berikut ini :
Isi field yang tersedia sesuai dengan gambar di atas. Field Database Type = 'MySQL', Host name = 'localhost', username = 'root', password = '' , Database name = 'dbperusahaan'. Dalam hal ini, database name dapat diisi sesuai dengan keinginan anda. Jika sudah selesai melakukan pengisian, maka anda bisa klik tombol next pada pojok kanan atas sehingga muncul gambar berikut ini :
Kemudian anda akan masuk dalam langkah FTP Configuration, abaikan saja lalu pada pojok kanan atas sehingga muncul gambar berikut ini :
Isi field yang tersedia, lalu klik tombol install sample data. Tunggu beberapa saat, kemudian pada tombol tersebut akan muncul tulisan 'Sampled data installed succesfully',lalu klik tombol next pada pojok kanan atas sehingga muncul gambar berikut ini :
Instalasi joomla telah selesai. Namun, perhatikan tulisan yang berwarna merah dan ikuti perintahnya. Hapus folder 'installation' pada direktori. Misal, C:\...\xampp\htdocs\joomla1.6\. Kemudian klik tombol Administrator sehingga muncul gambar berikut :
Anda telah memasuki form login, silakan login terlebih dahulu sesuai dengan username dan password yang anda isi tadi. Kemudian klik tombol Login maka akan didapatkan tampilan sebagai berikut :
Anda sedang bekerja dalam form administrator untuk memodifiksi tampiilan website anda. Selamat Mencoba!

Belajar Dasar Logika Pemrograman 2

2011-03-12T20:21:00.000-08:00

Ada suatu model permasalahan dalam logika pemrograman bagi pemula seperti yang diperlihatkan pada gambar berikut ini :

Bagaimana penyelesaiannya ?

Untuk penyelesaian logika program membangun bentuk seperti pada gambar 1 di atas, kita harus melakukan permodelan. Kita mengacu pada baris saja, setiap baris akan merepresentasikan apakah karakter atau angka dicetak atau tidak. Misal, baris ke-1 dicetak hanya 1 angka saja. Baris ke-2 dicetak hanya 2 angka saja, begitu juga seterusnya hingga n baris. Sehingga dapat dibuat suatu logika bahwa jika kolom lebih besar dari baris ke-i maka cetak karakter spasi dan jika tidak maka cetak angka (angka tersebut bertambah satu untuk setiap iterasinya).
Untuk penyelesaian logika program membangun bentuk seperti pada gambar 2 di atas, kita harus melakukan suatu permodelan. Misal, gambar di atas terdiri dari nxn baris dan kolom. Disitu terlihat bahwa nilai n=5 sehingga jumlah baris sebanyak 5 dan jumlah kolom sebanyak 5 pula. Kita harus tahu pola dari angka-angka tersebut. Logika dimulai dari baris ke-1 kemudian kolom ke-j sampai n. Dilanjut lagi dari baris ke-2 kemudian kolom ke-j sampai n. Begitu seterusnya hingga baris ke-n. Berikut ini pola yang terbentuk :
- Baris ke-1 1 +9 10 +1 11 +9 20 +1 21
- Baris ke-2 2 +7 9 +3 12 +7 19 +3 22
- Baris ke-3 3 +5 8 +5 13 +5 18 +5 23
Jika kita perhatikan, setiap kolom ganjil dan genap membentuk suatu pola. Pada kolom ke-1, disesuaikan saja dengan baris ke-i. Namun, pada kolom ganjil berikutnya didapat suatu rumus angka pada kolom sebelumnya + (2 x baris ke-i). Misal, pengisian pada baris ke-2 kolom ke-3. Angka pada kolom sebelumnya yaitu 9 + (2 x 2) = 13. Pada kolom genap didapat suatu rumus angka pada kolom sebelumnya + (jumlah baris x 2 - baris ke-i-1)-baris ke-i. Misal, pada kolom ke-4 baris ke-2. Angka pada kolom sebelumnya yaitu 12 + (5 x 2 - 1)-2 = 19.

Source code Program :

/**
 * @(#)Logika1.java
 *
 * 
 * Adhitya Ahmad Pradypta (0510960002) 
 * @version 1.00 2011/3/12
 */


public class Logika1 {

    public static void main (String[] args) {
     int n=5, bil=1;
     
     for (int i=0; i < n; i++) {
      for (int j=0; j < n; j++) {
       if (j > i) {
        System.out.printf("%-3s"," ");
       }
       else {
        System.out.printf("%-3s",bil);
        bil=bil+1;
       }
      } 
     System.out.println();
     }
    }   
}

Output Program :

/**
 * @(#)Logika2.java
 *
 * 
 * Adhitya Ahmad Pradypta (0510960002) 
 * @version 1.00 2011/3/12
 */


public class Logika2 {

    public static void main (String[] args) {
     int n=5, bil=0, a=0;
     //baris
     for (int i=0; i < n; i++) {
      //kolom
      for (int j=0; j < n; j++) {
       //jika kolom genap
       if ((j+1)%2 == 0) {       
        bil=bil+(n*2-i)-(i+1);
        System.out.printf("%-3s",bil);
       }
       //jika kolom ganjil
       else {
        //jika kolom pertama
        if (j==0) {
         bil=bil+(i+1);
         System.out.printf("%-3s",bil);
        }
        else {
         bil=bil+(2*i+1);
         System.out.printf("%-3s",bil);
        }        
       }
      }
      bil=0; 
    System.out.println();
     }
 }  
}

Output Program :

Belajar Dasar Logika Pemrograman 1

2011-03-11T08:27:00.000-08:00

Pada dasarnya, hal utama dalam pemrograman adalah logika. Suatu susunan baris code pada suatu aplikasi dibangun dengan menggunakan logika. Untuk membentuk suatu pemahaman berdasarkan logika yang ada, perlu latihan dan keseriusan dalam mempelajari suatu permasalahan yang ada pada pemrograman. Latihan yang intensif meningkatkan motorik dan kebiasaan kita dalam menyelesaikan permasalahan yang ada dalam pemrograman.

Bagi pemula, diperlukan suatu simulasi atau contoh-contoh sederhana untuk meningkatkan kemampuan dalam menyusun logika suatu code. Saya akan membantu teman-teman yang merasa kesulitan dalam memahami logika pemrograman melalui contoh contoh sederhana. Sebelumnya, teman-teman harus memahami syntax yang terdapat pada bahasa pemrograman beserta kegunaannya. Misal, syntax while dan for digunakan untuk perulangan, syntax if, switch, case digunakan untuk suatu kondisi, dan lain-lain. Dengan memahami kegunaan suatu syntax pada bahasa pemrograman, pada saat kita sedang berpikir mengenai logika program nantinya bisa diintrepetasikan dengan cepat pada lembar kerja yang disediakan software bahasa pemrograman yang digunakan tanpa perlu mencari-cari syntax yang dimaksud terlebih dahulu pada situs google atau buku manual software tersebut. Kemudian pelajari fitur-fitur yang disediakan dari suatu software bahasa pemrograman tersebut.

Biasanya, pada waktu perkenalan kuliah mengenai pemrograman sering disuguhi kasus-kasus logika perancangan suatu bangun segitiga, trapesium, belah ketupat, dan sebagainya pada hasil keluaran program.

Contoh keluaran program di atas sering juga digunakan sebagai logika dasar untuk tes coding seorang programmer di suatu perusahaan. Dengan gambar di atas tadi, kita disuruh membuat pseudocode atau program yang hasilnya seperti keluaran program seperti pada gambar di atas.

Source code Program :

Bintang Segitiga

/**
 * @(#)Coba.java
 *
 * Membuat Segitiga Bintang Sama Sisi
 * Adhitya Ahmad Pradypta (0510960002)  
 * @version 1.00 2011/3/10
 */

import java.util.*;

public class Coba {

    public static void main(String args[]) 
    {
     int n=5;
     int a, b;
     a = 1;
     //baris
     for (int i=0; i < n; i++)  {
      //kolom
      for (int j=0; j < n*2-1; j++) {
       
       b=n-a;
       //kondisi membuat bintang segitiga
       if ((j < b ) || (j >= (b+2*a-1))) {
        System.out.print(" ");
       } 
       else {
         System.out.print("*"); 
       }  
      }//akhir kolom
     a = a+1;
     //ganti baris
     System.out.println();
     }//akhir baris
    }   
}

Bintang Belah Ketupat

/**
 * @(#)Coba1.java
 *
 * Membuat Belah Ketupat Bintang
 * Adhitya Ahmad Pradypta (0510960002) 
 * @version 1.00 2011/3/10
 */


public class Coba1 {

    public static void main(String args[]) 
    {
     int n=5;
     int a, b, c;
     a = 1; c=n-1;
     //baris
     for (int i=0; i < n*2-1; i++)  {
      //kondisi bagian atas
      if (i < n) {
       //kolom < n
       for (int j=0; j < n*2-1; j++) {
        b=n-a;
        //kondisi pembentuk segitiga atas
        if ((j < b ) || (j >= (b+2*a-1))) {
         System.out.print(" ");
        } 
        else {
           System.out.print("*"); 
        }  
       }
       a = a+1;
      } 
      //kondisi bagian bawah 
      else {
       //kolom ke n+1
       for (int j=0; j < n*2-1; j++) {
        b=n-c;
        //kondisi pembentuk segitiga bawah
        if ((j < b) || (j >= (b+2*c-1)) ) {
         System.out.print(" ");
        } 
        else {
           System.out.print("*"); 
        }  
       }//akhir kolom
       c = c-1; 
      }
     //ganti baris
     System.out.println();
     }//akhir baris
    }    
}

Bintang Segiempat dengan Titik Pusat

/**
 * @(#)Coba2.java
 *
 * Membuat Segiempat dengan Titik Pusat
 * Adhitya Ahmad Pradypta (0510960002) 
 * @version 1.00 2011/3/10
 */
 
 import java.util.*;

public class Coba2 {

    public static void main (String args[]) {
     int n=5;
     
     if (n > 2){
      //baris
      for (int i=0; i < n; i++){
       //kolom
       for (int j=0; j < n; j++) {
        //kondisi pembentuk segiempat bintang
        if ((i==0) || (i==n-1) || (j==0) || (j==n-1)) {
         System.out.print("*");
        } 
        else {
         //kondisi penentu titik pusat
         if (n%2==1){
          if ((i==n/2) && (j==n/2)){
           System.out.print("*");
          } else {
          System.out.print(" ");
         }
        }
        else {
         System.out.print(" ");
        }
        }
       }//akhir kolom
      System.out.println();
      }//akhir baris
     }
     else {
      System.out.println("Tidak ada bangun yang akan dibentuk");
     } 
    }  
}

Bintang Tanda Plus

/**
 * @(#)Coba3.java
 *
 * Membuat Tanda Plus
 * Adhitya Ahmad Pradypta (0510960002) 
 * @version 1.00 2011/3/10
 */
 
 import java.util.*;

public class Coba3 {

    public static void main (String args[]) {
     int n=5;
     
     if (n > 2){
      //baris
      for (int i=0; i < n; i++){
       //kolom
       for (int j=0; j < n; j++) {
        
        //kondisi pembuat tanda plus
        if (n%2==1){
         if ((i==n/2) || (j==n/2)){
          System.out.print("*");
         } else {
          System.out.print(" ");
         }
        }
        else {
         System.out.print("Bangun tidak simetris");
         System.exit(0);//keluar program
        }
       }//akhir kolom
       System.out.println();
      }//akhir baris
      
      }
     else {
      System.out.println("Tidak ada bangun yang akan dibentuk");
     } 
    }  
}

Bintang Trapesium

/**
 * @(#)Coba4.java
 *
 * Membuat Belah ketupat
 * Adhitya Ahmad Pradypta (0510960002)  
 * @version 1.00 2011/3/10
 */

import java.util.*;

public class Coba4 {

    public static void main(String args[]) 
    {
     int n=6;
     int a, b;
     a = 1;
     //baris
     for (int i=0; i < n; i++)  {
      //kolom
      for (int j=0; j < (n*2-1)+n; j++) {
       b=n-a;
       //kondisi membuat bintang trapesium
       if ((j < b ) || (j >= n+b+2*a-1)) {
        System.out.print(" ");
       } 
       else {
         System.out.print("*"); 
       }  
      }//akhir kolom
     a = a+1;
     //ganti baris
     System.out.println();
     }//akhir baris
    }  
}

Instalasi JCreator Pro Edition Versi 4.5

2011-03-11T05:31:00.000-08:00

Tentang JCreator :

Jcreator merupakan suatu software yang dirancang untuk membangun aplikasi dari suatu bahasa pemrograman java. Bahasa pemrograman java adalah suatu bahasa pemrograman berbasis Object Oriented Programming (OOP). Bahasa pemrograman ini sangat banyak digunakan para developer saat ini karena lebih mudah dalam mengimplementasikan, lebih aman, dan multiplatform (dapat digunakan pada berbagai sistem operasi). JCreator yang di-release oleh perusahaan ternama xinox software. merupakan perusahaan software dinamis yang berdomisili di Delfts, Netherlands pada tahun 2001.

Ketika penulis menulis artikel ini, JCreator mengeluarkan versi terbaru yaitu JCreator 5.0. Produk JCreator terdiri dari JCreator pro dan JCreator LE, yang membedakannya terletak dari segi fitur yang ditawarkan untuk user. Silakan lihat produk-produk JCreator yang siap diunduh disini . Baiklah, untuk lebih menyingkat proses. Sebelum kita memulai instalasi JCreator, alangkah baiknya unduh beberapa software atau file-file berikut ini :

Unduh software JCreator 4.5 di http://www.jcreator.com/xinox.htm (bagi yang memiliki dana lebih untuk menggunakan software berbayar ini). Namun, jika anda menginginkan software JCreator yang illegal (software JCreator plus crack) maka anda bisa unduh disini.
Selanjutnya, anda dapat mengunduh file Java Development Kit 6 (JDK6) jdk-6u10-windows-i586-p.exe. Lihat juga update file JDK6 disini.
Kemudian unduh file dokumentasi jdk-6-doc.zip.

Jika anda telah selesai mengunduh file-file tersebut, maka anda bisa melakukan proses instalasi berikut ini.

A. Instalasi JDK 6 Update 10 untuk windows

Klik file jdk-6u10-windows-i586-p.exe, lalu akan muncul gambar berikut :
Klik tombol accept, lalu akan muncul sebagai berikut :
Klik tombol next, lalu akan muncul gambar seperti berikut :
Tunggu beberapa saat, sehingga muncul seperti gambar berikut :
Klik tombol next, lalu muncul seperti gambar berikut :
Tunggu beberapa saat, sehingga muncul gambar berikut :
Instalasi selesai, anda dapat melanjutkan proses berikutnya.

B. Copy folder Jdk-6-doc

Extract file jdk-6-doc.zip yang telah diunduh tadi menjadi suatu folder docs.
Kemudian copy folder tersebut ke path file jdk-6u10-windows-i586-p.exe di-install. Misal, C:\Program Files (x86)\Java\jdk1.6.0_10
Tunggulah hingga folder docs tadi benar-benar pindah ke path C:\Program Files (x86)\Java\jdk1.6.0_10

C. Instalasi JCreator 4.5 Full

Klik file JCreatorPro 4.50 New.exe yang telah diunduh tadi. Kemudian akan muncul seperti gambar berikut :
Klik tombol next, kemudian akan muncul seperti gambar berikut ini :
Lalu klik tombol next, sehingga muncul seperti gambar berikut ini :
Klik tombol next, kemudian akan muncul seperti gambar berikut ini :
Klik tombol yes, kemudian akan muncul seperti gambar berikut ini :
Klik tombol next, kemudian akan muncul seperti gambar berikut ini :
Klik tombol next, kemudian akan muncul seperti gambar berikut ini :

>
Klik tombol install, kemudian akan muncul seperti gambar berikut ini :
Instalasi selesai, kemudian klik tombol finish,lalu muncul gambar seperti berikut :
Sesuaikan kondisi pilihan pada gambar di atas, kemudian klik tombol next sehingga muncul :
Sesuaikan kondisi pilihan pada gambar di atas dimana pilih list .java, kemudian klik tombol next sehingga muncul :
Klik tombol next, kemudian akan muncul seperti gambar berikut ini :
Klik tombol finish, kemudian akan muncul seperti gambar berikut ini :
Gambar di atas merupakan tampilan awal JCreator 4.5. Untuk memulai lembar kerja pilih sub-menu new File yang terletak di bawah menu File lalu klik java class. Sehingga muncul seperti gambar berikut :
Setelah itu, jangan lupa melakukan regristasi pada menu Help lalu pilih Enter Registration Details sehingga muncul seperti gambar berikut :
Kemudian isi username dan key sesuai dengan serial number yang tersedia pada saat pengunduhan. Username = 3n_byt3 dan Key = 00000G-X8FETD-A100U6-NZVFUR-NJED3U-141YU0-KA4BYV-ZTFB65-2Q9DWD.

Setelah anda mengikuti semua proses instalasi di atas, anda dapat menikmati suguhan fitur dan tampilan yang apik dari JCreator 4.5 ini. SELAMAT MENCOBA!!!

Pengolahan Sinyal Digital menggunakan komponen dsp FFT di delphi 7

2010-04-22T17:39:00.000-07:00

Pengenalan :

Proses pengolahan sinyal digital dilakukan setelah proses pembacaan file wav dan proses pengolahan sebelumnya untuk mendapatkan data yang benar-benar bebas dari noise yang mencerminkan data aktual karakteristik dari suara seseorang tersebut. Tujuan dari pengolahan sinyal digital adalah untuk mencapai feature extraction, sebuah proses yang mengkonversi sinyal suara menjadi beberapa parameter yang dapat diambil untuk proses selanjutnya yaitu identifikasi pola suara. Feature extraction merupakan proses mengekstraksi data hasil akuisisi sehingga dihasilkan data yang berdimensi lebih kecil, yang nantinya digunakan untuk merepresentasikan tiap-tiap pembicara.

Pengolahan sinyal digital ini berbasis fast fourier dan memiliki beberapa proses untuk mencapai feature extraction. Feature extraction yang paling cepat untuk diproses dan didapatkan adalah nilai magnitude dalam domain frekuensi. Hal ini dikarenakan frekuensi manusia yang dapat didengar memiliki batasan tertentu antara 0-20000Hz sehingga rentang yang dimiliki menjadi tetap atau konstan. Untuk itu nilai magnitude dalam domain frekuensi sangat memungkinkan dilakukan pada proses selanjutnya daripada nilai amplitudo dalam domain waktu yang setiap pencuplikan sampel selalu tak konsisten. Proses-proses tersebut yaitu :

Frame Blocking

Panjang frame yang biasanya digunakan untuk pemrosesan sinyal antara 10-30 ms atau 256-1024 data. Panjang frame yang digunakan sangat mempengaruhi keberhasilan dalam analisa spectral. Di satu sisi ukuran dalam frame harus sepanjang mungkin untuk dapat menunjukkan resolusi frekuensi yang baik. Akan tetapi, di lain sisi ukuran frame juga harus cukup pendek untuk dapat menunjukkan resolusi waktu yang baik.

Proses Frame Blocking yaitu melakukan blok terhadap sinyal-sinyal menjadi frame-frame N sampel, dengan frame-frame berdekatan dengan spasi M (M < N). Frame pertama terdiri dari N sampel pertama. Frame kedua dengan M sampel setelah frame pertama, dan overlap dengan N–M sampel. Dengan cara yang sama, frame ketiga dimulai 2M sampel setelah frame pertama (atau M sampel setelah frame kedua) dan overlap dengan N– 2M sampel. Proses ini berlanjut hingga semua sinyal suara dihitung dalam satu atau banyak frame. Nilai untuk N dan M adalah N = 256 dan M =100. Berikut ini adalah diagram blok untuk proses penentuan frame :

Jadi, proses frame tersebut dilakukan secara terus-menerus hingga semua sinyal dapat terproses. Selain itu, proses ini umumnya dilakukan secara overlapping untuk setiap frame-nya. Panjang daerah overlap yang umum digunakan adalah kurang lebih 30% sampai 50% dari panjang frame.

Windowing

Proses windowing ini bertujuan untuk mengurangi terjadinya kebocoran spectral atau aliasing yang mana merupakan suatu efek dari timbulnya sinyal baru yang memiliki frekuensi yang berbeda dengan sinyal aslinya. Efek tersebut dapat terjadi karena rendahnya jumlah sampling rate atau karena proses frame blocking yang menyebabkan sinyal menjadi discontinue.

Ada beberapa fungsi pada proses window diantaranya adalah sebagai berikut :

Blackman Window

Fungsi ini menghasilkan sidelobe level yang paling tinggi (kurang lebih -58 dB), tapi fungsi ini juga menghasilkan noise paling besar (kurang lebih 1.73 BINS).

Window Rectangle

Fungsi ini menghasilkan noise yang paling rendah berkisar 1.00 BINS, tapi sayangnya fungsi ini memberikan sidelobe level yang paling rendah sehingga menyebabkan terjadinya kebocoran spektral atau aliasing.

Hamming Window

Fungsi ini menghasilkan sidelobe level yang tidak terlalu tinggi (kurang lebih -43 dB). Selain itu, noise yang dihasilkan pun tidak terlalu besar (kurang lebih 1.36 BINS).

Fast Fourier Transform (FFT)

Untuk mendapatkan sinyal dalam domain frekuensi dari sebuah sinyal discrete, salah satu metode transformasi fourier yang digunakan adalah discrete fourier transform (DFT). DFT dilakukan terhadap masing-masing frame dari sinyal yang telah di-windowing. Namun, yang menjadi persoalan adalah bahwa DFT tersebut memerlukan waktu komputasi yang sangat panjang untuk data yang besar. Oleh karena itu, diperlukan suatu teknik komputasi yang efisien, baik dari sisi waktu maupun dari sisi penggunaan memori.

FFT adalah algoritma cepat untuk mengimplementasikan discrete fourier transform (DFT).FFT ini mengubah masing-masing frame N sampel dari domain waktu menjadi domain frekuensi.

Hasil transformasi ini dipengaruhi oleh beberapa parameter, yaitu sample rate sinyal suara dan FFT size. Sample rate adalah banyaknya sampel input analog yang diambil secara digital dengan satuan Hertz (Hz). Sample rate sinyal suara berpengaruh pada besarnya jangkauan frekuensi dari koefisien hasil FFT. Jangkauan frekuensi hasil FFT adalah setengah dari sample rate sinyal suara yang ditransformasi. Artinya, apabila terdapat sinyal suara dengan sample rate 44100 Hz, maka koefisien-koefisien hasil transformasi dari sinyal suara tersebut berkisar dari 0 Hz sampai 22050 Hz. Jadi, semakin besar sample rate , maka akan semakin detail pula sampel analog yang diambil secara digital.

Sedangkan FFT size adalah panjang dari FFT yang digunakan. FFT size berpengaruh terhadap ketelitian tiap koefisien FFT. Semakin besar FFT size, maka tiap koefisien hasil FFT akan mewakili rentang frekuensi yang semakin kecil, sehingga ketelitiannya semakin tinggi. Sebaliknya apabila ukuran sampel FFT semakin kecil, maka tiap koefisien hasil FFT akan mewakili rentang frekuensi yang semakin besar, sehingga ketelitiannya semakin rendah.

Output dari FFT ditransformasikan ke dalam rentang frekuensi. Nilai magnitude terhadap frekuensi didapatkan berdasarkan rumus dibawah ini :

Proses :

Percakapan untuk data sampel telah ditentukan sebelumnya. Saya menggunakan frase atau kata yang sama misal “Hallo”. Hal ini dilakukan agar dalam proses penelitian lebih mudah karena dengan frase atau ucapan yang sama diharapkan masing-masing pembicara dapat merepresentasikan nilai yang khas dari suaranya maka parameter yang ditentukan tidak banyak. Pada dasarnya struktur fisik pengucapan setiap orang berbeda sehingga dihasilkan gelombang yang berbeda pula. Adapun lamanya pembicaraan dalam suatu file wav tersebut berdurasi kurang lebih 0.7 sampai 1.27. Hal ini dilakukan agar banyak frame yang dihasilkan untuk setiap file sama karena ukuran waktu mempengaruhi panjang data dari file wav tersebut. Banyak frame juga bergantung pada ukuran data yang diberikan untuk tiap frame-nya. Saya menetapkan banyak data untuk setiap frame sebesar 1024 sehingga untuk setiap overlap data sebesar N/2 buah data yaitu 512.

Pada tahap selanjutnya, panjang data dari suatu file wav tersebut telah diketahui. Dari panjang data file wav tersebut akan dibagi menjadi beberapa frame. Jadi, banyak frame dapat diketahui dengan membagi panjang data dengan nilai 1024 sehingga banyak frame akan konsisten yaitu 36 selama selang waktu 0.7 detik sampai 1.27 detik.

Untuk tiap frame akan dilakukan proses FFT dengan window function Hamming, sehingga menghasilkan N buah data RealOut dan Imaginer. Karena FFT menggunakan komponen tambahan yaitu dspLab pada Delphi 7, maka algoritma FFT dan fungsi window Hamming akan di-handle langsung oleh komponen tersebut. Begitu pula dengan ukuran data tiap frame yang ditentukan sendiri melalui komponen tersebut melalui properties BufferSize. Jadi, nilai BufferSize yaitu 1024 dan nilai N/2 buah data diinisialisaikan pada properties BufferSize2 secara otomatis.

Hasil dari FFT tersebut adalah simetris, sehingga hanya N/2 buah data yang digunakan untuk proses selanjutnya. Dari N/2 buah data tersebut akan dihitung rata-rata nilai magnitude yang menjadi nilai dari frame tersebut. Karena sampling rate yang digunakan adalah sebesar 44100Hz, maka frekuensi tertinggi yang diperoleh adalah 22050Hz dengan pembagian frekuensi sebesar 22050Hz/512 data = 43.07 Hz/data. Nilai frekuensi tersebut sesuai dengan batas frekuensi tertinggi yang dapat didengar oleh manusia. Tabel berikut ini menunjukkan detail pembagian frekuensi sebagai hasil dari proses frequency extraction.

Data	Frekuensi	Magnitude
1	0 Hz – 43.07 Hz	---------------
2	43.07 Hz – 86.13 Hz	---------------
---	-------------------------	---------------
512	22006.93 Hz – 22050 Hz	---------------

Implementasi Program :

Written By Adhitya A P (0510960002)
Student of Computer Science in Brawijaya University

unit UnitMain;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, dspFFT, dspIIRFilters, Menus, StdCtrls,
  Buttons, XPMan, DBCtrls, ExtCtrls, Mask, ComCtrls, DB, TeEngine,
  MmSystem, Series, Chart, Math;

type
  TFMain = class(TForm)
    
    dspFFTL: TdspFFT;
    XPManifest1: TXPManifest;
    StatusBar1: TStatusBar;
    dspFFTR: TdspFFT;
    BitBtnProses: TBitBtn;
    Memo1: TMemo;
    Chart1: TChart;
    Series1: TFastLineSeries;
    Chart2: TChart;
    Series2: TFastLineSeries;

   
    procedure BitBtnProsesClick(Sender: TObject);
 
  private
    { Private declarations }
    wavehdr : TWaveHeader;
    wavedata : array [0..1] of TChannel;
    numsamples : integer;
    
    freqScale : array [1..20000] of real;
    procedure GetInfoWav(filename : string; Memo : TMemo);
    procedure DisplayWav;
    procedure DigitalSignalProcessing(filename : string);
  public
    { Public declarations }
    procedure GetGrafik(i : Integer);
  end;

var
  avgMagnitude, magnitude, Rmagnitude : array of real;

procedure TFMain.DigitalSignalProcessing(filename : string);
var
i, j : Integer;
freqRange, nilai : real;
str : string;

begin
//Menentukan Banyak Frame
nFrame := Round(Length(wavedata[0].Data)/dspFFTL.BufferSize);

//inisial array
SetLength(avgMagnitude, nFrame);
SetLength(Lmagnitude, dspFFTL.BufferSize2);
SetLength(Rmagnitude, dspFFTL.BufferSize2);

str := '';

//proses segmentasi
for i:= 0 to nFrame-1 do
    begin
        StatusBar1.Panels.Items[1].Text := 'Proses File    '+DM.TDataWav.Fields[1].AsString+' pada Frame ke-'+IntToStr(i+1);
        Memo1.Lines.Append('Frame ke-'+IntToStr(i+1));

        //input FFT
        for j := 0 to dspFFTL.BufferSize-1 do
            begin
                case wavehdr.NumChannels of
                //kasus mono
                1 : begin
                    dspFFTL.RealIn[j] := wavedata[0].Data[dspFFTL.BufferSize*i+j];
                    dspFFTL.ImagIn[j]:= 0;
                end;
                //kasus stereo
                2 : begin
                   //channel 0
                   dspFFTL.RealIn[j] := wavedata[0].Data[dspFFTL.BufferSize*i+j];
                   dspFFTL.ImagIn[j]:= 0;
                   //channel 1
                   dspFFTR.RealIn[j] := wavedata[1].Data[dspFFTR.BufferSize*i+j];
                   dspFFTR.ImagIn[j]:= 0;
                end;
                end; //end case channel
             end;

          //proses FFT with komponen dsp
          dspFFTL.FFT;
          dspFFTR.FFT;
          //procedure hitung nilai magnitude
          dspFFTL.CalculateMagnitudes;
          dspFFTR.CalculateMagnitudes;

          //range frekuensi
          freqRange := (wavehdr.SampleRate/2)/dspFFTL.BufferSize2;
          for j:= 0 to (dspFFTL.BufferSize2) do
               freqScale[j] := (j*freqRange);

          //proses awal nilai magnitude
          nilai :=0;
          for j:= 0 to (dspFFTL.BufferSize2-1) do
              begin
              Lmagnitude[j] := sqrt(power(dspFFTL.RealOut[j],2)+power(dspFFTL.ImagOut[j],2));
              Rmagnitude[j] := sqrt(power(dspFFTR.RealOut[j],2)+power(dspFFTR.ImagOut[j],2));
              nilai := nilai+magnitude[j];
              end;

          //rata-rata magnitude tiap frame
          avgMagnitude[i] := StrToFloat(Format('%0.2f', [nilai/dspFFTL.BufferSize2]));
          str := str +' '+FloatToStr(avgMagnitude[i]);
          Memo1.Lines.Append('Rata-rata magnitude = '+FloatToStr(avgMagnitude[i])+' ');
          Memo1.Lines.Append(''); 

          //Penggambaran Grafik Sinyal
          GetGrafik(i);
    end;
    strpola := str;
    Memo1.Lines.Add('Pola = '+str);
    Memo1.Lines.Add('');
end;

procedure TFMain.GetGrafik(i : Integer);
var j: Integer;
begin

   Series1.Clear;
   for j:= 0 to (dspFFTL.BufferSize2)-1 do
       Series5.AddXY(freqScale[j], Rmagnitude[j], '', clMaroon);

   Series2.Clear;
   for j:= 0 to (dspFFTL.BufferSize2)-1 do
       Series3.AddXY(freqScale[j], Lmagnitude[j], '', clMaroon);

end;

Download komponen dsplab disini

Pembacaan File WAV di delphi

2010-04-22T10:56:00.000-07:00

Struktur File WAV

Format file wav merupakan bagian dari spesifikasi RIFF milik Microsoft yang digunakan untuk penyimpanan file-file multimedia. File wav dimulai dengan bagian header dan diikuti oleh rentetan data chunk. File wav terdiri dari 3 bagian, yaitu main chunk, format chunk, dan data chunk.

Sinyal suara yang direpresentasikan file wav dalam bentuk discrete, berupa deret bilangan yang merepresentasikan amplitudo dalam domain waktu. Pada bagian file header terdapat informasi tentang file wav tersebut, diantaranya menyatakan nilai sample rate, jumlah channel, dan bit per sample. Dari keterangan pada file header tersebut dapat diketahui berapa sampel yang dicuplik dari sinyal analog tiap detik. Struktur WAV dapat dilihat pada Gambar di bawah ini :

Bagian Main Chunk

ChunkID : berisi kata “RIFF” dalam format ASCII.
ChunkSize : berisi informasi ukuran chunk.
Format : berisi kata “WAVE”.

Bagian Format Chunk

SubChunk1ID : berisi kata “fmt”.
SubChunk1Size : berisi informasi ukuran subchunk1
c. AudioFormat : informasi jenis kompresi data chunk. Misalnya bernilai 1 untuk kompresi PCM.
NumChannels : banyaknya channel. Misal: Mono=1, Stereo=2.
SampleRate : sample rate dari file wav, misal 8000 untuk 8000Hz, 44100 untuk 44100 Hz.
ByteRate : banyaknya byte tiap detik. ByteRate = SampleRate x NumChannels x BitsPerSample / 8.
BitsPerSample : ukuran bits untuk tiap sampel.Misal: 8 bit = 8

Bagian Data Chunk

SubChunk2ID : berisi kata “data”.
SubChunk2Size : berisi informasi ukuran subchunk2. SubChunk2Size = NumSamples x NumChannels x BitsPerSample / 8. NumSamples = (DataByte / NumChannels) / BitsPerSample.
Data : Data suara aktual dalam byte, merepresentasi-kan amplitudo tiap sampel dari sinyal.

Proses Pembacaan File WAV di Delphi 7:

Pada dasarnya bahasa pemrograman delphi sudah mempunyai kelas untuk dapat membaca suatu file yang berekstensi *.wav. Membuat struktur data dan variabel global untuk digunakan pada prosedur pembacaan file wav. Berikut ini merupakan source code program pembacaan file wav pada bahasa pemrograman delphi 7 :

Written By Adhitya A P (0510960002)
Student of Computer Science in Brawijaya University
Indonesia}

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, TeEngine, Series, ExtCtrls, TeeProcs, Chart;

type
TWaveHeader = packed record
 { harus bernilai 'RIFF' }
 Marker_RIFF: array [0..3] of char;
 ChunkSize: cardinal;

 { harus bernilai 'WAVE' }
 Marker_WAVE: array [0..3] of char;

 { harus bernilai 'fmt ' }
 Marker_fmt: array [0..3] of char;
 SubChunkSize: cardinal;

 {
   Audio Format see mmsystem.pas
   1 : WAVE_FORMAT_PCM
 }
 FormatTag: word;

 { nChannels : 1 jika mono, 2 jika stereo }
 NumChannels: word;
 SampleRate: longint;
 BytesPerSecond: longint;
 BytesPerSample: word;
 BitsPerSample: word;

 { Harus bernilai 'data' }
 Marker_data: array [0..3] of char;

 { Jumlah seluruh sampel dalam byte }
 DataBytes: longint;
end;

TChannel = record
 {
   tiap sample dinyatakan sebagai signed integer
   berukuran 16-bit (2 byte).
   tipe data ini pada delphi adalah smallint
   yang memiliki nilai dalam jangkauan -32767..32768
 }
 Data : array of smallint;
end;

type
TForm1 = class(TForm)
 Memo1: TMemo;
 Button1: TButton;
 Button2: TButton;
 Chart1: TChart;
 Series1: TFastLineSeries;
 Chart2: TChart;
 Series2: TFastLineSeries;
 procedure Button1Click(Sender: TObject);
 procedure Button2Click(Sender: TObject);
private
 { Private declarations }
 wavehdr : TWaveHeader;
 wavedata : array [0..1] of TChannel;
 numsamples : integer;
public
 { Public declarations }
 procedure GetInfoWav(filename : string);
end;

var
Form1: TForm1;
nFrame : Integer;
implementation

{$R *.dfm}

procedure TForm1.GetInfoWav(filename : string);
var
tmpstr : string;
i : integer;
Stream : TFileStream;
begin
Stream := TFileStream.Create(filename, fmOpenRead);

FillChar(wavehdr, sizeof(wavehdr), 0);
Stream.Read(wavehdr, sizeof(wavehdr));

{ Log Header data }
with memo1.Lines do begin
 Add('Bagian Main Chunk');
 Add('Header size : '+inttostr(sizeof(wavehdr)));
 tmpstr := wavehdr.Marker_RIFF;
 Add('Chunk ID : '+tmpstr+''' ');
 Add('Chunk size : '+inttostr(wavehdr.ChunkSize));
 tmpstr := wavehdr.Marker_WAVE;
 Add('Format : '+tmpstr+''' ');
 tmpstr := wavehdr.Marker_fmt;
 Add('');
 Add('Bagian Format Chunk');
 Add('SubChunk ID : '+tmpstr+''' ');
 Add('SubChunk size : '+inttostr(wavehdr.SubChunkSize));
 Add('Audio Format : '+inttostr(wavehdr.FormatTag));
 Add('Num Channels : '+inttostr(wavehdr.NumChannels));
 Add('Sample rate : '+inttostr(wavehdr.SampleRate));
 Add('Bytes rate : '+inttostr(wavehdr.BytesPerSecond));
 Add('Bits per sample : '+inttostr(wavehdr.BitsPerSample));
 numsamples := (wavehdr.DataBytes div wavehdr.NumChannels) div wavehdr.BytesPerSample;
 tmpstr := wavehdr.Marker_data;
 Add('');
 Add('Bagian Data Chunk');
 Add('SubChunk2 ID : '+tmpstr+''' ');
 Add('SubChunk2 Size : '+IntToStr(Round(wavehdr.NumChannels*numsamples*wavehdr.BytesPerSample/8)));
 Add('Data Length : '+inttostr(wavehdr.DataBytes));
end;

{ Log data amplitudo }
case wavehdr.NumChannels of
   1:begin
     SetLength(wavedata[0].Data, numsamples);
     Stream.Read(wavedata[0].Data[0], numsamples);
   end;

   2:begin
     SetLength(wavedata[0].Data, numsamples);
     SetLength(wavedata[1].Data, numsamples);
     for i := 0 to high(wavedata[0].Data) do begin
       Stream.Read(wavedata[0].Data[i], 2);
       Stream.Read(wavedata[1].Data[i], 2);
       //Memo1.Lines.Add('Nilai ke-'+IntToStr(i+1)+' = \tLeft : '+IntToStr(round(wavedata[0].Data[i]))+' Right : '+IntToStr(round(wavedata[1].Data[i])));
     end;
   end;
end;

Memo1.Lines.Add('Nilai Amplitudo : ');
for i := 0 to high(wavedata[0].Data)do
Memo1.Lines.Add('Nilai ke-'+IntToStr(i+1)+' = \tLeft : '+IntToStr(round(wavedata[0].Data[i]))+' Right : '+IntToStr(round(wavedata[1].Data[i])));
end;
Memo1.Lines.Add('');

{ inisialisasi ulang }
Stream.Free;
end;

//tombol proses pembacaan
procedure TForm1.Button1Click(Sender: TObject);
var i: Integer;
begin
Memo1.Clear;
GetInfoWav('arif10.wav');

//pembuatan grafik
Series1.Clear;
for i:=0 to high(wavedata[0].Data) do
 Series1.AddXY(i, round(wavedata[0].Data[i]), '', clTeeColor);


Series2.Clear;
for i:=0 to high(wavedata[0].Data) do
 Series2.AddXY(i, round(wavedata[1].Data[i]), '', clTeeColor);
end;

//tombol bersihkan layar
procedure TForm1.Button2Click(Sender: TObject);
begin
Memo1.Clear;
Series1.Clear;
Series2.Clear;
end;

end.

Hasil tampilan program :

Download source code lengkapnya disini

Instalasi Windows XP pada CQ40-416TU

2009-12-30T07:29:00.000-08:00

Buat para pemilik laptop HP CQ40-416TU, mungkin akan sulit untuk menginstal Windows XP pada laptopnya. Saat proses instalasi akan terdapat error karena tidak didukung dengan driver SATA yang sesuai dengan seri laptop tersebut. Walaupun sebenarnya fungsi Windows XP saat ini sudah diambil alih oleh Windows 7, tetap saja masih ada yang membutuhkan kinerja dari Windows XP ini untuk suatu pekerjaan tertentu. Beberapa software yang dibutuhkan ada yang merekomendasikan sistem operasi maksimum hanya pada Windows XP saja. Sehingga ketika digunakan pada Windows setelah XP seperti Windows Vista dan Windows 7 tidak compatible.

Jika Anda masih membutuhkan Windows XP pada laptop Anda yang bertipekan CQ40-416TU, ada cara yang paling sederhana. Prinsipnya, membuat suatu instalasi Windows XP dengan memasukkan driver SATA di dalamnya. Driver SATA ini biasanya bergantung pada jenis prosesornya. Anda terlebih dahulu membutuhkan 3 driver berikut :

Driver SATA AMD Turion series. Driver ini sangat penting dalam menentukan keberhasilan suatu instalasi OS pada laptop yang tidak compatible dengan Windows XP. Jika driver SATA ini tidak cocok, maka installer Windows XP akan gagal pada laptop Anda. Download drivernya disini
Software Nlite. Software inilah yang akan mengintregasikan Windows XP dengan driver SATA yang ada. Download software-nya disini
.net2 framework. Untuk proses integrasi dengan software nlite dibutuhkan framework ini. Download disini

Instalasi Nlite

Double-click icon software nLite sehingga muncul gambar berikut.

Dari gambar di atas, klik tombol next kemudian akan muncul gambar berikut.

Dari gambar di atas, klik tombol next lagi kemudian akan muncul gambar berikut.

Kemudian pilih accept lalu klik tombol next sehingga muncul gambar berikut.

Berdasarkan contoh dari gambar di atas, klik tombol next maka akan muncul tampilan seperti gambar berikut.

Centang label language dan klik tombol Next sehingga muncul seperti gambar berikut.

Centang label Craete a desktop icon lalu klik tombol next kemudian akan dijalankan proses instalasi seperti gambar berikut.

Setelah proses instalasi dari gambar di atas selesai,maka akan muncul seperti gambar berikut.

Klik Finish, instalasi selesai dan software nLite dapat digunakan.

Membuat installer Windows XP dengan Driver SATA pada software nLite

Double-click icon software nLite yang sudah diinstal tadi sehingga muncul gambar berikut.

Dari gambar di atas, klik tombol next kemudian akan muncul gambar berikut.

Dari gambar di atas, browse installer Windows XP (disarankan menggunakan CD installer). Setelah itu pilih folder dimana isi file dari installer tersebut di-copy. Kemudian akan muncul gambar berikut.

Tunggulah beberapa menit hingga proses selesai. Proses dikatakan selesai jika sesuai dengan contoh program berikut.

Berdasarkan contoh dari gambar di atas, klik tombol next maka akan muncul tampilan seperti gambar berikut.

Klik tombol Next sehingga muncul seperti gambar berikut.

Pilih driver dan Bootable iso karena Anda akan membuat installer dengan menggabungkan driver SATA yang memiliki kemampuan booting. Setelah itu klik tombol next kemudian akan seperti gambar berikut.

Klik tombol insert lalu pilih multiple drivers folder, terlebih dahulu extract file driver SATA yang sudah di-download tadi. Setelah itu arahkan browse ke folder driver SATA tersebut, klik folder tersebut dan pilih folder x86. Maka akan muncul tampilan seperti gambar berikut.

Arahkan cursor ke list tersebut kemudian klik tombol Ok sehingga muncul tampilan berikut.

Pilih mode Textmode driver dan arahkan cursor ke list yang ada tulisan x86. Kemudian klik tombol Ok sehingga muncul tampilan berikut.

Klik tombol next sehingga muncul tampilan berikut.

Jika proses dalam langkah 11 selesai maka akan muncul tampilan berikut.

Klik tombol next maka akan muncul tampilan berikut.

Klik tombol Make ISO kemudian tentukan lokasi file yang akan di-create sehingga akan muncul proses seperti tampilan berikut.

Tunggulah beberapa menit hingga proses tersebut selesai dan klik tombol next sehingga muncul seperti tampilan berikut.

Klik tombol Finish, proses pembuatan installer Windows XP dengan driver SATA selesai. Silakan coba installer tersebut pada laptop Anda.

Catatan : Laptop CQ40-416TU ini minim driver. Maksudnya, driver-driver yang dibutuhkan akan sangat sulit sekali didapat dan terkadang yang kita dapat masih belum compatible walaupun dari situs vendornya. Sayangnya vendor HP tidak menyediakan CD driver buat customer-nya ketika pembelian. Alhasil, setelah Windows XP terinstall di laptop, banyak kinerja hardware yang kurang compatible dan sistem menjadi crash sehingga sering error.

Re-install Grub-Loader Setelah instalasi windows

2009-12-29T17:55:00.000-08:00

Berita duka bagi kita semua jika Anda terlebih dahulu meng-install linux dan kemudian meng-install windows. Maka, secara default pada saat booting, grub loader akan hilang dan OS linux tidak bisa terbaca sehingga kita tidak dapat masuk ke OS linux tersebut. Bagi orang awam, ini menganggap bahwa OS linux kita ter-overwrite oleh windows. Padahal tidak demikian, karena pada dasarnya windows tidak mengenal sistem operasi lainnya sedangkan linux dapat mengenali sistem operasi lainnya. Sehingga grub loader milik linux ter-overwrite oleh windows. Berikut ini, saya akan pandu Anda untuk mengembalikan grub loader Anda yang hilang karena instalasi windows.

Masukkan CD installer Ubuntu (live CD), kemudian reboot komputer Anda.
setelah CD terbaca, maka pilih menu Try ubuntu without any change to your computer. Tekan tombol Enter pada keyboard.
Anda memasuki live cd ubuntu desktop. Maka, pilih menu Applications-Accessories-Terminal. Setelah jendela terminal terbuka ketikkan : sudo fdisk -l. Kemudian tekan Enter lalu akan meminta konfirmasi password, ketikkan password Anda dan tekan Enter sehingga muncul tulisan seperti dibawah ini.

[sudo] password for dypta:
Disk /dev/sda: 8589 MB, 8589934592 bytes
255 heads, 63 sectors/track, 1044 cylinders
Units = cylinders of 16065 * 512 = 8225280 bytes
Disk identifier: 0x000246ae
Device     Boot  Start     End   Blocks  Id  System
/dev/sda1   *        1     993  7976241  83  Linux
/dev/sda2          994    1044  409657+   5  Extended
/dev/sda5          994    1044  409626   82  Linux swap / Solaris

Untuk memasuki root pada linux (ubuntu) ketikkan : sudo bash. Tekan Enter.
Cek direktori dengan mengetikkan : mkdir /media/root.
Lakukan mounting terhadap root tersebut. Root dimana linux berada. berdasarkan data di atas kita ketahui linux tersimpan pada device sda2. jadi, ketikkan : mount /dev/sda2 /media/root.
Setelah itu Anda bisa melakukakn install grub-loader dengan mengetikkan : sudo grub-install --root-directory=/media/root /dev/sda. Maka akan muncul tulisan seperti ini.

Installation finished. No error reported.
This is the contents of the device map /media/root/boot/grub/device.map.
Check if this is correct or not. If any of the lines is incorrect,
fix it and re-run the script `grub-install'.
(fd0) /dev/fd0
(hd0) /dev/sda

Proses selesai, Anda dapat menutup aplikasi terminal dan reboot komputer Anda.

Namun, jika langkah di atas masih belum berhasil juga atau tidak sesuai dengan yang diharapkan maka lakukan langkah berikut :

Buka terminal dalam live cd ubuntu 9.10
Ketikkan sudo -i, lalu tekan ENTER.
Ketikkan mount /dev/sda3 /mnt, lalu tekan ENTER. Maka akan ada tulisan berupa No such file or directory. Abaikan saja ini. Ingat!, sda3 menyatakan letak linux atau ubuntu Anda berada.
Kemudian setelah proses mounting, Anda bisa langsung meng-install grub loader dengan mengetikkan grub-install --root-directory=/mnt/ /dev/sda. Sehingga muncul tulisan berikut :

Installation finished. No error reported.
This is the contents of the device map /media/root/boot/grub/device.map.
Check if this is correct or not. If any of the lines is incorrect,
fix it and re-run the script `grub-install'.
(fd0) /dev/fd0
(hd0) /dev/sda

Proses selesai, Anda dapat menutup aplikasi terminal dan reboot komputer Anda.

Instalasi Virtual Box dan Sistem Operasi pada Virtual Box

2009-12-29T00:29:00.000-08:00

Virtual Box merupakan suatu software bebas dari perusahaan sun yang dipergunakan untuk menguji suatu sistem operasi maupun software-software yang ada pada sistem operasi tersebut. Tujuannya adalah sebagai virtual untuk meminimalisasi human error akibat ketidaktahuan user dalam menginstalasi suatu sistem operasi atau software yang dapat berdampak pada penurunan kinerja dari suatu Sistem Operasi, hardware, dan software lainnya. Software virtual box ini serupa fungsinya dengan virtual pc, vmware, dan sejenisnya. Virtual box ini lebih simple dan hemat memori serta storage dibandingkan dengan vrtual software lainnya selain free dari segi harga. Baiklah, agar pembaca dapat memahami lebih detail penggunaan software ini berikut ini akan saya jelaskan proses instalasi virtualbox dan proses instalasi sistem operasi pada VirtualBox-3.1.0-55467-Win.

Instalasi Virtual Box

Double-click icon software VirtualBox-3.1.0-55467-Win sehingga muncul gambar berikut.

Dari gambar di atas, klik tombol next kemudian akan muncul gambar berikut.

Kemudian pilih accept lalu klik tombol next sehingga muncul gambar berikut.

Sesuai dengan gambar di atas, klik tombol next sehingga muncul seperti gambar berikut.

Centang pilihan yang ada pada gambar di atas sesuai dengan keinginan Anda. Kemudian klik tombol next maka akan muncul tampilan seperti gambar berikut.

Klik Tombol Yes sehingga muncul seperti gambar berikut.

Lalu klik tombol Install kemudian akan dijalankan proses instalasi seperti gambar berikut.

Setelah proses instalasi dari gambar di atas selesai,maka akan muncul seperti gambar berikut.

Namun, jika berupa peringatan maka klik tombol stop instalation dan klik tombol finish yang ada sesuai gambar di atas. Proses instalasi selesai.

Instalasi Sistem Operasi pada Virtual Box

Double-klik icon virtualbox yang telah diinstal maka akan muncul tampilan seperti gambar berikut.

Kemudian pilih menu New, sehingga muncul tampilan seperti berikut.

Kemudian klik tombol next, sehingga muncul tampilan seperti berikut.

Ketik nama virtual yang akan diisi OS kemudian pilih OS beserta versinya. Jadi, OS yang akan diinstalkan diketahui terlebih dahulu oleh sistem. Jika tidak ada pada pilihan, maka OS yang ingin diinstal akan mengalami trouble karena tidak cocok. Klik tombol next sehingga muncul tampilan seperti berikut.

Tentukan besarnya memori yang ingin Anda gunakan pada OS. Ingat, besarnya memori disini akan mengambil memori utama yang ada pada komputer Anda. Jadi, Anda sebaiknya mengetahui keadaan free memori sebelum menentukan penggunaan memori pada OS virtual ini. Klik tombol next sehingga muncul tampilan seperti berikut.

Centang dan pilihlah sesuai dengan yang dicontohkan pada gambar di atas. Intinya, jika Anda belum mempunyai virtual disk untuk menampung file atau data-data yang ada pilih create new hard disk. Namun, jika sudah punya pilihlah use existing hard disk dan carilah lokasi virtual hardisk yang sudah Anda buat. Klik tombol next sehingga muncul tampilan seperti berikut.

Klik tombol next sehingga muncul tampilan seperti berikut.

Pilihlah storage type, jika dynamic maka storage akan disesuaikan dengan seberapa besar penggunaan file-file atau data-data hingga batas maksimum storage. Jika fixed, maka storage akan berkapasitas sesuai dengan kapasitas maksimum. Walaupun file-file atau data-data yang akan digunakan sangat minim tapi default kapasitas storage akan ditulis maksimum. Saya lebih menyarankan dynamic karena akan mengehmat storage pada hard disk Anda. Kemudian klik tombol next sehingga muncul tampilan seperti berikut.

Default location ditentukan secara otomatis disesuaikan dengan nama folder yang sama dengan nama virtual yang sudah Anda buat. Tentukan size storage sesuai dengan kebutuhan Anda. Kemudian klik tombol next sehingga muncul tampilan seperti berikut.

Klik tombol next sehingga muncul tampilan seperti berikut.

Klik tombol finish sehingga muncul tampilan seperti berikut.

Sesuai gambar di atas, disebelah kanan pada tab details pilih storage sehingga muncul tampilan seperti berikut.

Sesuai gambar di atas, pada IDE Controller pilih disk yang berlabelkan Empty. Jika, Anda menginstall dengan menggunakan CD/DVD maka pada CD?DVD device pilih CD/DVD drive yang ada cd/dvd installer OS tersebut. Namun, jika menggunakan file iso maka klik gambar folder sehingga akan muncul seperti tampilan pada gambar berikut.

Berdasarkan contoh gambar di atas, pilih menu Add dan cari lokasi dimana Anda menyimpan file iso OS tersebut. Klik tombol select sehingga akan muncul pada CD/DVD device seperti tampilan pada langkah 12. Klik tombol ok sehingga kembali seperti pada gambar di langkah 11. Klik menu start untuk memulai instalasi OS dan tunggulah beberapa menit hingga proses instalasi selesai.

Instalasi Guest Additions

Inilah fitur baru yang ditawarkan virtual box yaitu virtual box guest additions. Apa saja fasilitas yang ditawarkan fitur ini?

Anda akan merasa lebih nyaman lagi dalam menggunakan virtual OS ini layaknya Anda menggunakan OS tersebut pada layar desktop Anda. Karena tampilan bisa diatur sesuai keinginan.
Cursor akan bekerja secara otomatis. Jika menyentuh area Virtual OS maka cursor menjadi milik virtual OS sepenuhnya. namun, jika cursor keluar dari area maka akan menjadi milik desktop Anda tanpa konfirmasi atau double-click terlebih dahulu.
Dapat melakukan share terhadap folder atau drive pada komputer Anda tanpa perlu koneksi kabel internet. Prinsipnya, VirtualBox memberikan kemudahan pertukaran data antara host dan tamu, VirtualBox memungkinkan untuk menyatakan direktori host tertentu sebagai "shared folder", yang kemudian dapat diakses dari dalam mesin virtual.
Apa saja jendela yang aktif di dalam virtual box, dapat diambil screenshot-nya untuk dokumentasi.

Cara instalasi Guest Additions sangatlah mudah. Ada beberapa cara sebagai berikut :

Pada virtual running, pilih menu Devices-CD/DVD Devices-More CD/DVD Images. Maka, akan muncul gambar seperti berikut.

Pilih menu Add kemudian cari file iso-nya. Jika OS windows, maka cari file tersebut di Program files-Sun-VirtualBox-VBoxGuestAdditions.iso. Namun, jika menggunakan linux (ubuntu), cari file iso-nya di File System-usr-share-virtualbox-VBoxGuestAdditions.iso. Setelah file tersebut ada di-list. pilih select dan kembali ke virtual running untuk memilih menu Devices-CD/DVD Devices-VBoxGuestAdditions.iso

Pada virtual mesin running, pilih menu Devices-Install Guest Additions. cara ke dua ini lebih praktis.

Catatan : Biasanya pada OS windows dalam virtual proses di atas akan di-run secara otomatis. Jika pada linux, maka harus di run secara manual. Caranya buka File iso tersebut kemudian cari file Autorun.sh. Double-click file tersebut sehingga muncul seperti gambar berikut.

Shared Folder pada OS di Virtual Box

Pastikan Guest Additions sudah terinstal pada virtual box Anda.
Pada virtual running, pilih menu devices-shared folder. Maka akan muncul seperti tampilan berikut.

Pilih Add Shared Folder, ada di pojok kanan dari gambar di atas (icon folder yang ada tanda plus).Maka, akan muncul seperti gambar berikut.

Pilih folder path yang bertuliskan others. Akan menampilkan tree directory explorer pada desktop Anda. Pilih salah satu drive atau folder. Lalu klik tombol Ok.
Buka command promp jika pada OS windows virtual dan ketikkan net use : misal, net use z: \\dypta\music. Buka terminal pada linux kemudian ketikkan mount -t vboxsf . Misal, mount -t vboxsf music /home/xx/music.
Reboot virtual OS Anda, dan lihat pada root atau explorer. Shared folder Anda sudah tersedia.

Memanipulasi Data dengan File Teks

2009-12-21T17:40:00.000-08:00

Layaknya database, file teks juga bisa digunakan untuk menyimpan data-data yang sifatnya sederhana dan tidak membutuhkan record yang banyak. Namun, hal ini tidak dianjurkan dalam mengerjakan suatu sistem yang rumit. Inilah yang membedakan penggunaan file teks dengan database.

Pada dasarnya, proses penyimpanan terdiri dari tambah data, ubah data, dan hapus data. Tidak seperti pada aplikasi database yang memiliki perintah khusus untuk menjalankan proses penyimpanan tersebut secara langsung, pada aplikasi fileteks tidak menyediakan perintah-perintah tersebut. Melainkan, programmer harus pintar-pintar merumuskan algoritma atau source code-nya dengan syntax yang ada.

Jika kita menggunakan bahasa pemrograman delphi, maka akan ada syntax yang sangat membantu kita dalam melakukan proses penyimpanan data tersebut pada file teks. Dengan menggunakan type...record dan menginisialisasikan suatu variabel ke dalam array satu dimensi untuk dapat dipindahkan data secara otomatis ke dalam file teks. Untuk kasus seperti ini, saya tidak menggunakan bahasa pemrograman delphi karena contoh source code seperti itu sudah banyak tersedia di internet untuk referensinya. Salah satu alasan yang membuat saya tertantang untuk mencobanya dengan menggunakan bahasa pemrograman java karena belum ada saya temukan referensi yang lengkap untuk menjawab kasus penyimpanan data pada file teks layaknya database seperti insert, edit, delete.

Biar lebih memudahkan pembaca dalam memahaminya, sebelumnya saya akan berikan studi kasus sebagai berikut. Suatu data dalam tabel memiliki field atau kolom seperti No_Id, Jns_Id, Nama, Alamat, jk. Masing-masing field tersebut diberikan ukuran atau panjang data secara berurut 17,5,32,52,15,7. Nama file teks diberikan adalah "Data Penyewa.txt". Maka, akan dibuat suatu proses insert, edit, dan delete. Adapun tips dan triknya sebagai berikut :

Insert (Tambah Data)

Prinsip yang digunakan dalam proses insert data ini adalah dengan melakukan pembacaan terlebih dahulu terhadap data yang ada pada file teks "Data Penyewa.txt kemudian menyimpan data yang dibaca tersebut pada file teks yang baru. Misal, "Data Penyewa temp.txt" secara sementara. Kemudian menggabungkan secara bersamaan data yang ada dari file teks yang baru tadi dengan data baru.

public static void Insert ()
{
//variabel data
String no_id, jns_id, nama, alamat, telp, jk;

//objek inputan dari keyboard
Scanner input = new Scanner (System.in);

//input data dari keyboard
System.out.print("No Id = ");
no_id = input.nextLine();
System.out.print("Jenis Id (KTP/SIM) = ");
jns_id = input.nextLine();
System.out.print("Nama = ");
nama = input.nextLine();
System.out.print("Alamat = ");
alamat = input.nextLine();
System.out.print("No. Telp = ");
telp = input.nextLine();
System.out.print("Jenis Kelamin (Pria/Wanita) = ");
jk = input.nextLine();

//kondisi jika panjang karakter melebihi batas
if ((no_id.length()<=pjg_data[0]) &&
(jns_id.length()<=pjg_data[1]) &&
(nama.length()<=pjg_data[2]) &&
(alamat.length()<=pjg_data[3]) &&
(telp.length()<=pjg_data[4]) &&
(jk.length()<=pjg_data[5]))
{
  //Copy file asal ke file baru (temporary)
  CopyTextFile("Data Penyewa.txt","Data Penyewa temp.txt");
  //mulai file teks
  try {
       FileWriter newFile = new FileWriter("Data Penyewa.txt");
       PrintWriter out = new PrintWriter(newFile);
  
       //jika data pada file temporary tidak null maka salin
       //data file temporary ke file asal
       if (ReadTextFile("Data Penyewa temp.txt")!= null)
          out.print(""+ReadTextFile("Data Penyewa temp.txt"));

       //inputkan data baru ke file teks asal
       out.print(""+no_id);
       for (int i=0; i<(pjg_data[0]-no_id.length()); i++)
       {
          out.print(" ");
       }
       out.print(""+jns_id);
       for (int i=0; i<(pjg_data[1]-jns_id.length()); i++)
       {
           out.print(" ");
       }
       out.print(""+nama);
       for (int i=0; i<(pjg_data[2]-nama.length()); i++)
       {
          out.print(" ");
       }
       out.print(""+alamat);
       for (int i=0; i<(pjg_data[3]-alamat.length()); i++)
       {
          out.print(" ");
       }
       out.print(""+telp);
       for (int i=0; i<(pjg_data[4]-telp.length()); i++)
       {
          out.print(" ");
       }
       out.print(""+jk);
       for (int i=0; i<(pjg_data[5]-jk.length()); i++)
       {
          out.print(" ");
       }
       out.println();
       //tutup operasi file teks, data tidak tersimpan
       //jika tidak di-includ-kan code di bawah ini.
       out.flush();
       out.close();
       //pesan tersimpan
       System.out.println("Data Telah Disimpan");
       System.out.println();
    } catch (IOException e) {
           e.printStackTrace();//eksepsi error handling
           }//akhir fileteks
  }
  else {
      //pesan
      System.out.println("Inputan ada yang melebihi batas");
  }
}

public static void CopyTextFile (String filenamereader, String filenamewriter)
{
try { 
   final BufferedReader br =
   new BufferedReader(new FileReader(filenamereader));
   final BufferedWriter bw =
   new BufferedWriter(new FileWriter(filenamewriter));
   final PrintWriter  pw =
   new PrintWriter (bw);

   // Read input stream line by line
   while (true) {
        final String line = br.readLine(); // get next line
        if (line==null) break; // exit when end-of-file
        pw.println (line); // write line
   }
   br.close();    
   pw.close();
} catch (IOException ex) {
     System.err.println(ex);
}
}

public static String ReadTextFile (String filename) {
  File file = new File(filename);
  StringBuffer contents = new StringBuffer();
  BufferedReader reader = null;

  try {
      reader = new BufferedReader(new FileReader(file));
      String text = null;
  
      // ulangi sampai semua baris terbaca
      while ((text = reader.readLine()) != null) {
      contents.append(text)
      .append(System.getProperty("line.separator"));
      }
 } catch (FileNotFoundException e) {
     e.printStackTrace();
 } catch (IOException e) {
     e.printStackTrace();
} finally {
     try {
        if (reader != null) {
           reader.close();
        }
     } catch (IOException e) {
         e.printStackTrace();
     }
 }

  // tampilkan isi file
  return contents.toString();
}

Edit (Ubah Data)
Delete (Hapus Data)

Prinsip metode penghapusan data pada file teks disini dengan memanggil data array dua dimensi yang telah didefenisikan dan diisi berdasarkan data pada file asal. Record yang ingin dihapus atau dibuang tidak diikutsertakan dalam menginputkan data array dua dimensi tersebut ke dalam file teks. Hal ini sama halnya dalam proses input data baru.

public static void Delete(int no_urut)
{
try {
FileWriter newFile = new FileWriter("Data Penyewa.txt");
PrintWriter out = new PrintWriter(newFile);
for (int i=0; i<N; i++)
{
if (i!=no_urut-1)
{
//inputkan data baru ke file teks asal
   out.print(""+newdata[i][0]);
       for (int j=0; j<(pjg_data[0]-newdata[i][0].length()); j++)
       {
          out.print(" ");
       }
       out.print(""+newdata[i][1]);
       for (int j=0; j<(pjg_data[1]-newdata[i][1].length()); j++)
       {
           out.print(" ");
       }
       out.print(""+newdata[i][2]);
       for (int j=0; j<(pjg_data[2]-newdata[i][2].length()); j++)
       {
          out.print(" ");
       }
       out.print(""+newdata[i][3]);
       for (int j=0; j<(pjg_data[3]-newdata[i][3].length()); j++)
       {
          out.print(" ");
       }
       out.print(""+newdata[i][4]);
       for (int j=0; j<(pjg_data[4]-newdata[i][4].length()); j++)
       {
         out.print(" ");
       }
       out.print(""+newdata[i][5]);
       for (int j=0; j<(pjg_data[5]-newdata[i][5].length()); j++)
       {
          out.print(" ");
       }
          out.println();
}
}
//tutup operasi file teks, data tidak tersimpan
  //jika tidak di-includ-kan code di bawah ini.
  out.flush();
  out.close();
  //pesan terhapus
  System.out.println("Data Telah Dihapus");
  System.out.println();
} catch (IOException e) {
          e.printStackTrace();//eksepsi error handling
}//akhir fileteks
}

View (Tampil Data)

Bagaimana proses menampilkan data-data yang ada pada file teks? Pertama, langkah yang harus dilakukan adalah mengecek berapa banyak record atau baris data yang tersedia. Berdasarkan record-record tersebut, data diambil sesuai dengan ukran karakter yang tersedia pada masing-masing field. Dan ditampung dalam array dua dimensi yang baru. Dalam hal ini, pembacaan karakter jangan sampai salah karena dapat mempengaruhi program alias error. Jika program error, cobalah cek methode yang memanggil data pada file teks tersebut dan menyimpannya ke dalam array dua dimensi.

public static void View()
{
  CheckLineText("Data Penyewa.txt");
  GetData(pjg_data);
  
  for (int i=0; i<N; i++)
  {
     for (int j=0; j<M+1; j++)
     {
  String teks = newdata[i][j];
  System.out.print(""+teks);
     }
     System.out.println("");
  }
  System.out.println(""); 
}

public static void CheckLineText (String filename) {
    File file = new File(filename);
    StringBuffer contents = new StringBuffer();
    BufferedReader reader = null;

    try {
         reader = new BufferedReader(new FileReader(file));
         String text = null;
        
         // ulangi sampai semua baris terbaca
         int i=0;
         while ((text = reader.readLine()) != null) {
             data[i]=text;
             i=i+1;
         }
         N = i;//banyak record
    } catch (FileNotFoundException e) {
        e.printStackTrace();
    } catch (IOException e) {
        e.printStackTrace();
    } finally {
        try {
            if (reader != null) {
               reader.close();
            }
        } catch (IOException e) {
            e.printStackTrace();
        }
    }

}

public static void GetData(int arr[])
{
   int tot_pjg=0;
   // cari panjang total teks
   for (int value : arr)
       tot_pjg = tot_pjg+value;
       
   String str = "", teks="";

   for (int i=0; i<N; i++)
   {
      teks = data[i];// isi variabel string dgn array
      //inisialisasi
      int j=0, k=0, jum=0;
      jum = jum+arr[j];
      // kelompokkan data berdasarkan field/kolom
      while (k<tot_pjg)
      {    
  if (k==jum)
    {
       newdata[i][j] = str;
       str="";
       j=j+1;
       jum = jum+arr[j]; 
    }
    str = str + teks.charAt(k);
    k=k+1;
      }
      M=j;
      //i menyatakan baris, j menyatakan kolom
      //data ditampung dalam array dua dimensi
      newdata[i][j] = str;
      str="";
   } 
}

Membuat Read More....pada blog

2009-12-21T06:21:00.000-08:00

Dalam penulisan sebuah artikel blog, apabila artikel yang akan di posting sangat banyak dan panjang sekali bisa menyulitkan pembaca yang akan berkunjung karena untuk membaca postingan sebelumnya terlebih dahulu pembaca harus melewatkan seluruh isi artikel yang panjang tersebut. Walaupun sebenarnya terdapat widget archive yang mengelompokkan postingan artikel berdasarkan bulan sehingga pencarian artikel lebih mudah. Namun, terkadang pembaca ingin melihat keseluruhan artikel blog yang diposting pada halaman blog tersebut. Untuk itu, diperlukan fasilitas Read More..untuk melengkapi keindahan dan kerapian halaman blog Anda sehingga pembaca dapat melihat apa-apa saja artikel yang di-posting penulis beserta cerita awalnya. Jika pembaca antusias terhadap artikel yang Anda posting-kan maka pembaca bisa meng-klik tulisan Read More..atau Selengkapnya..pada isi artikel yang di-post tadi. Ada beberapa langkah untuk membuat Read More..pada blog yaitu :

Gunakan web browser mozilla firefox atau opera (rekomendasi), jangan gunakan IE karena kurang compatible untuk melakukan edit html dan sering error.
Pastikan Anda sudah sign in di blog Anda khususnya blogger yang menggunakan blogspot. dan mulailah mengelola blog Anda.
Klik tab Pengaturan/Setting kemudian pilih menu format.Pada template entri di text area yang kosong (letaknya paling bawah sendiri) isi dengan code di bawah ini :

<div class="fullpost">


</div>

Klik Tab Tata Letak kemudian pilih menu Edit HTML. Setelah itu, klik link yang bertuliskan Download Template Lengkap berwarna biru yang letaknya di pojok kanan atas.
Hasil download berupa file xml di-upload terlebih dahulu. Browse file xml-nya yang telah di-download tadi kemudian klik tombol unggah/upload.
Centang Expand Template Widget untuk melihat code html secara lengkap dan cari code
```
<data:post.body/>
```

Hapus code di atas dan ganti dengan code di bawah ini.

<b:if cond='data:blog.pageType == "item"'>
<style>.fullpost{display:inline;}</style>
<p><data:post.body/></p>
<b:else/>
<style>.fullpost{display:none;}</style>
<p><data:post.body/>
<a expr:href='data:post.url'><strong>Selengkapnya...</strong></a></p>
</b:if>

Klik tombol Simpan Template
Selesai.

Bagaimana cara mengimplementasikannya?

Klik Tab Posting lalu pilih menu Entri Baru dan klik tab Edit HTML maka akan muncul code berikut
```
<div class="fullpost">


</div>
```
Isi artikel yang ingin ditampilkan pada posting-an sebelum code <div class="fullpost">
Artikel yang tidak ditampilkan tadi di taruh antara code <div class="fullpost"> dan </div>
Klik tombol Terbitkan Entri kemudian klik link bertuliskan Lihat Blog. Dan lihatlah perubahannya.

Program Kalkulator di Delphi

2009-11-09T14:26:00.000-08:00

Deskripsi :

Program kalkulator ini merupakan kalkulator bertipe standar bukan scientic karena fungsi-fungsi penghitungan yang ada masih sederhana seperti tambah, kurang, bagi, kali, akar, mod (sisa pembagian), dan sebagainya. Model dan style dari kalkulator yang saya buat menyerupai kalkulator yang ada pada windows xp. Saya membuat program ini dengan bahasa pemrograman delphi 7 dengan komponen standar yang ada di delphi 7 tersebut.

Source code Program :

{Copyright by Adhitya A P (0510960002)
Student of Computer Science in Brawijaya University
Indonesia}

unit UMain;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Dialogs, StdCtrls, Buttons, Menus, XPMan, Math, ExtCtrls
Controls, Forms;

type
TFKalkulator = class(TForm)
  b0: TBitBtn;
  b1: TBitBtn;
  b4: TBitBtn;
  b7: TBitBtn;
  bMinus: TBitBtn;
  b2: TBitBtn;
  b5: TBitBtn;
  b8: TBitBtn;
  bTitik: TBitBtn;
  b3: TBitBtn;
  b6: TBitBtn;
  b9: TBitBtn;
  bTambah: TBitBtn;
  bKurang: TBitBtn;
  bKali: TBitBtn;
  bBagi: TBitBtn;
  bHasil: TBitBtn;
  BitBtn18: TBitBtn;
  bMod: TBitBtn;
  bAkar: TBitBtn;
  EdTampil: TEdit;
  bClear: TBitBtn;
  BitBtn22: TBitBtn;
  bBackspace: TBitBtn;
  MainMenu1: TMainMenu;
  XPManifest1: TXPManifest;
  Pengaturan1: TMenuItem;
  Clear1: TMenuItem;
  Copy1: TMenuItem;
  Paste1: TMenuItem;
  N1: TMenuItem;
  Keluar1: TMenuItem;
  Bantuan1: TMenuItem;
  BukuManual1: TMenuItem;
  VideoTutorial1: TMenuItem;
  N2: TMenuItem;
  HakCipta1: TMenuItem;
  Timer1: TTimer;
  Panel1: TPanel;
  Label1: TLabel;
  Label2: TLabel;
  Label3: TLabel;
  Timer2: TTimer;
  procedure FormShow(Sender: TObject);
  procedure b1Click(Sender: TObject);
  procedure b2Click(Sender: TObject);
  procedure b3Click(Sender: TObject);
  procedure b4Click(Sender: TObject);
  procedure b5Click(Sender: TObject);
  procedure b6Click(Sender: TObject);
  procedure b7Click(Sender: TObject);
  procedure b8Click(Sender: TObject);
  procedure b9Click(Sender: TObject);
  procedure b0Click(Sender: TObject);
  procedure bClearClick(Sender: TObject);
  procedure bTambahClick(Sender: TObject);
  procedure bTitikClick(Sender: TObject);
  procedure bKurangClick(Sender: TObject);
  procedure bKaliClick(Sender: TObject);
  procedure bBagiClick(Sender: TObject);
  procedure bHasilClick(Sender: TObject);
  procedure bBackspaceClick(Sender: TObject);
  procedure bAkarClick(Sender: TObject);
  procedure bModClick(Sender: TObject);
  procedure bMinusClick(Sender: TObject);
  procedure Clear1Click(Sender: TObject);
  procedure Copy1Click(Sender: TObject);
  procedure Paste1Click(Sender: TObject);
  procedure Timer1Timer(Sender: TObject);
  procedure Keluar1Click(Sender: TObject);
  procedure Timer2Timer(Sender: TObject);
  procedure BitBtn18Click(Sender: TObject);
  procedure HakCipta1Click(Sender: TObject);
private
  { Private declarations }
  procedure hitung();
public
  { Public declarations }
end;

var
FKalkulator: TFKalkulator;
hasil,temp, simbol, data : string;
klik : Integer;

implementation

uses StrUtils;

{$R *.dfm}

procedure TFKalkulator.hitung();
var nilai_real : real;   // hasil yg bersifat real
  nilai_int : Integer; // hasil yg bersifat integer
begin
// kondisi jika operand baru pertama kali diperintahkan
if klik=1 then
  hasil :=EdTampil.Text
else
  data := EdTampil.Text;

// inisialisasi
nilai_real := 0;

// kondisi perhitungan jika ditemukan simbol
if simbol = '+' then
 begin
 nilai_real := (StrToFloat(hasil)+StrToFloat(data));
 hasil := FloatToStr(nilai_real);
 end
else if simbol = '-' then
 begin
 nilai_real := (StrToFloat(hasil)-StrToFloat(data));
 hasil := FloatToStr(nilai_real);
 end
else if simbol = '/' then
 begin
 nilai_real := (StrToFloat(hasil)/strToFloat(data));
 hasil := FloatToStr(nilai_real);
 end
else if simbol = 'X' then
 begin
 nilai_real := (StrToFloat(hasil)*StrToFloat(data));
 hasil := FloatToStr(nilai_real);
 end
else if simbol = '%' then
 begin
 nilai_int := (StrToInt(hasil) mod StrToInt(data));
 hasil := IntToStr(nilai_int);
 end
else if simbol = 'sqrt' then
 begin
 nilai_real :=  sqrt(StrToFloat(hasil));
 hasil := FloatToStr(nilai_real);
 end
else if simbol = '1/x' then
 begin
 nilai_real :=  1/(StrToFloat(hasil));
 hasil := FloatToStr(nilai_real);
 end
else if simbol = '=' then
 hasil := FloatToStr(nilai_real);
end;

procedure TFKalkulator.FormShow(Sender: TObject);
begin
//EdTampil.al :=
EdTampil.Text :=  '0';

// inisialisasi variabel global
temp := '';   // menyimpan sementara bilangan di EdTampil
data := '';   // memindahkan hasil dari temp agar bersifat permanen
hasil := '';  // hasil perhitungan
simbol := ''; // operand type

klik := 0; //bnyaknya klik suatu operand

Panel1.Visible := False;
Timer1.Enabled := False;
Timer2.Enabled := False;
end;

procedure TFKalkulator.b1Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'1';
end;

procedure TFKalkulator.b2Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'2';
end;

procedure TFKalkulator.b3Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'3';
end;

procedure TFKalkulator.b4Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'4';
end;

procedure TFKalkulator.b5Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'5';
end;

procedure TFKalkulator.b6Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'6';
end;

procedure TFKalkulator.b7Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'7';
end;

procedure TFKalkulator.b8Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'8';
end;

procedure TFKalkulator.b9Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'9';
end;

procedure TFKalkulator.b0Click(Sender: TObject);
begin
if (EdTampil.Text = '0') then
 EdTampil.Clear
else if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'0';
end;

procedure TFKalkulator.bTitikClick(Sender: TObject);
begin
if (klik>1) then
 begin
 EdTampil.Clear;
 klik:=1;
 end;

temp := EdTampil.Text;
EdTampil.Text := temp+'.';
end;

procedure TFKalkulator.bMinusClick(Sender: TObject);
begin
if ((EdTampil.Text = '0') OR (klik>1)) then
  EdTampil.Clear;

temp := EdTampil.Text;
EdTampil.Text := temp+'-';
end;

procedure TFKalkulator.bClearClick(Sender: TObject);
begin
FormShow(Sender); // tampilkan dlm keadaan awal
end;

procedure TFKalkulator.bTambahClick(Sender: TObject);
begin
klik:=klik+1;
//ShowMessage(''+IntToStr(klik));
hitung();
if klik=1 then
  EdTampil.Text := ''
else
 EdTampil.Text := hasil;

simbol := '+';
temp := '';
end;

procedure TFKalkulator.bKurangClick(Sender: TObject);
begin
klik:=klik+1;
hitung();
if klik=1 then
  EdTampil.Text := ''
else
 EdTampil.Text := hasil;
simbol := '-';
temp := '';
end;

procedure TFKalkulator.bKaliClick(Sender: TObject);
begin
klik:=klik+1;
hitung();
if klik=1 then
  EdTampil.Text := ''
else
 EdTampil.Text := hasil;
simbol := 'X';
temp := '';
end;

procedure TFKalkulator.bBagiClick(Sender: TObject);
begin
klik:=klik+1;
hitung();
if klik=1 then
  EdTampil.Text := ''
else
 EdTampil.Text := hasil;

simbol := '/';
temp := '';
end;

procedure TFKalkulator.bModClick(Sender: TObject);
begin
klik:=klik+1;
hitung();
if klik=1 then
  EdTampil.Text := ''
else
 EdTampil.Text := hasil;

simbol := '%';
temp := '';
end;

procedure TFKalkulator.bAkarClick(Sender: TObject);
begin
klik:=klik+1;
if klik=1 then
 begin
    simbol := 'sqrt';
    hitung();
    EdTampil.Text := hasil;
 end
else
 begin
    hitung();
    EdTampil.Text := hasil;
 end;

temp := '';
klik:=0;
simbol:= '';
end;

procedure TFKalkulator.BitBtn18Click(Sender: TObject);
begin
klik:=klik+1;
if klik=1 then
 begin
    simbol := '1/x';
    hitung();
    EdTampil.Text := hasil;
 end
else
 begin
    hitung();
    EdTampil.Text := hasil;
 end;
temp := '';
klik:=0;
simbol:= '';
end;

procedure TFKalkulator.bHasilClick(Sender: TObject);
begin
klik:=klik+1;
hitung();
EdTampil.Text := hasil;
temp := '';
klik:=0;
simbol:= '';
end;

procedure TFKalkulator.bBackspaceClick(Sender: TObject);
var pjg : Integer;
begin
pjg := (EdTampil.GetTextLen); // panjang karakter dalam EdTampil
EdTampil.Text := LeftStr(EdTampil.Text, pjg-1); // Tampilkan karakter sebanyak pjg-1 dari kiri
if pjg = 1 then
 EdTampil.Text := '0';
end;

procedure TFKalkulator.Clear1Click(Sender: TObject);
begin
bClear.Click;
end;

procedure TFKalkulator.Copy1Click(Sender: TObject);
begin
EdTampil.SelectAll;
EdTampil.CopyToClipboard;
end;

procedure TFKalkulator.Paste1Click(Sender: TObject);
begin
EdTampil.Clear;
EdTampil.ReadOnly := False;
EdTampil.PasteFromClipboard;
EdTampil.ReadOnly := True;
end;

procedure TFKalkulator.Timer1Timer(Sender: TObject);
begin
AlphaBlend := True;
Panel1.Visible := True;
if Panel1.Height = 208 then
 begin
    Timer2.Enabled := True;
 end
else
 begin
    Panel1.Height := Panel1.Height +1;

    if (Panel1.Height mod 4=0) then
       begin
           Label1.Top := Label1.Top+1;
           Label2.Top := Label2.Top+1;
           Label3.Top := Label3.Top+1;
       end;
 end;
end;

procedure TFKalkulator.Keluar1Click(Sender: TObject);
begin
Timer1.Enabled := True;
end;

procedure TFKalkulator.Timer2Timer(Sender: TObject);
begin
 if AlphaBlendValue=180 then
    close
 else
    begin
    AlphaBlendValue := AlphaBlendValue-1;
    Caption := 'Kalkulator '+IntToStr(AlphaBlendValue-180);
    end;
end;

procedure TFKalkulator.HakCipta1Click(Sender: TObject);
begin
ShowMessage('Peogram kalkulator Standart Versi 1.0 '+#13#10+
          'Dibuat oleh Mahasiswa Ilmu Komputer UB '+#13#10+
          'ADHITYA AHMAD P (0510960002) '+#13#10+
          'Angkatan 2005');
end;

end.

Output Program :

Program Konversi Bilangan Bulat / Desimal ke Romawi

2009-10-24T20:53:00.000-07:00

Deskripsi :

Bilangan Romawi adalah bilangan unik yang memiliki aturan-aturan yang berlaku dan terdiri dari huruf-huruf CAPITAL seperti I, X, C, M, V, L, dan v. Di Indonesia bilangan ini sangat jarang digunakan sekali, tapi untuk hal-hal tertentu saja. Pada dasarnya, bilangan Romawi memiliki bilangan dasar dan maksimal perulangan ganda pada huruf-huruf dalam suatu angka yaitu 3. Misal XXX = 30 bukan XXXX=40.

Pada dasarnya adapun aturan dari bilangan romawi tersebut adalah sebagai berikut :

Angka romawi memiliki arti : I = 1 , V = 5, X = 10, L = 50, C = 100, D = 500, M = 100.
Romawi tidak mengenal 4 buah symbol yang di lakukan secara berurutan. Misal, IIII itu seharusnya IV, XXXX seharusnya LX, dsb.
Lambang romawi seperti IV, MC, CD, dsb, memiliki ciri khas yaitu Simbol pertama memiliki nilai Lebih Kecil dari pada simbol kedua.
Jika ditemukankondisi nomor 3 maka pembacaanya adalah lambang kedua dikurangi lambang pertama.
Jika ditemukan Lambang seperti contoh pada nomor 3 maka yang di bandingkan maju 2 langkah, misal: CMII pertama-tama kita bandingkan karakter pertama dan kedua dahulu yaitu C dan M. C memiliki nilai yang kurang dari M. Selanjutnya, kita membandingkan I dengan I bukan M dengan I.
Berdasarkan nomor 4 dan 5 diperoleh pembacaan bila CMII maka akan dibaca M – C + I + I.
Jika kondisi Lambang Kedua Lebih besar dari pada lambang pertama, maka pembacaan tinggal dijumlahkan saja misal: MVII maka M + V + I + I.

Source code Program :

import java.util.*;

public class KonversiDesimalToRomawi {
public static void main (String args[])
{
int bil;
String tampil="";

//inisialisasi berupa array
String [] biasa = {"","I","II", "III", "IV", "V",
               "VI", "VII", "VIII", "IX"};
String [] sepuluh = {"", "X", "XX","XXX","XL"};
String [] limapuluh = {"", "L", "LX", "LXX", "LXXX","XC"};
String [] seratus =  {"", "C", "CC", "CCC", "CD"};
String [] limaratus = {"", "D", "DC", "DCC", "DCCC", "CM"};
String [] seribu =   {"", "M", "MM", "MMM", "Mv", "v"};

// inputan dari keyboard
System.out.print("Masukkan bilangan desimal : ");
Scanner obj = new Scanner(System.in);
bil = obj.nextInt();

//kondisi dimana angka tdk lebih dari 5000
if (bil>5000)
{
  System.out.println("Maaf.., Angka Desimal Yang Di "+
  "Inputkan Harus Di Bawah 5000");

}
else
{
  //defenisi
  int lmrts = bil % 1000;
  int srts = lmrts % 500;
  int lmpl = srts % 100;
  int spl = lmpl % 50;
  int ak = spl % 10;

  int a = bil/1000;
  tampil += ""+seribu[a];

  //aturan konversi desimal ke romawi
  if ( (lmrts >=900) && (lmrts <= 999))
  {
    tampil += "CM";

    //90
    if( (lmpl >= 90) && (lmpl <= 99) )
    {
      tampil += "XC";
      int f= ak/1;
      tampil += ""+biasa[f];
    }
    else
    {
      int d = lmpl/50;
      tampil += ""+limapuluh[d];
      int e = spl/10;
      tampil += ""+sepuluh[e];
      int f= ak/1;
      tampil += ""+biasa[f];
     }

    }
    else
    {
      int b = lmrts/500;
      tampil += ""+limaratus[b];

      //400
      if ( (srts >= 400)&& (srts <= 499) )
      {
        tampil += "CD";

        //90
        if( (lmpl >= 90) && (lmpl <= 99) )
        {
          tampil += "XC";
          int f= ak/1;
          tampil += ""+biasa[f];
        }
        else
        {
          int d = lmpl/50;
          tampil += ""+limapuluh[d];
          int e = spl/10;
          tampil += ""+sepuluh[e];
          int f= ak/1;
          tampil += ""+biasa[f];
        }

      }
      else
      {
         int c = srts/100;
         tampil += ""+seratus[c];
         if((lmpl >= 90)&&(lmpl <= 99))
         {
           tampil += "XC";
           int f= ak/1;
           tampil += ""+biasa[f];
         }
         else
         {
           int d = lmpl/50;
           tampil += ""+limapuluh[d];
           int e = spl/10;
           tampil += ""+sepuluh[e];
           int f= ak/1;
           tampil += ""+biasa[f];
         }
     }
 }
 System.out.println("Maka angka Romawinya "+tampil);

}

}
}

Output Program :

Program Pecahan Mata Uang Rupiah

2009-10-22T10:08:00.000-07:00

Deskripsi :

Program ini bertujuan untuk menghitung banyaknya pecahan uang dari nominal yang telah ditentukan dalam Rupiah. Adapun pecahan mata uang dalam rupiah yaitu : 50, 100, 200, 500, 1000, 2000, 5000, 10000, 20000, 50000, 100000. Dibuat dalam bahasa pemrograman java berbasis console. Jadi, program ini akan menghitung jumlah pecahan yang ada dari suatu nominal yang diinputkan nantinya.

Source code Program :

/*
*Copyright by Adhitya A P (0510960002)
*Student of Computer Science in Brawijaya University
*Indonesia
**/

import java.util.*;

public class Rupiah
{
public static void main (String args[])
{
  long bil1, uang;

  do
  {
    //inputan dari keyboard
    System.out.print("Jumlah uang = ");
    Scanner obj = new Scanner(System.in);
    uang = obj.nextLong();
   
    if (uang<50)
    { 
       System.out.println("Maaf, tidak ada nominal uang "+
                          "sebesar "+uang+" rupiah");
       continue;
    }
    else
    {
       // besar 100000
       if (uang >= 100000)
       {
           bil1 = uang / 100000;
           System.out.println("Pecahan 100000 sebanyak "+bil1);
       }

       // antara 50000-100000
       uang = uang % 100000;
       if ((uang >= 50000) && (uang <100000))
       {
           bil1 = uang / 50000;
           System.out.println("Pecahan  50000 sebanyak "+bil1);
       }
  
       // antara 20000-50000
       uang = uang % 50000;
       if ((uang >= 20000) && (uang <50000))
       {
           bil1 = uang / 20000;
           System.out.println("Pecahan  20000 sebanyak "+bil1);
       }

       // antara 10000-20000
       uang = uang % 20000;
       if ((uang >= 10000) && (uang <20000))
       {
           bil1 = uang / 10000;
           System.out.println("Pecahan  10000 sebanyak "+bil1);
       }

       // antara 5000-10000
       uang = uang % 10000;
       if ((uang >= 5000) && (uang <10000))
       {
           bil1 = uang / 5000;
           System.out.println("Pecahan   5000 sebanyak "+bil1);
       }

       // antara 2000-5000
       uang = uang % 5000;
       if ((uang >= 2000) && (uang <5000))
       {
           bil1 = uang / 2000;
           System.out.println("Pecahan   2000 sebanyak "+bil1);
       }

       // antara 1000-2000
       uang = uang % 2000;
       if ((uang >= 1000) && (uang <2000))
       {
           bil1 = uang / 1000;
           System.out.println("Pecahan   1000 sebanyak "+bil1);
       }

       // antara 500-1000
       uang = uang % 1000;
       if ((uang >= 500) && (uang <1000))
       {
           bil1 = uang / 500;
           System.out.println("Pecahan    500 sebanyak "+bil1);
       }

       // antara 200-500
       uang = uang % 500;
       if ((uang >= 200) && (uang <500))
       {
          bil1 = uang / 200;
          System.out.println ("Pecahan    200 sebanyak "+bil1);
       }

       // antara 100-200
       uang = uang % 200;
       if ((uang >= 100) && (uang <200))
       {
          bil1 = uang / 100;
          System.out.println ("Pecahan    100 sebanyak "+bil1);
       }

       // antara 50-100
       uang = uang % 100;
       if ((uang >= 50) && (uang <100))
       {
          bil1 = uang / 50;
          System.out.println ("Pecahan     50 sebanyak "+bil1);
       }
  
       // kurang 50
       uang = uang % 50;
       if ((uang > 0) && (uang <50))
       {
          bil1 = uang ;
          //satuan
          if (bil1<10)
         System.out.println ("Pecahan      "+bil1+
                                 " ikhlaskan saja");
      else if (bil1>=10)//puluhan
         System.out.println ("Pecahan     "+bil1+
                                 " ikhlaskan saja");
       }
     }
   }while(uang!=0);

 }
}

Output Program :

Program Menghitung Jumlah Kata Dalam Suatu kalimat

2009-10-22T09:43:00.000-07:00

Deskripsi :

Pada dasarnya suatu kalimat terdiri dari beberapa rangkaian kata-kata yang membentuk suatu pola dan diakhiri dengan tanda titik. Ciri-ciri suatu kata dalam kalimat biasanya ditandai dengan spasi atau jarak kosong antar huruf.

Program yang saya buat ini mendeskripsikan tentang jumlah kata yang terdapat dalam suatu inputan String atau kalimat. Program ini seharusnya tidak mengenal suatu inputan bilangan untuk dikenali sebagai kata. Namun, dalam program ini akan tetap dikenali sebagai kata karena memiliki spasi antar huruf sehingga didefenisikan sebagai kata. Saya lupa untuk meng-handle kasus tersebut sekiranya bisa ditambahkan sendiri bagi siapa saja yang mengutip source code ini. Di buat dalam bahasa pemrograman java berbasis console.

Source code Program :

/*
*Copyright by Adhitya A P (0510960002)
*Student of Computer Science in Brawijaya University
*Indonesia
**/

import java.util.*;

public class katainkalimat {

 private static String kata[] = new String[1000];
 private static String newkata[] = new String[1000];

 // methode untuk mengecek kata yg sama
 public static boolean cekKata(int n, String x)
 {
     // inisialisasi
     boolean ketemu=false;
 
     for (int i=0; i <n; i++)
     {
        // jika ada yg sama
        if (kata[i].equalsIgnoreCase(x))
        {
           ketemu=true;
           break;
        }     
     }
     return ketemu;
 }

 public static void main (String args[])
 {   
    //array
    int jumkata[] = new int[1000];
    int indeks[] = new int[1000];

    // inisialisasi variabel
    String teks, temp="";
    boolean ketemu=false;
    int a, k, n, m, count=0, jum;

    // inputan dari keyboard
    System.out.print("Masukkan kalimat = ");
    Scanner obj = new Scanner(System.in);
    teks = obj.nextLine();

    //menentukan kata
    for (int i = 0; i<teks.length(); i++)
    {
       //jika ditemukan spasi
       if (teks.charAt(i)==' ')
       {
         count+=1;
         temp="";
       }
       else
       {
         temp = temp + teks.charAt(i);
         kata[count] = temp;
       }
   }

   n=count+1;// banyaknya kata dlm suatu kalimat

   // eliminasi kata yang sama
   k=0; a=0;
   for (int i=0; i < n; i++)
   {
      if (!cekKata(a, kata[i]))
      {
           //bentuk kata baru dlm array
           newkata[k] = kata[i];
           k++;
      }
      a++;
    }
    m=k; // banyaknya kata yg tlah dieliminasi
 
    // proses penghitungan kata dalam suatu kalimat
    for (int i=0; i < m; i++)
    {
        jum=0;
        for (int j=0; j < n; j++)
        {
       if (newkata[i].equalsIgnoreCase(kata[j]))
          jum+=1;
        }
        System.out.println("kata = "+newkata[i]+
                                " jumlahnya "+jum);
    }
   
  }
}

Output Program :

Membuat Tampilan Syntax (Source Code Program) di Blogspot

2009-10-22T06:04:00.000-07:00

Bagi seorang penulis yang sering bercengkrama dibidang IT khususnya programmer, tentu ingin berbagi pengalaman-pengalamannya selama ini dengan para programmer lainnya maupun orang-orang yang membutuhkannya. Tampilan source code suatu program di halaman web tentu akan menarik minat pengunjung yang sedang mencarinya untuk kebutuhannya. Saya menemukan di suatu halaman web yang menampilkan syntax suatu program yang menyerupai syntax dalam bahasa pemrograman baik dari warna font, nomor baris, dll. Adapun contoh tampilannya adalah sebagai berikut :

Jika, Anda menginginkan tampilan yang demikian di atas sangatlah mudah untuk mengaplikasinya pada suatu blog atau web page Anda. Adapun langkah-langkahnya sebagai berikut :

Download file-file yang dipelukan disini.
Hasil download berupa file rar maka ekstrak file tersebut terlebih dahulu.
Upload semua file yang ada di folder scripts dan style pada folder yang telah di-ekstrak tersebut ke web server. Agar lebih memudahkan proses download atau pemanggilan file-file tersebut oleh html di-blog atau halaman web Anda maka sebaiknya file tersebut disimpan di http://pages.google.com/. Adapun langkah-langkah cara menyimpan di google page tersebut sebagai berikut :
- Pada halaman link di atas tadi klik link google site.
- Lakukan proses register web atau blog yang akan Anda buat di google. Prosesnya sama seperti Anda membuat blog.
- Setelah web berhasil dibuat, masuk ke halaman web Anda yang sudah register di google tadi.
- Cari menu more action lalu pilih manage site.
- Disebelah kiri halaman web (sidebar) terdapat page templates. Klik menu tersebut.
- Setelah itu Anda akan menemukan tulisan file, maka Anda klik link file tersebut. Dari situlah Anda bisa meng-upload file-file tadi.
Silakan buka blog Anda di Dashboard/Layout/Edit HTML atau edit html Anda.

Copy-Paste Source Code javascript di bawah ini :

//copy source code di bawah ini dan paste pada header web atau blog Anda
<link href='http://sites.google.com/site/adhit8ok/config/pagetemplates/file/SyntaxHighlighter.css' rel='stylesheet' type='text/css'/>
<script language='javascript' src='http://sites.google.com/site/adhit8ok/config/pagetemplates/file/shCore.js'/>
<script language='javascript' src='http://sites.google.com/site/adhit8ok/config/pagetemplates/file/shBrushCpp.js'/>
<script language='javascript' src='http://sites.google.com/site/adhit8ok/config/pagetemplates/file//shBrushJava.js'/>
<script language='javascript' src='http://sites.google.com/site/adhit8ok/config/pagetemplates/file//shBrushJScript.js'/>

//copy source code di bawah ini dan paste pada body web atau blog Anda
//Lebih baik di-paste di atas code </body>
<script language='javascript'>
function start() {
dp.SyntaxHighlighter.BloggerMode();
dp.SyntaxHighlighter.HighlightAll('code', true, true, false, 1, false);
}
window.onload = start;
</script>

Ingat, link di atas hanya contoh saja, Anda harus mengisinya sesuai dengan link tempat Anda menyimpan file tersebut.

Setelah itu simpan hasil edit html pada blog atau web Anda.

Untuk implementasi, lihat source code di bawah ini :

<pre name="code" class="c-sharp">
... some code here ...
</pre>

//atau

<textarea name="code" class="c#" cols="60" rows="10">
... some code here ...
</textarea>

Berikut ini adalah nama class dari implementasi javascript tersebut sesuai dengan bahasa pemrogramannya adalah sebagai berikut :

Bahasa Pemrograman	Nama class
C++	cpp, c, c++
C#	c#, c-sharp, csharp
CSS	css
Java	java
PHP	php
Sql	sql
Delphi	delphi, pascal
Python	py, python
VB	vb, vb.net
Java Script	js, jscript, javascript
Ruby	rb, ruby, rails, ror
XML/HTML	xml, html, xhtml, xslt

Program Konversi Desimal ke Teks

2009-10-22T05:02:00.000-07:00

Deskripsi :

Program ini mendeskripsikan suatu bilangan desimal yang dikonversi ke teks dalam bahasa Indonesia. Misal, bilangan 2100 makan akan dibaca dua ribu seratus. Program ini ditulis dengan menggunakan bahasa pemrograman java berbasis console.

Source code Program :

/*
import java.io.*;
import java.util.*;

public class KonversiDesimalToTeks2 {
 public static void main (String args[])
 {
    String Smntra="",hasil="",input="";

    String[]konversi={"","Satu ","Dua ","Tiga ","Empat ",
                      "Lima ","Enam ","Tujuh ","Delapan ",
                      "Sembilan "};

    String[]akhiran ={"","Ribu ","Juta ","Milyar ","Trilyun "};

    char  []angka   ={'0','0','0','0','0','0','0','0','0',
                      '0','0','0','0','0','0'};

    //inputan
    System.out.print("Masukkan bilangan : ");
    Scanner obj = new Scanner(System.in);
    input = obj.nextLine();

    //inisialisasi
    char[]temp=input.toCharArray();
    int ratusan=0,puluhan=0,satuan=0,j=angka.length-1,ulang;
    int panjang=temp.length, bilangan=0;

    // pendefenisian bilangan/angka
    for(int i=0;i<temp.length;i++)
    {
      angka[angka.length-1-i]=temp[temp.length-1-i]; 
    }
  
    // penentu banyaknya perulangan untuk menentukan akhiran
    if(panjang%3==0)ulang=panjang/3;
    else ulang=panjang/3+1;

    //aturan konversi desimal ke teks
    for(int i=0;i<ulang;i++)
    {
       Smntra="";
       satuan=Integer.parseInt(String.valueOf(angka[j]));
       puluhan=Integer.parseInt(String.valueOf(angka[--j]));
       ratusan=Integer.parseInt(String.valueOf(angka[--j]));
       j--;

       if(ratusan==1)
       {
          Smntra="seratus ";
          if(satuan==0 && puluhan==0)
             Smntra=Smntra+akhiran[i];
       }
       else if(ratusan!=0)
       {
          Smntra=konversi[ratusan]+"Ratus ";
          if(satuan==0 && puluhan==0)
              Smntra=Smntra+akhiran[i];
       }

       if(puluhan==1)
       {
            if(satuan==1)
               Smntra=Smntra+"Sebelas "+akhiran[i];
            else if(satuan!=0)
               Smntra=Smntra+konversi[satuan]+"belas "
                      +akhiran[i];
            else
               Smntra=Smntra+" Sepuluh "+akhiran[i];
       }
       else if(puluhan!=0)
       {
           Smntra=Smntra+konversi[puluhan]+"Puluh ";
           if(satuan!=0)
              Smntra=Smntra+konversi[satuan]+akhiran[i];
           else
              Smntra=Smntra+akhiran[i];
       }
       else if(satuan==1&& i==1)
              Smntra=Smntra+"Seribu ";
       else if(satuan!=0)
              Smntra=Smntra+konversi[satuan]+akhiran[i];

       hasil=Smntra+hasil;
    }
    System.out.println(""+input+" = "+hasil);
}
}

Output Program :

Program Mencari Bilangan Prima

2009-10-21T21:59:00.000-07:00

Deskripsi :

Program ini mendeskripsikan suatu inputan bilangan dari 1 ke n untuk menentukan bilangan prima. Adapun syarat dari bilangan prima tersebut adalah bilangan yang habis dibagi dengan bilangan itu sendiri, dengan kata lain tidak ada pembagi dengan bilangan lainnya. Adapun cth dari bilangan prima tersebut adalah 1, 2, 3, 5, 7, 13, 17, dll. Program ini menggunakan bahasa pemrograman java berbasis console.

Source code Program :

/*
*Copyright by Adhitya A P (0510960002)
*Student of Computer Science in Brawijaya University
*Indonesia
**/

import java.io.*;
import java.util.*;

public class Prima
{
  public static int cekPrima(int bil)
  {
     int bagi=3, batas=bil;

     if(bil==1)
        return 0;
     else if ((bil==2)||(bil==3))
        return 1;
     else if (bil%2==0)
        return 0;
     else
     {
        while(batas >bagi)
        {
           if(bil%bagi==0)
             return 0;
  
           batas=bil/bagi;
           bagi+=2; 
        }
        return 1;  
     }

  }

  public static void main(String args[])
  {
      for (int bilangan=1; bilangan <100; bilangan++) 
      {       if (cekPrima(bilangan)==1)  
                 System.out.println(+bilangan+" ");   
      }
  }      
}

Output Program :

Program Merge Karakter pada String

2009-10-06T03:10:00.000-07:00

Deskripsi :

Program ini mendeskripsikan suatu karakter pada String untuk di-merge yang mengandung karakter yang sama. Jadi, hasilnya adalah suatu String yang memiliki karakter yang tidak sama. Jika ada karakter yang sama maka secara otomatis program akan menghilangkannya dan hanya ada satu karakter saja diantara karakter yang sama pada inputan String tadi. Program ini disusun dalam bahasa pemrograman java berbasis console.

Source code Program :

/*
*Copyright by Adhitya A P (0510960002)
*Student of Computer Science in Brawijaya University
*Indonesia
**/

import java.io.*;
import java.util.*;

public class MergeKarakter
{
  private static String input;

  // methode untuk mengecek karakter yg sama
  public static boolean cekKarakter(String kal, char x)
  {
     // inisialisasi
     boolean ketemu=false;
     for (int i=0; i <kal.length(); i++)
     {
        // jika ada yg sama
        if (kal.charAt(i)==x)
        {
           ketemu=true;
           break;
        }      
      }
      return ketemu;
  }

  // methode untuk hasil string yg telah di-merge
  public static String newInput(String input)
  {
      String kalimat="";
      for (int i=0; i <input.length(); i++)
      {
         if (!cekKarakter(kalimat, input.charAt(i)))
            kalimat+=input.charAt(i);
      }
      return kalimat;
  }
  public static void main(String args[])
  {
     // inputan dari keyboard
     System.out.print("Masukkan kata atau kalimat : ");
     Scanner obj = new Scanner(System.in);
     input=obj.nextLine();

     System.out.println("\n"+(newInput(input)));
  }
}

Output Program :

Program Menentukan Polindrome

2009-10-05T08:35:00.000-07:00

Deskripsi :

Tahukah kamu tentang polindrome ? Polindrome adalah suatu kata atau kalimat yang jika dibaca dari depan maupun dari belakang memberikan hasil yang sama. Misalnya kata "tamat","kakak","malam","makam","Kodok", dan masih banyak lagi lainnya.

Pada kesempatan kali ini, saya akan memberikan listing program menggunakan bahasa pemrograman java berbasis console untuk penggunaan polindrome ini.

Source code Program :

/*
*Copyright by Adhitya A P (0510960002)
*Student of Computer Science in Brawijaya University
*Indonesia
**/
import java.io.*;
import java.util.*;

public class Polindrome
{
  String input;

  // konstruktor
  public Polindrome ()
  {
     input="";
  }

  // konstruktor berparameter
  public Polindrome (String _input)
  {
     input=_input;
  }

  // methode untuk membaca inputan secara terbalik
  public String Balik ()
  {
      int i;
      String kalimat="";
      char temp[] = new char[100];//array
      for (i=input.length()-1; i >=0;i--)
      {
         temp[i]=input.charAt(i);//tampung karakter
         kalimat+=temp[i];//buat kalimat baru secara terbalik
      }
      return kalimat;
  }

  // cek apakah inputan awal = inputan secara terbalik
  public int cek()
  {
     if (input.equalsIgnoreCase(Balik()))
       return 1;
     else
       return 0;
  }

  public static void main (String args[])
  {
     String inputan;

     System.out.print("Masukkan inputan kata atau kalimat : ");
     Scanner obj = new Scanner(System.in);
     inputan=obj.nextLine();

     Polindrome test = new Polindrome(inputan);

     if (test.cek()==1)
        System.out.println("\nKalimat di atas merupakan "
                        +" polindrome");
     else
        System.out.println("\nKalimat di atas bukan "
                        +"merupakan polindrome ");
  }
}

Output Program :

Program Konversi Bilangan

2009-10-05T02:26:00.001-07:00

Deskripsi :

Program ini merupakan program yang sederhana dengan menggunakan bahasa pemrograman java berbasis console untuk mengkonversi suatu inputan berupa bilangan dari desimal ke biner, biner ke desimal, heksadesimal ke biner, biner ke heksa desimal, desimal ke heksadesimal, dan heksadesimal ke desimal. Program ini memiliki menu sesuai yang tersedia sehingga memudahkan pengguna untuk menentukan nilai suatu konversi bilangan.

Konversi Biner ke Desimal

Contoh Bilangan Bulat/:
1010011  = 1X2^6 + 0X2^5 + 1X2^4 + 0X2^3 + 0X2^2 + 1X2^1 + 1X2^0
= 64 + 0 + 16 + 0 + 0 + 2 + 1
= 83

Konversi Desimal ke Biner

Contoh :
625 / 2 = 312 sisa 1
312 / 2 = 156      0
156 / 2  = 78      0
78 / 2   = 39      0
39 / 2   = 19      1
19 / 2   = 9       1
9 / 2    = 4       1
4 / 2    = 2       0
2 / 2    = 1       0
1 / 2    = 0       1
Jadi 625 = 1001110001

Komversi Bilangan Desimal ke Heksadesimal

Contoh :
270 dibagi 16 hasil:  16   sisa 14  ( = E )
16 dibagi 16 hasil:   1   sisa  0  ( = 0 )
1 dibagi 16 hasil:   0   sisa  1  ( = 1 )

Konversi Bilangan Heksadesimal ke Desimal

Contoh :
10E = 1 | 0 | 14
= 1 x 16^2 + 0 x 16^1 + 14 x 16^0
= 256 + 0 + 14
= 270

Konversi Bilangan Heksadesimal ke Biner

Contoh :
5F =  5   |  F
=  5   |  15
= 0101 | 1111
= 1011111

Konversi Bilangan Biner ke Heksadesimal

Contoh :
101110 = 0010 | 1110
=  2      14
=  2E

Source code Program :

/*
*Copyright by Adhitya A P (0510960002)
*Student of Computer Science in Brawijaya University
*Indonesia
**/
import java.io.*;
import java.util.*;

public class ProgramKonversi
{
public static String ConversiDes_Bin(int des)
{
if(des==1)
return Character.toString('1');
else if ((des%2)==1)
return ConversiDes_Bin(des/2)+ConversiDes_Bin(1);
else
return ConversiDes_Bin(des/2)+Character.toString('0');
}

public static int ConversiBin_Des(String bin)
{
int i, a=0;

for (i=0; i < bin.length(); i++)
{
if (bin.charAt(i)=='1')
a+=Math.pow(2,(bin.length()-1)-i);
else
a+=0;
}
return a;
}

public static String ConversiDes_Hexa(int des)
{
String b,c;

b=String.valueOf(des/16);
c=String.valueOf(des%16);

if (des==0)
return Character.toString('0');
else if(des==1)
return Character.toString('1');
else if(des==2)
return Character.toString('2');
else if(des==3)
return Character.toString('3');
else if(des==4)
return Character.toString('4');
else if(des==5)
return Character.toString('5');
else if(des==6)
return Character.toString('6');
else if(des==7)
return Character.toString('7');
else if(des==8)
return Character.toString('8');
else if(des==9)
return Character.toString('9');
else if(des==10)
return Character.toString('A');
else if(des==11)
return Character.toString('B');
else if(des==12)
return Character.toString('C');
else if(des==13)
return Character.toString('D');
else if(des==14)
return Character.toString('E');
else if(des==15)
return Character.toString('F');
else if (((des%16) < 10)&&((des/16) < 10))
return b+c;
else if (((des%16) < 10)&&((des/16) >= 10))
return (ConversiDes_Hexa(des/16)+ConversiDes_Hexa(des%16));
else if (((des%16) >=10)&&((des/16) < 10))
return b+ConversiDes_Hexa(des%16);
else if (((des%16) >=10)&&((des/16) > =10))
return ConversiDes_Hexa(des%16)+ConversiDes_Hexa(des%16);
else
return "";
}
public static int ConversiHexa_Des(String hex)
{
int i, j, maks=hex.length();
char a;

if (hex.equals(Character.toString('0')))
return 0;
else if(hex.equals(Character.toString('1')))
return 1;
else if(hex.equals(Character.toString('2')))
return 2;
else if(hex.equals(Character.toString('3')))
return 3;
else if(hex.equals(Character.toString('4')))
return 4;
else if(hex.equals(Character.toString('5')))
return 5;
else if(hex.equals(Character.toString('6')))
return 6;
else if(hex.equals(Character.toString('7')))
return 7;
else if(hex.equals(Character.toString('8')))
return 8;
else if(hex.equals(Character.toString('9')))
return 9;
else if(hex.equals(Character.toString('A')))
return 10;
else if(hex.equals(Character.toString('B')))
return 11;
else if(hex.equals(Character.toString('C')))
return 12;
else if(hex.equals(Character.toString('D')))
return 13;
else if(hex.equals(Character.toString('E')))
return 14;
else if(hex.equals(Character.toString('F')))
return 15;
else
return
((ConversiHexa_Des(Character.toString(hex.charAt(0)))*16)
+ConversiHexa_Des(Character.toString(hex.charAt(1))));
}

public static String ConversiHexa_Bin(String heks)
{
int a;
String k;

a=(ConversiHexa_Des(heks));
k=ConversiDes_Bin(a);

return k;
}

public static String ConversiBin_Hexa(String biner)
{
int i;
String j;

i=ConversiBin_Des(biner);
j=ConversiDes_Hexa(i);

return j;
}

public static void main(String args[])
{
String m;
int pilih, i;
do
{
// Menu program
System.out.println("Menu Konversi Bilangan ");
System.out.println("1. Desimal ke Heksadesimal");
System.out.println("2. Heksadesimal ke Desimal");
System.out.println("3. Desimal ke Biner");
System.out.println("4. Biner ke Desimal");
System.out.println("5. Heksadesimal ke Biner");
System.out.println("6. Biner ke Heksadesimal");
System.out.println("0. Keluar");
System.out.print("Pilih menu ");
Scanner plh = new Scanner(System.in);
pilih=plh.nextInt();

switch (pilih)
{
case 1 :
System.out.println("Desimal |Heksadesimal");
for (i=0; i < 256; i++)
{
System.out.println(+i+" |"+ConversiDes_Hexa(i));
}
break;
case 2 :
System.out.print("Masukkan bilangan heksadesimal "
+"= ");
Scanner heks = new Scanner (System.in);
m=heks.nextLine();

System.out.println(""+ConversiHexa_Des(m));
break;
case 3 :
System.out.println("Desimal |Biner");

for (i=1; i < 256; i++)
{
System.out.println(+i+" |"+ConversiDes_Bin(i));
}
break;
case 4 :
System.out.print("Masukkan bilangan biner = ");
Scanner bin = new Scanner (System.in);
m=bin.nextLine();

System.out.println(""+ConversiBin_Des(m));
break;
case 5 :
System.out.print("Masukkan bilangan "
+"heksadesimal = ");
Scanner hex = new Scanner (System.in);
m=hex.nextLine();

System.out.println(""+ConversiHexa_Bin(m));
break;
case 6 :
System.out.print("Masukkan bilangan biner = ");
Scanner binsa = new Scanner (System.in);
m=binsa.nextLine();

System.out.println(""+ConversiBin_Hexa(m));
break;
}
}
while(pilih!=0);
}
}

Output Program :

Program Konversi String Ke Biner

2009-10-04T20:35:00.000-07:00

Deskripsi :

Program ini merupakan program yang sederhana dengan menggunakan bahasa pemrograman java berbasis GUI untuk mengkonversi suatu inputan berupa string agar dikenali sebagai bilangan biner. Jadi, dalam suatu inputan string dipecah menjadi karakter-karakter sesuai dengan banyaknya karakter yang ada pada suatu inputan string. Kemudian karakter tersebut direpresentasikan sebagai integer berupa bilangan desimal sehingga sangat memudahkan untuk konversi ke bilangan biner.

Source code Program :

StringToBiner.java


/*
*Copyright by Adhitya A P (0510960002)
*Student of Computer Science in Brawijaya University
*Indonesia
**/

import java.awt.*;
import java.awt.event.*;
import javax.swing.*;
import javax.swing.event.*;

public class StringToBiner extends JFrame
{
JLabel lbtxt;
JTextField txtInputan;
JTextArea tAnalisis;
JButton bOk, bClear, bKluar;

public StringToBiner ()
{
    setLayout(null);

    // Judul dalam Form
    lbtxt = new JLabel("Contoh Program Konversi String Ke Biner");
    lbtxt.setFont(new Font("Arial",1,16));
    add(lbtxt).setBounds(30,10,350,20); // left,height ,width ,top

    // Label inputan
    lbtxt = new JLabel("Masukkan String ");
    lbtxt.setFont(new Font("Arial",1,11));
    add(lbtxt).setBounds(10,10,100,150); // left,height ,width ,top

    // Text Field inputan
    txtInputan = new JTextField ("");
    add(txtInputan).setBounds(115,73,250,25);// left,top ,width ,height
    
    // Label untuk Text Area
    lbtxt = new JLabel("Analisis : ");
    lbtxt.setFont(new Font("Arial",1,11));
    add(lbtxt).setBounds(10,10,100,230); // left,height ,width ,top

    // text Area untuk Analisis
    tAnalisis = new JTextArea ();

    // Mengeset lineWrap and wrapStyleWord menjadi true untuk text area
    tAnalisis.setLineWrap(true);
    tAnalisis.setWrapStyleWord(true);

    // Membuat scroll pane untuk menyimpan text area
    JScrollPane scrollPane = new JScrollPane(tAnalisis);
    add(scrollPane).setBounds(10,140,355,200);
    
    // Button pada form
    bOk = new JButton ("Ok");
    add(bOk).setBounds(10,360,100,25);
    bClear = new JButton ("Bersihkan");
    add(bClear).setBounds(120,360,100,25);
    bKluar = new JButton ("Keluar");
    add(bKluar).setBounds(263,360,100,25);
    
    bOk.addActionListener(new Aksi());
    bClear.addActionListener(new Aksi());
    bKluar.addActionListener(new Aksi());
    
    addWindowListener (new WindowAdapter ()
    {
       public void windowClosing (WindowEvent e)
       {
          System.exit(0);
       }
    });
}

// metode konversi dari Desimal ke Biner
public static String ConversDesToBin(int des)
{
  if(des==1)
  {
   return Character.toString('1');
  }
  else if ((des%2)==1)
  {
   return ConversDesToBin(des/2)+ConversDesToBin(1);
  }
  else
  {
   return ConversDesToBin(des/2)+Character.toString('0');
  }
}

class Aksi implements ActionListener
{
    public void actionPerformed (ActionEvent e)
    {
       String st = e.getActionCommand();
 
       //Proses Aksi pada JButoon
       if (st.equals("Ok"))
       {
         char kar[] = new char[1000];
         String bin[] = new String[1000];
         String hasil="",input;
  
         input = txtInputan.getText();
  
         tAnalisis.append("No.\tKarakter\tDesimal\t       Biner\n");

         /* Menjadikan karakter dari string untuk disimpan di array
            sekaligus konversi dari String ke Biner*/
         for (int i=0; i<input.length(); i++)
         {
            //Mencari karakter
            kar[i] = input.charAt(i);
            // Konversi String ke Biner
            bin[i] = ConversDesToBin((int) kar[i]);
            hasil = hasil+ bin[i]; // Cetak
            tAnalisis.append(" "+(i+1)+"\t    "+kar[i]
                           +"\t    "+(int) kar[i]+"\t = "+bin[i]+"\n");
         }
  
          tAnalisis.append("\nHasil = "+hasil+"\n\n");
 }
 else if (st.equals("Bersihkan"))
 {
    txtInputan.setText("");
    tAnalisis.setText("");
 }
 else if (st.equals("Keluar"))
 {
    System.exit(0);
 }
   }

}

public static void main(String[] args)
{
  StringToBiner window = new StringToBiner ();
  window.setSize(400,450);
  window.setVisible(true);
  window.setTitle("Program Konversi String Ke Biner");
  window.setResizable(false);
  window.show();
}
}

Output Program :

Membuat menu ribbon layaknya Office 2007

2009-08-03T18:15:00.000-07:00

Pada component pallete delphi pilih ExpressBar.
Kemudian pilih dxRibbon, letakkan komponennya pada form
Kemudian pilih dxBarmanager secara default akan bernama dxBarManager1
Pada Object Inspector dxRibbon pilih properties BarManager lalu link-kan dengan dxBarManager1
Untuk memulai kerja pada bidang, klik kanan pada mouse lalu pilih Group With Toolbar untuk menambah komponen pada masing-masing menu
Pada toolbar, klik kanan untuk menambahkan komponen

Hasilnya
Jika ingin membuat menu dipojok kiri atas, pada komponen dxRibbon cari properties QuickAccessToolbar kemudian pilih toolbar (cari toolbar yg memang disediakan untuk menu pada pojok kiri atas).Untuk meng-edit menu tersebut cari properties application button pada dxribbon

Jadi pada intinya dalam pembuatan ribbon dibutuhkan komponen dxBarManager. Prinsip ribbon sama dengan toolbar (komponen sebelumnya). Jika ingin menggali lebih dalam "mainkan" saja properties yg ada dan lihatlah perubahannya.

Tambahan Lainnya......

Mennyisipkan gambar pada komponen-komponen di ribbon.

Pada component pallete pilih Dev Express lalu cari komponen cxImageList. Kemudian klik dan pindahkan ke form
Lalu link-kan komponen tersebut pada komponen ribbon. Caranya pada komponen ribbon cari properties BarManager lalu expand kemudian cari ImageOption, nanti ada properties Images dan LargeImage. Salah satu saja dipilih
Pada cxImageList itu sendiri Anda hanya menambahkan icon picture yg akan diurutkan pada index-nya. Double-klik komponen tersebut maka akan tampil seperti gambar di bawah ini :
Pada komponen ribbon, klik component yg ingin disipkan gambar lalu cari properties ImageIndex atau largeImageIndex dan pilih icon yg ingin ditampilkan

Membuat Hint untuk komponen-komponen di ribbon

Pada component pallete pilih ExpressBar lalu cari komponen dxbarScreenTipRepository
Double-klik komponen tersebut lalu add new. Isi properties Header, Footer, Description
Pada komponen yg ada di ribbon, klik komponen tersebut dan link-kan dgn dxBarScreenTipRepository. Caranya cari properties ScreenTip dan pilih

About Yoshioka YUI

2009-07-14T04:04:00.000-07:00

Profile

Lahir: Fukuoka, 26 Maret 1987 (Jepang)
Pekerjaan: Penyanyi dan Pencipta lagu (2003-sekarang)
Perusahaan: Rainbow Entertainment (2004), Sony Music (2005-sekarang)
Genre : J-pop, J-Rock
Situs pribadi : http://www.yui-net.com/
Zodiak : Aries
Shio : Kelinci
Hobi : menonton film, membaca buku, bulutangkis
Tinggi badan : 155 cm
Golongan darah : AB
Tempat favorit : pantai Shingū di Fukuoka

Karier _{(Dikutip dari wikipedia)}

Yui memulai menulis lirik lagunya sendiri sewaktu di kelas 3 SMP. Yui sangat bercita-cita menjadi penyanyi, dan pergi ke mana-mana dengan selalu membawa gitarnya. Sewaktu SMA, ia sering menyaksikan pertunjukan grup musik bianco nero di jalanan, dan memutuskan untuk berhenti sekolah. Yui mulai belajar menyanyi, menulis lagu, dan memainkan gitar di kursus musik kota Fukuoka.

Sambil bersila di atas kasur, Yui memainkan gitarnya dan menulis lagu pertama yang diberi judul "Why me".[1] Setelah itu, ia mulai menyanyi di pinggir jalan di kawasan Tenjin, Fukuoka[2] sebagai atraksi pembuka bagi teman satu tempat kursus musik.

Bulan Maret 2004, Yui mengikuti audisi "SD Audition" yang diadakan Sony Music Japan. Dari 20 ribu peserta hanya 10 orang yang tersisa termasuk Yui. Duduk menyilangkan kaki di lantai, Yui bernyanyi sambil memetik gitar. Lagu yang dibawakannya waktu itu sebanyak 3 buah lagu, "Why me", "It's happy line", dan "I know". Finalis hanya boleh membawakan 2 buah lagu menurut peraturan audisi, tapi juri memberikan nilai yang sangat tinggi bagi Yui. Setelah itu, berbagai perusahaan rekaman menjadi saling berebut untuk mengontraknya. Lagu pertama yang dinyanyikan, "Why Me" nantinya dijadikan single perdana, diikuti dengan "It's Happy Line" dan "I Know". Keduanya diterbitkan sebagai singel indie debutnya, "It's Happy Line" dengan lagu "I Know" di sisi B.

Sebagai penghargaan kepada kampung halamannya, Yui menulis lagu "Feel My Soul" ketika meninggalkan kampung halamannya, Fukuoka. Seorang produser dari stasiun televisi Fuji TV mendengar video klip demo lagu tersebut, dan bermaksud menjadikannya sebagai lagu tema serial drama di Fuji TV. Debut singel Yui, "Feel My Soul" yang dirilis 23 Februari 2006 dijadikan lagu tema serial drama Fukigen na Gene. Serial drama tersebut dihiasi lagu-lagu Yui, seperti "Feel My Soul" dan "It's Happy Line". Singel "Feel My Soul" laku di atas 100 ribu keping, namun 3 singel berikutnya, "Tomorrow's Way", "Life", dan "Tokyo" ternyata tidak sesukses "Feel My Soul". Setelah merilis 4 buah singel, album pertama Yui yang berjudul From Me To You dirilis bulan Februari 2006 dan laku di atas 200 ribu keping.

Sementara itu, Yui memulai karier akting dengan membintangi film berjudul Midnight Sun (Taiyou no Uta). Film tersebut diputar di Festival Film Cannes 2006 dan dirilis di Jepang pada 17 Juni 2006. Singel ke-5, "Good-bye Days" khusus ditulisnya untuk film Midnight Sun. Kepopuleran singel Yui yang sebelumnya kembali terangkat setelah singel ke-6, "I Remember You" diedarkan.

"Rolling Star" adalah singel ke-7 Yui yang dijadikan lagu pembuka seri ke-5 anime Bleach. Singel ke-3, "Life" juga dipakai sebagai lagu penutup seri ke-5 anime yang sama. Selain itu, iklan televisi ponsel KDDI layanan "au Listen Mobile Service" memakai singel ke-8 Yui, "CHE.R.RY" sebagai lagu tema.

Sementara itu, album kedua, Can't Buy My Love menduduki puncak tangga album Oricon selama 2 minggu berturut-turut, dan laku lebih dari 500.000 keping.

Singel ke-9 berjudul "My Generation/Understand" dirilis 13 Juni 2007, sekaligus merupakan singel pertama Yui yang berbentuk double A-side (dua lagu unggulan di sisi A). My Generation menjadi lagu tema untuk serial drama Seitosho-kun, dan "Understand" menjadi lagu tema film Sidecar ni Inu.

Singel ke-10, "Love & Truth", dirilis 26 September 2007, merupakan lagu tema dari film yang dibintangi oleh Erika Sawajiri, yang berjudul "Closed Note".

Album

From Me To You (22 Februari 2006) download album part1 download album part2
Can't Buy My Love (4 April 2007) download album part1 download album part2
I Loved Yesterday (9 April 2008) download album part1 download album part2
My Short Stories (12 November 2008) download album part1 download part2

Album YUI memang sedikit, tapi dia banyak ngeluarin single sebelum pembuatan albumnya. Single dijadikan satu dalam album sehingga terbentuklah album-album YUI. Nah, lagu-lagu singlenya yang gua suka banyak loh dan wajib didengar para fans YUI (upz, bisa download lagu dan video YUI juga lho). Antara lain :

Rolling star download mp3
Life download mp3
CHE.R.R.Y download mp3 download video
Goodbye Days download mp3
Skyline download mp3 download video
Nomidairo download video
Feel My Soul download mp3
My Generation download mp3 download video
Love & Truth download mp3 download video

Nah, dia juga pernah main film. Judulnya Taiyou No Uta versi movie. Acting-nya juga g kalah bagus ko sama Erika Sawajiri yang berperan sebagai Kouru Amana dalam Taiyou No Uta serial TV. kayanya nih film pertama YUI. Aku lebih suka nonton Taiyou No Uta versi movie ketimbang Serial TV nya hehehehehe apalagi waktu aku dengar lagu Goodbye Days diakhir ceritanya huh sungguh terharu dan kagum akan keindahan suara YUI yang sexy banget. Hmmm, kapan yah YUI main film lagi.......

Lyrics & Chords:

Goodbye Days

Intro  : A E D F#m E D DMaj7

A   E   Bm7Dsus2 A     E      F#m D
Dakara ima ainiyuku soukimetanda
A    E  Bm7Dsus2   A        E      F#m D
Pokettono konokyokuwo kiminikikasetai

Bm              C#m
Sotto volume wo agete
Bm     G       E  F#
Tashikametemitayo

Chorus:
D     E      F#m     A       D      E  F#m
Oh goodbye days ima kawarukigasuru kinoumadeni so long
D  E      F#m     A        Bm     Dm                   F#m          
Kakkoyokunai yasashisaga soba ni arukara La la la la la  with you

Interval:
F#m E D
F#m E D Dsus2 D Dsus2 D

A     EBm7Dsus2   A    E       F#m D
Katahouno iyaphonewo kiminiwatasu
A  E   Bm7Dsus2   A   E       F#m D
Yukkurito nagarekomu kono shunkan

Bm           C#m
Umakuaisete imasuka?
Bm    G       E   F#
Tamanimayou kedo

Chorus:
D     E       F#m      A       D      E   F#m
Oh Goodbye Days ima, kawari hajimeta mune no oku all right
D   E      F#m        A      Bm      Dm                    A
kakkoyoku nai yasashisa ga soba ni aru kara La la la la love with you

Interval:
G F#m E D
G F#m E D

F#m      E   D          A               F#m    E  D      A
Dekireba kanashii omoi nannte shitakunai demo yattekuru desho? oh
F#m       E       D                 A         F#m     E  D
Sono toki egao de yeah hello! my friends nanntesa iyetara iinoni

Dsus2E      F#m     A       D      E F#m  A
Onaji uta wo kuchizusamutoki soba ni ite I wish
D   E      F#m      A      Bm      C#m Dm
Kakkoyoku nai yasashisa ni aete yokattayo La la la la la Goodbye Days

Coda :
A E  D Dsus2 D Dsus2 D
A E  D Dsus2 D Dsus2 D
A E  D Dsus2 D Dsus2 D
A E  D Dsus2 D Dsus2 D
A E  D Dsus2 D Dsus2 D
A E  D Dsus2 D Dsus2 D Dsus2 D

Rolling Star

mou gaman bakka shiterannai yo
iitai koto wa iwanakucha

kaerimichi yuugure no basutei
ochikonda senaka ni Bye Bye Bye

kimi no Fighting Pose misenakya Oh! Oh!

yume ni made mita you na sekai wa
arasoi mo naku heiwa na nichijou

demo genjitsu wa hibi TORABU tte
tama ni kuyandari shiteru sonna Rolling days

koronjatta tte ii n janai no
son'toki wa waratte ageru

norikonda BASU no oku kara
chiisaku hohoemi ga mieta

kimi wo tayori ni shiteru yo Oh! Oh!

yume ni made mita you na Sweet Love
koibito tachi wa kakurega wo sagasu no

demo genjitsu wa aenai hi ga
tsuzuki nagara mo shinjiteru no Lonely days

tsumazuita tte Way to go!!
Yeah!! Yeah!! dorodarake Rolling star!!

narubeku egao de itai keredo
mamorinuku tame ni wa shikata nai desho?

kitto uso nante sou imi wo motanai no
~ All my loving
sou janakya yatterannai

yume ni made mita you na sekai wa
arasoi mo naku heiwa na nichijou
demo genjitsu wa hibi TORABU tte
tama ni kuyandari shiteru sonna Rolling days

... sou wakatteru tte
tsumazuita tte Way to go!!
Yeah!! Yeah!! dorodarake Rolling star!!

Namidairo

kirawarete iru youna ki ga shiteta kaeri michi
miageta heya no akari ima donna kimochi de iru no darou
kenka ni nareba sugu ayamaru
yowakute anata wa zurui hito

namidairo koe ga kikoenai yoru wa
komarasete shimau hodo wagamama ni naritai
daijoubu sou itte mita kedo sonna hazu nai deshou...

mizu tamari ni utsuru kanshii kao minarete iru
muri iwanai tsumori wakatteru kara kurushiku naruyo
yasashiku sareru to nakete kuru
yappari anata wa zurui hito

namidairo koe ga kikoenai yoru wa
komarasete shimau hodo wagamama ni naritai
daijoubu sou itte mita kedo sonna hazu nai deshou...

anata no mae ja usotsuki yo
kiduite hoshii to omotte iru no
sonna ni tsuyoi wake ja nai kara ne..atashi...

namida kobosanai kimete ita noni
komarasete simau yone wagamama ni narenai
daijoubu nante mata kiku kedo sonna hazu nai deshou...

CHE.R.R.Y

Tenohira de furueta sore ga chisana yuuki ni natte ita n da
emoji wa nigate datta dakedo kimi kara dattara wakuwaku shichau

henji wa sugu ni shicha dame da tte dareka ni kiita koto aru kedo
kakehiki nante dekinai no
suki nano yo ah ah ah ah

koi shichattanda tabun kidsuitenai deshou?
Hoshi no yoru negai komete CHE.R.RY
yubisaki de okuru kimi e no MESSAGE

sakura ga saiteiru kono heya kara mieteru keshiki wo zenbu
ima kimi ga kanjita sekai to juu byou tori kaete morau yori

hon no ichigyou demo kamawanainda kimi kara no kotoba ga hoshiinda
usou demo shinji tsudsukerareru no
suki dakara ah ah ah ah

koi shichattanda tabun kidsuitenai deshou?
Hoshi no yoru negai komete CHE.R.RY
yubisaki de okuru kimi e no MESSAGE

amakunaru kajitsu ga ii no
naigenai kaiwa kara sodate tai ah ah ah ah

koi no hajimari mune ga kyun to semakunaru
itsumademo matteiru kara haru no tsumetai yokaze ni azukete MESSAGE

koi shichattanda tabun kidsuitenai deshou?
Hoshi no yoru negai komete CHE.R.RY
yubisaki de okuru kimi e no MESSAGE

Life

Doro darake yo najime nai tokai de
Onaji you ni warae nai utsumuite aruita no
Isogi ashi de surechigau hito-tachi
“Yume wa kanai mashita ka?”
ATASHI mada MOGAite iru

Kodomo no goro ni modoru yori mo
Ima wo umaku ikite mitai yo
Kowagari wa umare tsuki

Hi no atari basho ni dete
Ryoute wo hirogete mita nara
Ano sora koete yukeru ka na?
Nante omottanda
Tobitatsu tame no tsubasa
Sore wa mada mie nai
KANTAN ni ika nai kara ikite yukeru

Nureta koinu hiroi ageta dakede
Chotto warae chau hodo
Namida ga koborete kita

Aisaretai aisaretai bakari
ATASHI itte ita yo ne
Motomeru dake ja dame ne

Kodomo no goro wa MAMA no koto
Hidoku kizutsuketa
Hi mo atta yo ne kawari tai
Ima zenbu

Hi no ataru basho ni dete
Kono te wo tsuyoku nigitte mitai
Ano basho ano toki wo kowashite
I can change my life

Demo kokoro no naka subete wo
Totemo tsutae kire nai
KANTAN ni ika nai kara
Ikite yukeru

Hi no ataru basho ni dete
Chizu wo hirogete miru kedo
I know... You know...
Mayoi michi mo shikata nai
I can change my life

Sugite kita hibi zenbu de
Ima no atashi nanda yo
KANTAN ni ika nai kara
Ikite yukeru

Love & Truth

Intro:
Dm C#dim C G
Bb C Bb A7

Dm        C         Bb         C
Konna ni omotte iru Jikan wa tomatte kurenai
Dm         C        Bb                      C
Karappo no kokoro wa anata no kimochi wo mada mitsukerarenai
Bb                       C
Onaji e wo nido to egaku koto wa dekinai no ni
Bb                       C                   C#dim A7
Atashi no kanjou wa tada kurikaeshite bakari
Dm  C#dim      C        GonC/B Bb C            C#dim
“Ai no uta” wo kikasete yo sono yokogao mitsumeta
Dm    C#dimC     GonC/BBb        C      C#dim
Anata no koto shiritai yo mou deatte shimatta no

The middle part thingy?:
Dm C Bb
Dm C Bb

Dm         C            Bb                        C
Donna ni sabishikute mo mata aeru ki ga shite iru kara
Dm       C        Bb                  C
Riyuu nante iranai hiki kaesenai koto wo shitte iru
Bb                               C
Kono mama ja wasuremono ni natte shimau desho?
Bb                         C                C#dim   A7
Atashi no kanjou wa namida no oku kagayaita
Dm     C#dimC      GonC/B Bb      C            C#dim
“Ai no uta” wo kikasete yo sono yokogao sono saki ni
Dm    C#dim C     GonC/B Bb   C           C#dim
Anata ga ima mitsumeteru hito ga iru to wakatte mo
Gm             Am     Bb            C
Tsubasa wo kudasai to shinjite utau you ni
Gm              Am     Bb                C           C#dim
Atashi datte chikau yo Kako no zenbu uke ireru tte kimeta

Melodic : Dm  C#dim C   G/B Bb  C   Bb  C#dim A7
Dm     C#dimC       GonC/B Bb    C        C#dim
“Ai no uta” wo kuchizusamu sono egao ni furetai
Dm   C#dim C     GonC/B Bb      C          C#dim
Anata ga ima mitsumeteru hito ga iru to wakatte mo
Dm     C#dim C    GonC/B Bb    C      C#dim    Dm  C#dim C
“Ai no uta” wa owaranai mou deatte shimatta no
GonC/B Bb C          Dm
Owaranai,    Love & Truth

Coda :
Dm C#dim C G
Bb C Bb A7

Komponen untuk Delphi

2009-07-13T19:49:00.000-07:00

Bahasa Pemrograman delphi merupakan bentuk visual dari bahasa pemrograman pascal yang terinspirasi dari munculnya bentuk visual dari BASIC yaitu visual basic. Bahasa pemrograman delphi ini lahir pada tahun 1995 dan sempat menjadi bahasa pemrograman favorit para programmer pada akhir dekade 90-an. Popularitasnya semakin menurun sejak Anders Hejlsberg,yang mana merupakan pentolan dari programmer delphi "diculik" oleh Microsoft untuk mengembangkan bahasa pemrograman C#(dibaca:si sharp).

Bahasa pemrograman ini tidak berbasis OOP melainkan berbasis struktur hanya fungsi dan procedure saja. Pada umumnya, software ini hanya menyediakan komponen-komponen standar untuk pengembangan dan pembuatan suatu aplikasi. Untuk memperindah dan memudahkan Anda dalam pembuatan aplikasi, delphi menyediakan berbagai komponen yang menarik dan sesuai dengan kebutuhan programmer. Adapun beberapa komponen tambahan yang mendukung untuk delphi yaitu :

DevExpress

Komponen tambahan ini sangat banyak sekali fitur yang disuguhkan. Style yang menyerupai office 2007 seperti ribbon, sidebar, page control, toolbar, image, data control dan lain-lain. Terlihat begitu smooth dan sangat elegant sekali. Jika Anda berminat ingin mencoba komponen tersebut silakan download disini. Dilengkapi dengan demo-nya juga lho! untuk mengetahui cara penggunaan komponen-komponen tersebut.

Adapun petunjuk instalasi sebagai berikut :

Pastikan borland delphi telah ter-install dengan sempurna sebelumnya. Disini, saya tidak akan menjelaskan bagaimana cara meng-install delphi.
Extract file DevExpress yang telah anda download tadi. Hasilnya berupa folder dengan nama 'DevExpress'. Kalo Anda g punya aplikasinya bisa download WinRar disini.
Copy folder DevExpress ini ke ....\Program Files\Borland\Delphi7\ (tempat anda meng-install delphi).
Install komponen DevExpress dengan membuka tiap folder yang ada di dalam folder DevExpress kemudian cari folder package. Disana terdapat file ber-type delphi package, pilih file tersebut sesuai dengan versi delphi anda. Misal, Delphi 7 maka akan ada file bernama ....7.dcu kemudian klik file tersebut. Perhatikan langkah di bawah ini dengan seksama!

a. Pertama akan muncul tampilan seperti di bawah ini.

b. Kemudian dari tampilan di atas tadi pilih option. Maka akan muncul tampilan seperti di bawah ini. Pilihlah designtime and runtime kemudian klik tombol 'OK'.

c. Kemudian tampilan akan kembali ke langkah a dan tekanlah tombol 'compile'. Jika muncul tampilan seperti di bawah ini .

cari unit atau source (.pas) dari nama yang diberi warna merah seperti gambar diatas. Source tersebut ada terdapat di dalam folder cari folder dengan nama 'source'. Tanda tersebut memberitahukan bahwa file tersebut belum ditambahkan. Adapun cara penambahannya seperti di bawah ini yang terdapat pada tombol 'add' pada tampilan seperti langkah a.

Copy url nama unit atau file yang belum ditambahkan tadi ke tampilan di atas. Atau browse nama unit atau file tersebut. Kemudian tekan tombol 'OK'. Jika berhasil akan muncul perintah seperti di bawah ini

Begitu seterusnya untuk tiap-tiap komponen yang ada.

Untuk memperlancar proses instalasi sebaiknya Anda mengikuti urutan langkah-langkah instalasi komponen di bawah. Adapun urutan langkah-langkah instalasi komponennya adalah sebagai berikut :
> XP Theme Manager
> ExpressGDI+ Library
> ExpressLibrary
> ExpressCommon Library
> ExpressBars 6
> ExpressNavBar
> ExpressDocking Library
> ExpressPageControl 2
> ExpressExport Library
> ExpressDataController
> ExpressEditors Library 5

Nice Grid
Anda ingin memiliki tabel yang menyerupai microsoft excell? Inilah komponennya 'NiceGrid'. Sayang, tersedia untuk delphi 7 saja. Dengan komponen ini Anda akan merasakan bahwa tabel yang akan Anda pakai menjadi lebih modern karena tampilan ini g jadul banget kaya komponen brid lainnya yang ada. disini