Internet untuk Mencari Pekerjaan

Manfaat dan Kekurangan Internet untuk Mencari Pekerjaan

Berbagai hal pasti bisa kita temukan di dalam Internet, begitu juga dalam hal mencari pekerjaan. Internet menyediakan informasi-informasi dalam mencari pekerjaan dan memberikan banyak manfaat di dalamnya, seperti:

* Berbagai peluang pekerjaan dan informasi karir bisa diakses setiap waktu, dimanapun kita berada(yang penting ada koneksi internet).
* Kemampuan untuk menemukan informasi yang tidak umum, atau bahkan informasi yang tidak dibuka di tempat umum.
* Menyediakan media komunikasi dengan para profesional atau berdiskusi dengan kalangan tertentu pada suatu bidang, khususnya dalam hal pekerjaan itu sendiri.
* Mempelajari lebih jauh tentang suatu perusahaan, organisasi, atau biro.
* Pengiriman resume anda atau mendaftarkan diri pada suatu posisi kerja tertentu secara online.

Walaupun Internet menpunyai banyak maafaat akan tetapi internet juga mempunyai kekurangan dalam menyediakan informasi pekerjaan, diantaranya:

* Peluang dan informasi yang tersedia sangat banyak, kadang-kadang saking banyaknya hasil dari suatu pencarian, malah informasinya tidak terpakai.
* Keterkaitan dengan isu privasi.
* Informasi yang kurang jelas.

Cara Cepat Dalam Mencari Informasi Lowongan Pekerjaan:
* Langsung menuju alamat website yang disebutkan dari sumber informasi tersebut.
* Gunakan sistem index secara online, sering berupa mesin pencari seperti Google dan Yahoo.
* Tanyakan kepada para profesional yang berada pada bidang kerja yang sama dengan bidang anda, dimana alamat situs yang bermanfaat yang mereka ketahui.
* Identifikasi halaman web yang mungkin memiliki link dengan situs yang bermanfaat dan berkaitan dengan karir atau lowongan pekerjaan.
* Tanyakan kembali informasi tersebut kepada Adminnya dengan mengirim email atau comment langsung di bawah postingannya.

read more...

Pengurutan

Ni postingan pertama q tentang pemograman...
moga ja bisa ngebantu kalian.
hehe
:p
Kalo da salah ya mohon dimaklumi, karena q juga baru dalam tahap pembelajaran..
^_^

CARA MEMBUAT PRRGRAM PENGURUTAN
1. Buka apilkasi delphimu, setelah itu buat Label dengan nama "Data [1]" sampai "Data [10]".
2. Buat kotak isian dengan memilih komponen edit,(sesuaikan dengan jumlah Labelnya), dan buat lagi, kalo Labelnya ada 10 berarti komponen editnya ada 20.
kayak gini gambarnya:


3. Setelah itu buat tombol dengan nama Input,StrToInt,Pengurutan dan Selesai lalu pada tiap-tiap beri skrip.
Untuk Tombol input skripnya seperti:
procedure TForm1.Button3Click(Sender: TObject);
begin
edit1.text:='';
edit2.text:='';
edit3.text:='';
edit4.text:='';
edit5.text:='';
edit6.text:='';
edit7.text:='';
edit8.text:='';
edit9.text:='';
edit10.text:='';
button2.Enabled:=false;
button4.Enabled:=true;
end;


Untuk Tombol StrToInt skripnya seperti berikut:
{Untuk Mengubah Data String Ke Integer}
procedure TForm1.Button1Click(Sender: TObject);
begin
data[1]:=StrToInt(edit1.text);
data[2]:=StrToInt(edit2.text);
data[3]:=StrToInt(edit3.text);
data[4]:=StrToInt(edit4.text);
data[5]:=StrToInt(edit5.text);
data[6]:=StrToInt(edit6.text);
data[7]:=StrToInt(edit7.text);
data[8]:=StrToInt(edit8.text);
data[9]:=StrToInt(edit9.text);
data[10]:=StrToInt(edit10.text);
{Untuk Mengnonaktifkan Tombol}
button2.Enabled:=true;
end;

Untuk Tombol Pengurutan skripnya:
{Untuk Mengurutkan/Memproses Data}
procedure TForm1.Button2Click(Sender: TObject);
var
i,j,kecil,sementara: integer;
begin
for i:=1 to 9 do
begin
kecil:=i;
for j:=(i+1) to 10 do
begin
if data[j]< data[kecil] then
begin
kecil:=j;
end;
end;
sementara:=data[i];
data[i]:=data[kecil];
data[kecil]:=sementara;
end;
edit11.Text:=IntToStr(data[1]);
edit12.Text:=IntToStr(data[2]);
edit13.Text:=IntToStr(data[3]);
edit14.Text:=IntToStr(data[4]);
edit15.Text:=IntToStr(data[5]);
edit16.Text:=IntToStr(data[6]);
edit17.Text:=IntToStr(data[7]);
edit18.Text:=IntToStr(data[8]);
edit19.Text:=IntToStr(data[8]);
edit20.Text:=IntToStr(data[10]);
{Untuk Menampilkan Jendela}
showmessage('Data Sudah Terurut');
{Untuk Mengaktifkan Tombol}
button4.Enabled:=true;
button3.Enabled:=true;
end;

Skrip untuk Tombol Selesai:
{Untuk Mengakhiri Program}
procedure TForm1.Button4Click(Sender: TObject);
begin
close;
end;
{Untuk Mengnonaktifkan Tombol}
procedure TForm1.FormCreate(Sender: TObject);
begin
button2.Enabled:=false;
button4.Enabled:=false;
button3.Enabled:=false;
end;

Janan lupa untuk isikan skrip ini diantara public dan { Public declarations }:

data:array[1..10] of integer;
end;

Dan Beginilah hasil Akhirnya:


Ya seperti itu tampilannya, kalo pengen memodifikasi supaya tampilannya lebih bagus pada form berikan judul dan warna, pengaturannya ada di jendela object inspector.
kalo g jelas bisa tanya ke q,komen saja dibawah postingan ini.
OK...moga berhasil..
ba...baaaayyyy....
(^_^)/'

read more...