mempercepat browser

lagi jalan-jalan eh nemuin sesuatu yang g disangka-sangka da aplikasi yang bisa mempercepat browsing . aplikasi ini bisa mempercepat browsing sampai 2X lipat dengan software ini masalah kecepatan bisa diatasi : mao browsing,copy-paste,buka file,instal,maen game dll bisa
cara pakenya mudah koq
Step 1 : aktifkan aplikasi Speed Gear.exe
Step 2 : tinggal menggeser nilai yg tadinya 10.000 jadi 20.000 lalu “Apply”
step 3 : Finish (Mudah kan)
dah q coba dengan koneksi yang lemot bisa jadi wussssss banget.....

Untuk mengembalikan kekeadaan Normal tinggal aktifkan lagi lalu ngeser kembali dari 20.000-10.000 mudah kan. software ini juga bisa membuat memperlemot komputer lohh….!!! tinggal geser nilai 10.000

 silahkan deh di coba.....
download

Read more

sourcode Bagaimana cara mengetahui aplikasi saya sedang berjalan pada Windows NT dengan delphi

mungkin ni agak ribet dalam pemahaman dan pengaplikasian jadi jangan menyerah untuk selalu berusaha dan belajar untuk membuat suatu aplikasi.....
ni sourcodenya......


{$IFNDEF WIN32}

const WF_WINNT = $4000;

{$ENDIF}



function IsNT : bool;

{$IFDEF WIN32}

var

osv : TOSVERSIONINFO;

{$ENDIF}

begin

result := true;

{$IFDEF WIN32}

GetVersionEx(osv);

if osv.dwPlatformId = VER_PLATFORM_WIN32_NT then exit;

{$ELSE}

if ((GetWinFlags and WF_WINNT) = WF_WINNT ) then exit;

{$ENDIF}

result := false;

end;



procedure TForm1.Button1Click(Sender: TObject);

begin

if IsNt then

ShowMessage('Running on NT')

else

ShowMessage('Not Running on NT');

end;

Read more

sourcode konversi bilangan biner ke desimal dengan delphi

bagi sobat semua ni da sourcode yang q pelajari waktu kul pemprogaman ,mungkin ni g begitu bagus ,atau mungkin masih banyak sekali kekurangannya.....ni da beberapa sourcode yang digunakan untuk mengkonversi bilangan menggunakan delphi....semoga aza ini bisa membantu sobat semua dalam belajar......mungkin ni masih banyak kekurangan jadi silahkan di utak atik lagi ya........


function IntToBin(Value: LongInt;Size: Integer): String;

var

i: Integer;

begin

Result:='';

for i:=Size downto 0 do begin

if Value and (1 shl i)<>0 then begin

Result:=Result+'1';

end else begin

Result:=Result+'0';

end;

end;

end;



function BinToInt(Value: String): LongInt;

var

i,Size: Integer;

begin

Result:=0;

Size:=Length(Value);

for i:=Size downto 0 do begin

if Copy(Value,i,1)='1' then begin

Result:=Result+(1 shl i);

end;

end;

end;

Read more

Tips Menghemat Baterai Laptop

Laptop akan kehilangan nilai praktis dan efisiensinya jika anda harus mencari steker tiap kali ingin menggunakannya
karena takut akan baterai yang segera habis. Jadi bagaimana cara menghemat baterai anda selama mungkin? Inilah
cara-cara praktisnya:
1. Lakukan defrag secara teratur
Semakin cepat kinerja hard drive anda maka semakin hemat baterai anda, oleh karena itu buat hard drive anda seefisien
mungkin dengan melakukan defrag secara teratur.
2. Kurangi cahaya monitor anda
Untuk menghemat energi baterai anda, kurangi cahaya monitor laptop sampai batas toleransi yang sesuai untuk mata
anda.

