masaguz.com | shared knowledge

Bosan dengan icon program delphi seperti ini ? bisa diganti kok, caranya :

1. Buka delphi, kemudian ke Program -> Options,  maka akan muncul Kotak Dialog “Project Options”, pilih pada tab “Application”, maka akan terlhat seperti ini :

pada kolom tittle isi dengan nama program yang kita buat, misalnya : “Program Penjualan Barang Barang Bekas PT. Anu Merdeka”,

2. kemudian pada kolom ICON, klik tombol Load Icon, setelah itu akan muncul dialog yang digunakan untuk menentukan letak gambar2 ICON berada. Biasanya delphi menyertakan gambar2 icon di direktori : “C:\Program Files\Common Files\Borland Shared\Images\Icons” cari gambar2 yang kita suka.

3. setelah selesai memilih icon, silahkan dijalankan, coba lihat pada baris taskbar, gambar icon dan tittle ptogram akan berubah sesuai dengan apa yang barusan kita buat.

Mengapa selalu menggunakan Tittle Bar kalau ingin memindah form? NGGAK JUGA. kita bisa memanipulasi form didelphi, sehingga jika kita ingin memindah form, tidak harus menggeser Tittle Bar, dengan menggeser bagian tengah form kita juga bisa memindah form.

Langkah – langkahnya :

1. Buat aplikasi baru di delphi (File-> New-> Applications)

2. Kemudian klik dua kali pada form, setelah itu akan muncul halaman untuk mengetikan kode, geser keatas sampai kita menemukan tulisan deklarasi “private” seperti dibawah ini :

———————————————————

type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;

———————————————————

nah, masukkan kode dibawah ini di bawah kata2 private, yang akhirnya nanti jadi seperti ini :

——————————————————-

type
TForm1 = class(TForm)
private
{ Private declarations }
procedure WMNCHitTest( var Msg : TWMNCHitTest );
message wm_NCHitTest; public
{ Public declarations }
end;
————————————————————-

yang dikasih tanda tebal adalah skrip yang baru dimasukkan.

4. kemudian geser kebawah. nanti ada kata2 implementation {$R *.dfm}, kemudian masukkan script2 ini dibawahnya :

procedure TForm1.
WMNCHitTest( var Msg : TWMNCHitTest );
begin
inherited;
{ fool windows by telling it
that it's in our caption area
although it's in our client area }
if( htClient = Msg.Result )then
Msg.Result := htCaption;
end;

5. jalankan program (F9), kemudian klik dan geser pada area tengah form, tidak harus pake tittle bar untuk menggeser form.
kesulitan????
DOWNLOAD Saja Programnya disini, tinggal di extract dan dibuka melalui delphi.

Ingin tau dari mana saja website kita dikunjungi? Gampang. Ada beberapa web yang menyediakan script data pengunjung secara gratis, tinggal kita copy dan paste ke dalam halaman web kita.

Salah satu web yang menyediakan fasilitas gratis tersebut adalah feedjit.com.

Langkah – langkah memasukkan script ‘peta pengunjung’ :

1. masuk ke http://www.feedjit.com

2. kemudian lihat pada kolom “Live Traffic Map”, klik “Add It!”, nah, dibagian tombol “Add It!” akan muncul kotak kecil yang ada script2nya, copy script tersebut.

3. lalu buka dreamweaver, buat halaman baru atau buka halaman yang sudah dibuat.

4. masuk ke “View” -> “Code”

5. lalu paste script yang sudah kita kopi dari feedjit tadi.

6. selesai. silahkan di preview (F12), hasilnya akan tampak seperti ini :

Dibawah ini kita berikan contoh program yang digunakan untuk menghitung kata yang ada didalam komponen memo. fungsinya? ya mungkin saja untuk tebak jumlah kata sama temen temen he he ..

1. Download disini

2. extraxt

3. lalu open project1 dari delphi

Browser adalah suatu program yang digunakan untuk melakukan browsing ke dunia maya. banyak sekali beterbaran program – program browser di muka bumi ini seperti internet explorer, mozilla firefox, opera, netscape dan lain lain.

Kurang puas dengan browser – browser yang sudah ada? kita bisa bikin sendiri kok dengan menggunakan bahasa pemrograman yang kita kenal, salah satunya adalah menggunakan program delphi.

ikuti petunjuknya ya :

1. buat aplikasi baru (file -> new application)

2. masukkan komponen komponen ke dalam form.

a. komponen edit,

b. komponen button

c. dan komponen “webbrowser” yang bisa diambil dari pallete “internet”.

3. kemudian klik 2x pada button1, kemudian masukkan perintah ini :

webbrowser1.navigate(edit1.text);

4. jalankan program (tekan run atau tekan f9)

5. isi edit1 dengan nama website yang akan dikunjungi (ex : blog.masaguz.com ) lalu tekan button1, tunggu hingga beberapa saat akan muncul web yang dimaksud.

6. selesai. kembangkan sesuai keinginan

Download Source Code Program Delphi Web Browser Disini.

Logo status Ym! disini maksudnya untuk menunjukkan, apakah yang punya account Ym! ni lagi aktif apa ndak…

langkah-langkahnya spt ini :

1. buka dreamweaver, kemudian buat file baru, atau buka dari halaman web yang sudah dibuat.

2. klik pada area penempatan status Ym nanti.

3. klik menu VIEW-> CODE

4. kemudian masukkan kode – kode dibawah ini :

<a href=”http://edit.yahoo.com/config/send_webmesg?.target=niktosystem&.src=pg”>
<img border=”0″ src=”http://opi.yahoo.com/online?u=niktosystem&m=g&t=2&l=us”></a>

sebelum dimasukkan ke halaman web, ganti dulu kata kata “niktosystem” dengan nama account yahoo-mu

5. simpan file, kemudian jalankan (preview)

http://masaguz.niktosystem.com