Portal IT & Islamic
Posts tagged source code
membuat login multi user pada delphi 7
Aug 25th
Dalam membangun sebuah aplikasi kita sering dihadapkan pada kasus dimana pemakai aplikasi terdiri dari beberapa kalangan atau tingkatan akses data. misal, untuk sistem informasi akademik misalnya, sistem tersebut kelak dipakai oleh kepala sekolah, guru, siswa, dan bahkan TU. dan tentu saja, masing-masing jabatan atau kalangan memilliki akses data yang berbeda, misal, guru input nilai, sedangkan siswa melihat nilai dirinya pada beberapa mata pelajaran.
untuk menghadapi kasus ini, maka diperukan sebuah sistem yang memiliki login multi user. sehingga bisa dibedakan, user sebagai admin, siswa, guru atau yang lainnya. berikut adalah salah satu contoh solusi sederhana login multi user.
dengan spesifikasi memakai database MS access 2003, 2 user yaitu guest dan admin, dan dibuat menggunakan delpi7.
source untuk login :
———————————-begin————————
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB, StdCtrls;
baca selanjutnya »
Menggabungkan beberapa string kemudian memisahkan string menjadi beberapa substring berdasarkan delimiter pada delphi 7
Aug 22nd
haaahhh.. akhirnya setelah sekian lama bisa juga disempatkan sedikit waktu untuk post sebuah artikel tutorial. kali ini saya akan membuat sebuah tutorial untuk menggabungkan beberapa String atau kata menjadi sebuah string. Dan kemudian memisahkan kembali string yang telah di gabung tersebut menjadi beberapa substring. mungkin dalam penggabungan kita tidak akan terlalu menemukan masalah karena sangat mudah hanya dengan script sederhana. misal:
String:=''+string1+' '+string2+'';
namun bagaimana jika kita hendak memisahkan lagi 2 string yang telah digabung tersebut untuk keperluan edit data atau keperluan lainnya?? itu lah yang agak merepotkan..
hal seperti ini baru saja saya alami. dimana biasanya saya hanya memakai datetimepicker untuk menyajikan data berupa tanggal. Namun kemarin, saya diminta untuk menyajikan tanggal dalam bentuk 3 combobox. sebut saja masing-masing dengan cbhari, cbbulan, dan cbtahun. user menginputkan dengan 3 combobox tersebut lalu data tanggal disimpan dalam 1 field bernama tanggal (proses penggabungan string) dan jika suatu saat diperlukan edit data tanggal, maka tanggal yang tadinya telah disimpan menjadi 1 string harus dipisah lagi menjadi 3 substring tanggal. yaitu untuk hari, bulan, dan tahun. contoh:
user input tanggal :
cbhari=7
cbbulan=April
cbtahun=1999
kemudian data disimpan menjadi 7/April/1999. dan jika dibutuhkan edit, maka String 7/April/1999 harus dipisah lagi menjadi:
cbhari=7
cbbulan=April
cbtahun=1999
o iya, disini dipakai pemisah/delimiter tanda ‘/’ sebenarnya bisa juga memakai spasi,’;', atau tanda lainya…
berikut source lengkapnya..
——————————begin—————————
unit Unit1;
interface
baca selanjutnya »
chat sederhana berbasis console client server dengan java
Jul 28th
oke, sekarang saat nya kita mempelajari pemrograman java. kali ini server socket. salah satu fungsinya adalah untuk membuat aplikasi chating. aplikasi chating tersebut masih sangat sederhana. karena tidak dalam bentuk gui melainkan masih dalam bentuk console. prinsipnya, chat bisa berjalan jika server dijalankan terlebih dahulu. bisa dalam 1 komputer, bisa juga dalam komputer yang berbeda. masalah ini, tinggal seting saja pada client. tulis localhost jika chat dalam 1 komputer, atau tulis ip server jika chat dilakukan dengan komputer yang berbeda. karena bersifat sederhana pula, chat hanya bisa dilakukan secara bergantian. tidak bisa server terus yang mengirim pesan, begitu juga untuk client.
anda disarankan untuk memahami konsep-konsep dasar pemrograman sebelum mencoba untuk menjalankan aplikasi ini. kalau belum, pada akhirnya juga akan mengatakan “program apa ini?? ngawur si admin. program ga bisa dijalankan nekat di upload pula”. 
karena saya banyak menerima komentar serupa, berkaitan dengan source code yang saya upload. sedangkan, saya pastikan bahwa semua source code bisa di compile atau dijalankan dengan baik.
oke, sekali lagi, mohon dipelajari algoritma dan code nya. jadi jangan asal copy-paste.
chatserver.java
—————————-begin—————————————
import java.net.*;
import java.io.*;
public class chatserver
{
public static void main(String args[]) throws Exception
{
ServerSocket ss=new ServerSocket(2000);
System.out.println(”Menunggu Klien mengirim pesan pertama, klien yang harus pertama kali mengirim pesan…”);
System.out.println(”* chat dilakukan 2 arah, server klien, n bergantian kirim pesan.”);
Socket sk=ss.accept();
System.out.println(”Klien telah masuk. happy chat! untuk berhenti, ketik stop pada klien.\n\n”);
BufferedReader cin=new BufferedReader(new InputStreamReader(sk.getInputStream()));
PrintStream cout=new PrintStream(sk.getOutputStream());
BufferedReader stdin=new BufferedReader(new InputStreamReader(System.in));
String s;
while ( true )
{
s=cin.readLine();
if (s.equalsIgnoreCase(”stop”))
{
cout.println(”Bye”);
break;
}
System. out.print(”Client : “+s+”\n”);
System.out.print(”Server : “);
s=stdin.readLine();
cout.println(s);
}
ss.close();
sk.close();
cin.close();
cout.close();
stdin.close();
}
}
baca selanjutnya »
contoh program pencarian search string sederhana pada java
Jul 24th
sebelum saya tulis tentang contoh sederhana pencarian string, ada baiknya kita pelajari secara singkat terlebih dahulu tentang Metode‐metode dalam class String (J2SDK1.4.2). berikut sekilas info nya :
1. char charAt(int index)
- Mengembalikan sebuah karakter pada index tertentu.
- Parameter index adalah index dari karakter mulai dari 0 sampai jumlah karakter – 1.
- Error IndexOutOfBoundsException terjadi bila parameter index negatif atau tidak kurang dari
jumlah karakter.
2. int compareTo(Object o)
- Membandingkan string ini dengan object lain.
- Jika object merupakan string maka metode ini bersifat seperti compareTo(String).
- Nilai kembalian 0 bila argumen‐nya sama dengan string ini.
- Nilai kembalian negatif bila argumen‐nya lebih besar dari string ini.
- Nilai kembalian positif bila argumen‐nya lebih kecil dari string ini.
- Error ClassCastException terjadi bila argumen bukan string.
3. int compareTo(String anotherString)
- Membandingkan string ini dengan string yang lain.
- Nilai kembalian 0 bila argumen‐nya sama dengan string ini.
- Nilai kembalian negatif bila argumen‐nya lebih besar dari string ini.
- Nilai kembalian positif bila argumen‐nya lebih kecil dari string ini.
4. int compareToIgnoreCase(String str)
- Membandingkan string ini dengan string yang lain tanpa memperhatikan besar kecilnya karakter.
- Nilai kembalian 0 bila argumen‐nya sama dengan string ini.
- Nilai kembalian negatif bila argumen‐nya lebih besar dari string ini.
- Nilai kembalian positif bila argumen‐nya lebih kecil dari string ini.
5. String concat(String str)
- Menyambung string ini dengan argumen‐nya.
- Nilai yang dikembalikan adalah string hasil penyambungan di atas.
6. boolean contentEquals(StringBuffer sb)
- Mengembalikan nilai true jika string ini merepresentasikan deretan karakter yang sama dengan
argumen StringBuffer sb.
baca selanjutnya »
konsep dasar pemrograman java abstract class
Jul 19th
berikut akan sedikit dijelaskan tentang abstract class pada java.
• Class abstract dideklarasikan dengan kata kunci abtract ditulis sebelum kata kunci class
• Class abstract memiliki menimal satu method abstract
• Subclass dari class abstract harus mengoverride semua method abstract
• Class abstract tidak dapat dibuat instance, yang bisa hanya class concrete
contoh program menggunakan abstract class
Shape .java
————————————-begin————————————-
public abstract class Shape {
private String name;
Shape(String aName) {
name=aName;
}
public String getName() {
return name;
}
public abstract float calculateArea();
}
class Circle extends Shape {
private int radius;
Circle(String aName) {
super(aName);
radius = 3;
}
public float calculateArea() {
float area;
area = (float) (3.14 * radius * radius);
return area;
}
}
class Square extends Shape {
private int side;
Square(String aName) {
super(aName);
side = 3;
}
public float calculateArea() {
int area;
area = side * side;
return area;
}
}
—————————————–end————————–
baca selanjutnya »