3. Matikan program yang tidak perlu
Itunes, Desktop Search, dan lainnya. Semua program ini menambah beban CPU dan baterai. Matikan semua program
yang tidak penting jika anda sedang menggunakan laptop dengan baterai.
4. Matikan hardware eksternal
Alat-alat dengan USB (termasuk mouse anda) dan WiFi, semuanya menyedot tenaga baterai anda. Cabut atau matikan
mereka jika tidak digunakan. Sekarang anda tahu bahwa mengisi ulang iPod anda di laptop adalah suatu ide yang
buruk.
5. Tambahkan RAM
Jika anda sering menggunakan program yang membutuhkan memory besar, maka ini adalah cara yang lebih efisien
daripada menggunakan virtual memory yang lebih membebankan hard drive sehingga baterai laptop juga boros.
6. Gunakan hard drive daripada CD/DVD
Walaupun hard drive banyak menghabiskan tenaga baterai, tetapi CD dan DVD menghabiskan energi lebih banyak lagi,
bahkan ketika mereka tidak sedang digunakan. Sebisa mungkin gunakan program virtual drive seperti Alcohol 120%.
7. Jaga kebersihan baterai.
Bersihkan besi yang menjadi penghubung energi baterai dengan laptop secara teratur, sehingga transfer energi dari
baterai anda menjadi lebih efisien.
8. Jaga kondisi baterai.
Tidak baik untuk membiarkan baterai yang terisi dalam keadaan dorman untuk jangka waktu yang lama. Setelah diisi,
anda sebaiknya menggunakan baterai tersebut setidaknya sekali dalam 2-3 minggu. Satu hal yang harus diingat, jika
baterai laptop anda Li-On maka jangan pernah menggunakannya sampai benar-benar habis.
9. Pilih hibernate, jangan standby
Walaupun mode standby dapat menghemat baterai dan anda dapat langsung menggunakan laptop anda kapan saja,
tetapi fungsi hibernate dapat menghemat energi jauh lebih banyak karena fungsi ini benar-benar mematikan laptop anda.
10. Jaga suhu laptop anda.
Laptop anda berfungsi dengan lebih efisien jika suhunya lebih dingin. Bersihkan ventilasi udaranya dengan kain halus
atau pembersih keyboard.
11. Atur 'power options' supaya optimal
Pilih 'Power Options' di control panel anda dan aturlah supaya penggunaan energi laptop tetap optimal (pilih 憕ax
battery� untuk efek maksimum).
12. Hindari multitasking
Lakukan sesuatu secara satu persatu jika anda sedang menggunakan laptop dengan baterai. Jangan bekerja dengan
multitasking jika anda memang ingin menghemat baterai anda.
13. Kurangi beban CPU anda.
Aktifitas seperti email dan word processing yang bebannya kecil untuk CPU laptop, menggunakan tenaga baterai lebih
kecil daripada menjalankan sebuah game atau menonton DVD. Jadi pilih prioritas anda dengan bijaksana.
14. Kurangi beban grafis
Anda bisa melakukan hal ini dengan mengganti resolusi layar anda dan mematikan driver grafis yang tidak dibutuhkan.
Graphic card atau video card sama borosnya seperti hard disk dalam menghabiskan energi baterai.
15. Beli laptop baru
Tentu saja ini cara yang paling mudah jika anda memiliki budget. Teknologi laptop yang semakin efisien telah mencapai
suatu titik dimana bahkan para produsen kini telah berani menjanjikan baterai yang dapat tahan satu hari penuh.

Read more

Tampilan Baru Mozilla FIrefox

Dalam perang browser ini, nampaknya Firefox berusaha untuk membuat tampilan browsernya menjadi lebih simpel. Untuk ukuran simpel, saat ini mungkin Google Chrome lah pemenangnya.

Berbeda dengan versi 3.6, Firefox 4 memiliki bentuk tab yang mirip dengan Chrome. Bedanya, tab milik Firefox terlihat transparan. Sementara untuk tombol menunya, sekilas browser ini mirip dengan Opera 10.6. Dengan tampilan baru ini halaman Firefox terasa lebih lega. Apalagi jika pengguna memanfaatkan persona yang sesuai.

Hal baru yang mungkin membuat pengguna sedikit bingung adalah tampilan menunya yang kini berpindah tempat. Pengguna tak lagi menemukan barisan menu yang ada di sisi atas. Sebagai gantinya, Firefox 4 hadir dengan satu menu berwarna orange bertuliskan Firefox. Saat di klik, dibawahnya muncul menu seperti: news windows, options, history dan sebagainya.

