Aku punya sebuah trik unik, yaitu menjalankan tombol Windows dengan menggunakan bahasa pemrograman Delphi. Tombol Windows akan berjalan secara bolak - balik dari kiri hingga ke ujung kanan layar dan dari ujung kanan ke ujung kiri layar. Penasaran pengen tau caranya ???

Oke - oke, gini nih caranya. Klik Tab Additional, pilih komponen Timer kemudian letakkan pada Form. Klik dua kali pada komponen Timer, kemudian ketikkan Script berikut :

var
Kiri : Boolean

implementation

procedure TForm1.Timer1Timer(Sender: TObject);
var
x : Integer;
begin
if x <= 0 then Kiri := False; if x >= 920 then Kiri := True;
if Kiri = False then x := x + 1 else x := x - 1;
MoveWindow(GetWindow(FindWindow('shell_traywnd',nil),5),x,0,100,30,True);
end;

end.

Kalo udah selesai ngetik Scriptnya, jalankan program kamu dan liat hasilnya. Gimana ???
Tombol Windowsnya jalan - jalan kan ?