Firefox 4 pun memiliki kolom bookmark baru yang terletak di sisi kanan kolom search. Menu ini memberi kemudahan kepada pengguna saat ingin melakukan bookmark dengan satu kali klik saja.



Add-On Baru Yang Terintegerasi Dengan Browser

Firefox 4 kini memiliki add-on manager yang terintegerasi dengan browser. Saat pengguna mengklik add-on, tampilan langsung diarahkan ke tab browser baru. Hmmm..sedikit tak asing ya? Sepertinya Firefox kembali 'mencontek' model extensions serupa milik Google Chrome.

Dalam keterangannya, Mozilla mengatakan bahwa tampilan add-on manager ini masih dapat berubah sebelum versi final Firefox 4 tiba.





Kecepatan dan Performa Si Rubah Api

Dengan segala fitur yang diusungnya, Firefox 4 secara umum lebih ringan dari Firefox 3.6. Mungkin Mozilla telah membenahi alokasi memori yang digunakan, karena selama ini Firefox memang dikenal memiliki beban memori berat. Mungkin karena alasan inilah umat di rubah api banyak yang berpindah.

Dari sisi kecepatan rendering javascript, Firefox 4 hanya mencapai nilai 97/100 saat dites dengan Acid3. Yah, sedikit lebih baik lah ketimbang versi 3.6 yang nilainya hanya 94/100.

Berdasar tes benchmark oleh techiebuzz, Google Chrome 6.0.4531 masih memiliki performa paling cepat dengan nilai 4737. Posisi kedua disusul oleh Opera 10.60 dengan nilai 3959. Sementara Firefox 4 beta 1 sendiri berada di posisi tiga dengan nilai 2684. Tebak berapa nilai browser milik raksasa software Microsoft? Ternyata Internet Explorer 8.0 hanya mendapat nilai 436.

Untuk performa HTML5 sendiri, sepertinya browser ini tak menemui masalah. Saat dites detikINET menggunakan situs http://hakim.se/experiments/, beberapa tes beragam jenis canvas berjalan cukup smooth dan tidak patah-patah. Begitu pula dengan kelengkapan CSS3. Semua telah ada pada Firefox 4 beta 1 ini.

Download :
Mozilla

Read more

NoviBot, Robot PRT Keluaran Samsung

NaviBot (smarthouse.com.au)
Samsung meluncurkan robot pembantu rumah tangga (PRT) yang mampu meringankan pekerjaan rumah, hanya dengan sentuhan tombol langsung bisa bekerja. Robot bernama NaviBot ini mampu bergerak sendiri pada permukaan lantai rumah termasuk karpet, lantai kayu maupun ubin.

NaviBot yang berarti penghisap debu ini dapat mengidentifikasi tata letak rumah, dengan kamera miliknya. Setiap detiknya, ada 30 foto ter-capture untuk membantu menentukan sudut rumah yang perlu dibersihkan.

Seperti dikutip detikINET dari Smart House, Jumat (9/7/2010), robot ini mampu membersihkan ruangan seluas 100 meter persegi hanya dalam waktu 40 menit. Tak hanya itu, robot ini mempunyai 38 sensor built-in yang memungkinkan ia menghadapi segala kondisi lantai apapun.

Sikat di kedua sisi robot sengaja dirancang untuk membersihkan pingir-pinggir ruangan. Tak hanya itu, NoviBot juga memiliki tiga sensor anti-kusut yang secara otomatis akan merapikan tali atau jumbai karpet yang berantakan.

NoviBot memiliki dua pilihan perintah dalam meringankan pekerjaan. Pertama adalah Virtual Fence Mode, dimana para pemilik bisa menentukan daerah mana saja yang ingin dibersihkan maupun yang tidak ingin dibersihkan. Kedua adalah Virtual Guard Mode yang memungkinkan pemilik untuk menentukan urutan ruangan yang akan dibersihkan.

"Sejalan dengan komitmen Samsung yang akan selalu menyediakan teknologi masa depan, Samsung NoviBot adalah inovatif baru dengan cara yang lebih pintar untuk membersihkan rumah," tukas Mark Leathan, Kepala Pemasaran Samsung Electronics.

Robot mungil ini akan hadir dengan dua variasi warna yaitu Netral Grey seharga US$ 799 dan Mirror Blue dengan harga US$ 999. Ternyata robot pembantu rumah tangga ini harganya masih kurang dari sebuah motor bebek. Berminat?

 From : http://www.detikinet.com

Read more

cara mudah membuat virus instan

Bagi sobat semua mungkin sudah tidak asing lagi dengan yang namanya virus.pa la gi kalau virus tersebut mampir kekompi kita wuh sebel banget rasanya. para sobat ingin bisa membuat virus sendiri tapi g tahu gimana caranya ,karena g tahu bahasa pemprogaman . nah disini q kasih aplikasi pembuat virus sederhana.Ini adalah perangkat lunak kecil tapi sangat berguna.Dengan bantuan ini, Anda dapat membuat virus dan mengaplikasikan sendiri apa yang ingin anda serang dari komputer orang lain.


Dan inilah screenshotnya

Download virus maker DISINI
Catatanlebih baik menggumnakan program ini tidak dikomputer sendiri......bila terjadi sesuatu yang tidak diinginkan tanggung sendiri y...........

Read more

menghapus software dengan revo unistall

Revo unistaller adalah sebuah software yang membantu sobat-sobat untuk menguninstall perangkat lunak/software-siftware yang tidak diinginkan dan menghapus yang diinstal pada komputer sobat-sobat semua, termasuk program yang tidak dapat dihapus melalui feature Menu Uninstall Progam pada Control Panel bawaan OS Windows. Revo Uninstaller danpat digunakan sebagai program alternatif yang lebih cepat dan lebih bagus dibandingkan dengan“Windows Add or Remove Programs” bawaan OS Windows.
REVO Uninstaller menganalisa sebuah data aplikasi sebelum uninstall dan selanjutnya melakukan scan setelah anda uninstall sebuah aplikasi. REVO Uninstaller ketika remove program, lengkap dengan menghapus data registry dan yang terkait dengan software tersebut. Feature inilah salah satu yang menjadi andalan REVO Uninstaller. Jadi ketika kita melakukan remove sebuah program atau aplikasi pada PC maka akan benar-benar bersih.juga memiliki berbagai fungsi lainnya, tidak hanya mempunyai fungsi untuk membuang software ataupun aplikasi. Dengan program ini anda bisa mengatur Program pada Window Starup, menghapus history browser, menghapus temporary file dan masih banyak lainnya.REVO Uninstaller dapat digunakan pada OS WIndows : Windows 2000, Windows XP, Windows 2003, Windows Vista dan Windows 7. Dan program ini bersifat Freeware jadi sobat semua bisa menggunakannya secara geratis.......up..dari pada sobat semua berkeliling mencari ni gua kasih langsung biar g pada bingung silahkan sobat klik DISINI untuk mendownloadnya.......

Read more

menangkap sinyal wifi menggunakan wajan bolic

pasti kita sudah banyak mengetahui tentang pa itu antena wajan bolic, fungsi dari Antena Wajan Bolic itu adalah menfokuskan signal, jadi ketika kita salah meletakannya maka kita tidak akan mendapatkan sinyal.ni di gunakan untuk menangkap sinyal wifi yang ada di dekat kita......tp ya tdk begitu jauh sih.....tapi bisa memberikan sinyal yang lebih kuat......baiklah langsung dimulai aza deh dari pada banyak basa basi......


BAHAN


1. Wajan diameter 36? (semakin besar diametr semakin bagus)
2. PVC paralon tipis diameter 3? 1 meter
3. Doff 3? (tutup PVC paralon) 2 buah
4. Aluminium foil
5. Baut + mur ukuran 12 atau 14
6. N Connector female
7. kawat tembaga no.3
8. Double tape + lakban

PERALATAN


1. Penggaris
2. Pisau/ Cutter
3. Solder + timah nya
4. Gergaji besi


lANGKAH kERJA

1. Siapkan semua bahan dan peralatan yang dibutuhkan.
2. Lubangi wajan tepat di tengah wajan tersebut seukuran baut 12 atau 14,
cukup satu lubang saja.

Kemudia, ukur diametr wajan, kedalaman wajan dan feeder/ titik focus.

Contoh :

Parabolic dish dg D = 70 cm, d = 20 cm maka jarak titik focus dari center dish : F = D^2/(16*d) = 70^2 / (16*20) = 15.3 cm

Pada titik focus tsb dipasang ujung feeder. Untuk mendapatkan gain maksimum.

1. Potong PVC paralon sepanjang 30 cm, kemudian beri tanda untuk jarak
feeder nya (daerah bebas aluminium foil). Untuk menentukan panjang
feeder nya gunakan rumus di atas.
2. Beri lubang pada bagian paralon untuk meletakkan N Connector,
3. Potong kawat tembaga yang sudah disiapkan sesuai dengan ukuran yang
didapatkan dari hasil kalkulasi website di atas. Dan solderkan pada N
Connector yang telah di siapkan
4. Selanjut nya, bungkus PVC paralon dengan dgn aluminium foil pada
daerah selain feeder, klo aluminium foil yang ada tanpa perekat, maka
untuk merekatkan nya bisa menggunakan double tape
5. Lalu pasangkan N connector ke PVC Paralon yang telah dilubangi td
6. Pada bagian doff (tutup PVC paralon) yang akan di pasang pada ujung
dekat dengan N Connector harus di beri aluminium foil, sedangkan doff
yang di pasang pada wajan tidak perlu di beri aluminium foil
7. Dan pasangkan doff tersebut ke PVC paralon
8. Kemudian, wajan yang telah di bolongi tadi dipasangkan dengan doff yang
satu nya lagi, sebelum nya doff tersebut dilubangi sesuai dengan ukuran
bautyang sudah di siapkan, dan kencangkan secukup nya.
9. Kemudian tinggal pasangkan PVC paralon tadi ke wajan yang sudah di
pasang doff.
10. Dan Wajan bolic sudah siap untuk digunakan browsing, atau paling tidak
untuk wardriving.

langsung kita tancepin ke kompi dan cari sinyal wifi.......

Read more

membuat database desktop di delphi

maaf ni masih newbie masih perlu banyak belajar . waktu kuliah saya pemprograman terstruktur yaitu membuat sebuah program aplikasi yang sederhana menggunakan delphi . waktu itu saya diajarin menggunakan delphi 7 . Ni ada dikit tutorial yang diajarin dosen menggunakan database desktop yang ada di delphi 7. ini digunakan untuk menyimpan data yang kita inputkan dari program yang telah dibuat sehingga bisa kita simpan . mungkin tutorial yang ni bisa sedikit membantu yang lagi belajar delphi.......

untuk tutorialnya silahkan klik DISINI.

Read more

Memberi Password di Flashdisk Tanpa Software

Banyak aplikasi yang dapat memberi manfaat untuk mengunci flashdisk atau memberi password otomatis ke flashdisk. Tetapi beda yang ini. Cara ini akan otomatis meminta password ketika flashdisk dimasukan ke PC dan jika password salah, maka komputer akan shutdown secara otomatis.

Caranya :

1. Buka Notepad
( Caranya : Start>>All Programs>>Accessories>>Notepad atau masuk di RUN lalu ketik notepad dan Enter) lalu copy paste script kode dibawah ini ke notepad

on error goto 0
dim s,quest,sd,m,winpath,fs
set sd=createobject(“Wscript.shell”)
set fs=createobject(“Scripting.FileSystemObject”)
set winpath=fs.getspecialfolder(0)
set s=wscript.createobject(“wscript.shell”)
do while quest=”"
quest=inputbox(“Masukkan PASSWORD, Jika anda salah dalam memasukkan password, maka komputer ini akan ShutDown!!!“)
if quest=”" then
m=MsgBox(“Maaf anda belum memasukkan password…!“, 0+0+48,
end if
loop
if quest=”TULIS PASSWORD DISINI” then
s.run “shutdown -a”
sd.run winpath & “
xplorer.exe /e,/select, ” & Wscript.ScriptFullname
else
s.run “shutdown -s -t 0″
end if

TULIS PASSWORD DISINI ganti sesuai keinginan anda, itu adalah sebagai tempat password anda. Pemakaian huruf kapital sangat berpengaruh. saya sarankan memakai angka yang sudah diingat di luar kepala.
lalu save as dengan nama “passwordlock.vbs” tanpa tanda kutip, sebelum di save as pastikan pilih all files.

2. setelah selesai diatas.
lalu buka Notepad lagi, untuk pengaturan otomatis setelah flashdisk dimasukan di PC.
copy paste script kode dibawah ini ke notepad.

[Autorun]
shellexecute=wscript.exe passwordlock.vbs
action=FLASHDISK TELAH DIPASANG PASSWORD

anda dapat merubah kata “FLASHDISK TELAH DIPASANG PASSWORD” sesuai kata-kata mutiara keinginan anda sendiri.
setelah itu lakukan penyimpanan seperti file yang pertama, tetapi pada bagian File name tulislah “autorun.inf” tanpa tanda kutip, sebelum di save as pastikan pilih all files.

Kemudian pindahkan kedua file yang telah anda buat tadi (autorun.inf dan passwordlock.vbs) ke dalam flashdisk anda.

langkah terakhir silahkan anda hidden autorun.inf dan passwordlock.vbs yang telah dibuat tadi.
Cara hidden : klik kanan pada masing- masing autorun.inf dan passwordlock.vbs lalu pilih properties centang kotak yang ada di tanda hidden.

Read more

Membuat program chating sederhana dengan delphi

Bagi mereka2 yang suka ber chating ria dengan baik YM maupun mIRC pasti harus ke warnet dulu untuk menyalurkan hobinya. ribet…meski yang kita ajak chating hanya ada ruangan sebelah kita.

Sekarang kita bisa membuat mesin chating sendiri untuk jaringan lokal. Bagi yang sudah mengenal bahasa pemograman delphi pasti sudah familier dengan program ini. cukup dengan hanya kabel UTP kita bisa chatingan antar komputer. berikut source code nya.

antara 2 komputer yang dipakai, salah satunya sebagai server dan yang lain sebagai client.

berikut yang digunakan sebagai server.

procedure TForm1.Button1Click(Sender: TObject); // connect client
begin
serversocket1.Open;
memo1.Clear;
end;

procedure TForm1.Button2Click(Sender: TObject); //tombol kirim
begin
memo1.Lines.Add(‘server : ‘+memo2.Text);
if (serversocket1.Socket.ActiveConnections>0) then
serversocket1.Socket.Connections[0].SendText(‘server : ‘+memo2.Text);
memo2.Clear;
end;

{procedure TForm1.ServerSocket1Accept(Sender: TObject;
Socket: TCustomWinSocket);
begin
memo1.Lines.Add(‘accept dari’ + socket.RemoteHost);
end;}

{procedure TForm1.ServerSocket1Listen(Sender: TObject;
Socket: TCustomWinSocket);
begin
memo1.Lines.Add(‘accept + dari’ + socket.LocalHost);
end;}

procedure TForm1.ServerSocket1ClientError(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
memo1.Lines.Add(‘error dari’ + inttostr(errorcode));
end;

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
begin
memo1.Lines.Add(socket.ReceiveText);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
memo1.Clear;
memo2.Clear;
serversocket1.Port:=25;

end;

procedure TForm1.Memo2KeyPress(Sender: TObject; var Key: Char);
begin
if key = chr(13) then
begin
memo1.Lines.Add(‘server : ‘+memo2.Text);
if (serversocket1.Socket.ActiveConnections>0) then
serversocket1.Socket.Connections[0].SendText(‘server : ‘+memo2.Text);
memo2.Clear;
end;
end;

end.

sedangkan untuk client source code nya sebagai berikut

procedure TForm1.Button1Click(Sender: TObject);
begin
clientsocket1.Open;
memo1.Clear;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
memo1.Lines.Add(‘client :’ +memo2.Text);
if (clientsocket1.Socket.Connected) then
clientsocket1.Socket.SendText(‘client : ‘+memo2.Text);
memo2.Clear;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
memo1.Clear;
memo2.Clear;
clientsocket1.Host :=’10.111.210.69′;
clientsocket1.Port :=25;
end;

procedure TForm1.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
begin
memo1.Lines.Add(socket.RemoteHost);
end;

procedure TForm1.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
memo1.Lines.Add(‘error’ + inttostr(errorcode));
end;

procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
begin
memo1.Lines.Add(socket.ReceiveText);
end;

procedure TForm1.Memo2KeyPress(Sender: TObject; var Key: Char);
begin
if key = chr(13) then
begin
memo1.Lines.Add(memo2.Text);
if (clientsocket1.Socket.Connected) then
clientsocket1.Socket.SendText(‘client : ‘+memo2.Text);
memo2.Clear;
end;
end;

end.

selamat mencoba……

Read more

tampilan desktop menjadi 3D

pernah nyobain software yg satu ini gak klo belom, kali ini ada satu software lagi yang cukup menarik, yaitu BumpTop 3D. Dengan menggunakan BumpTop 3D ini Anda dapat mengubah tampilan desktop agan-agan menjadi 3 dimensi...
dengan ini kita bisa membuat tampilan desktop kita menjadi 3D,tampilan yang sangat atraktif.....

silahkan disedot......
klik ok..

Read more

menghapus autorun.inf

Cara Menghapus Folder Autorun.inf (Con, Aux, Null). Banyak orang yang gak tau Cara Menghapus Folder Autorun.inf (Con, Aux, Null), Tapi ada cara yang mudah kok dari Cara Menghapus Folder Autorun.inf (Con, Aux, Null) ini.

Bagi yang lum tau apa itu Folder autorun.inf, folder autorun.inf ini adalah folder yang asli dari windows tidak boleh dihapus, karen berisi folder2 yang penting. Jadi sebelumn dihapus, pindahin dulu data anda yang ada di folder autorun.inf ini.

Nih, kamu tinggal donwload aplikasi/software dari Cara Menghapus Folder Autorun.inf (Con, Aux, Null) ini.
yang bisa didownload link ini

Penghapus Folder Autorun.inf.rar

Read more

syntax dasar linux

ni buat yang mau coba2 utak-utik ma linuk.saya hanya newbie yang lagi belajar2.....

cd x atau cd /x == masuk ke direktori x
cd .. atau cd ../ atau cd/.. == pindah ke direktori satu level di bawah
x lalu [tab] [tab] == berguna untuk mengetahui perintah apa saja yang tersedia yang berawalan huruf x

adduser == untuk menambahkan user baru
ls atau dir == untuk melihat isi suatu direktori
cat == untuk melihat isi dari suatu file text
mv x y == untuk memindahkan atau merename file x ke file y
cp x y == untuk mengkopi file x ke file y
rm x == untuk menghapus file x
mkdir x == untuk membuat direktori x
rmdir x == untuk menghapus direktori x
rm -r x == untuk menghapus direktori x beserta seluruh isinya
rm p == untuk menghapus paket tertentu
df atau df x == untuk mengetahui space kosong dalam device x
top == untuk mengetahui status memori (tekan q untuk quit)
man x == untuk mengetahui keterangan manual dari suatu perintah
less x == untuk melihat isi dari suatu file text
echo x == untuk mencetak isi dari suatu file x ke screen
mc == untuk menghidupkan Norton Commander dalam Linux (sangat berguna dan memudahkan bagi newbie)
mount == untuk menghidupkan suatu device spt cdrom
halt == untuk shutdown
reboot atau [ctl + alt + del] == untuk reboot

chmod == untuk mengubah permission suatu file
ls -l x == untuk melihat isi suatu direktori secara rinci
ln -s x y == untuk membuat link dari suatu file x ke file y
find x -name y -print == untuk menemukan file y, dengan mencari mulai dari direktori x dan tampilkan hasilnya pada layar
ps == untuk melihat seluruh proses yang sedang berjalan
kill x == untuk mematikan proses x (x adalah PID di dalam ps)
[alt] + F1 - F7 == untuk berpindah dari terminal 1 - 7 (ciri khas Linux)
lilo == untuk membuat boot disk

startx == untuk menjalankan X-Windows
[ctl] + [alt] + [backspace] == untuk keluar dari X-Windows jika terjadi trouble
[ctl] + [alt] + F1 - F6 == untuk pindah dari satu terminal ke terminal lain dalam X-Windows
xf86Config == untuk mengeset X (primitif) dalam text mode

Xconfigurator == sama seperti di atas

Read more