Archive for August, 2007

Change the system time

August 28, 2007

{
The input strings for date and time depends on the format you are using.
}

procedure TForm1.Button1Click(Sender: TObject);
var
SystemTime: TSystemTime;
NewTime, NewDate: string;
begin
NewTime := ’12:00:00′;
NewDate := ‘01.01.2006’;
DateTimeToSystemTime(StrToDate(NewDate) + StrToTime(NewTime), SystemTime);
SetLocalTime(SystemTime);
// Tell windows, that the Time changed!
PostMessage(HWND_BROADCAST, WM_TIMECHANGE, 0, 0); // *
end;

Advertisements

Implement the Pascal Delay-function

August 28, 2007

procedure Delay(dwMilliseconds: Longint);
var
iStart, iStop: DWORD;
begin
iStart := GetTickCount;
repeat
iStop := GetTickCount;
Application.ProcessMessages;
until (iStop – iStart) >= dwMilliseconds;
end;

Swap the mouse buttons

August 28, 2007

procedure SwapMouseButtons(bValue: Boolean);
begin
if bValue then
SystemParametersInfo(SPI_SETMOUSEBUTTONSWAP, 1, nil, 0)
else
SystemParametersInfo(SPI_SETMOUSEBUTTONSWAP, 0, nil, 0);
end;

Detect a keypress during a loop

August 28, 2007

procedure TForm1.Button1Click(Sender: TObject);
var
LoopAborted: Boolean;
i: Integer;
begin
LoopAborted := False;
i := 0;
repeat
Caption := IntToStr(i);
Application.ProcessMessages;
if GetKeyState(VK_Escape) and 128 = 128 then
begin
LoopAborted := True;
Break;
end;
Inc(i);
until i = 100000;
if LoopAborted then
ShowMessage(‘User has aborted the loop!’);
end;

Gara-Gara Internet Explorer, Firefox Kena Getah

August 24, 2007

Jakarta, Sebuah cacat muncul di browser Firefox 2.0.0.4. Aplikasi Internet Explorer diduga menjadi penyebabnya.

Pakar keamanan komputer mengungkapkan bahwa versi terakhir dari Mozilla Firefox 2.0.0.4 mempunyai cacat yang bisa menimbulkan resiko keamanan. Cacat ini bisa menjadi celah bagi para hacker jahat untuk mengambil alih kendali komputer korban.

Diduga, cacat ini muncul ketika pengguna juga memiliki Internet Explorer terpasang pada komputer yang sama. Perusahaan keamanan komputer Secunia menyebut gangguan ini sebagai highly critical.

Di sisi lain, pihak Mozilla sedang menjalankan perbaikannya. “Kami memperhatikan situasi ini dan sedang memperbaikinya. Mozilla berkomitmen untuk memberikan keamanan maksimal bagi penggunanya.” sebut Window Snyder, chief security officer Mozilla.

Cacat ini muncul dari uniform resource identifier (URI) (alamat yang menunjuk ke sebuah resource di internet) dengan format “firefoxurl://” di Jakarta, Sebuah cacat muncul di browser Firefox 2.0.0.4. Aplikasi Internet Explorer diduga menjadi penyebabnya.

Pakar keamanan komputer mengungkapkan bahwa versi terakhir dari Mozilla Firefox 2.0.0.4 mempunyai cacat yang bisa menimbulkan resiko keamanan. Cacat ini bisa menjadi celah bagi para hacker jahat untuk mengambil alih kendali komputer korban.

Diduga, cacat ini muncul ketika pengguna juga memiliki Internet Explorer terpasang pada komputer yang sama. Perusahaan keamanan komputer Secunia menyebut gangguan ini sebagai highly critical.

Di sisi lain, pihak Mozilla sedang menjalankan perbaikannya. “Kami memperhatikan situasi ini dan sedang memperbaikinya. Mozilla berkomitmen untuk memberikan keamanan maksimal bagi penggunanya.” sebut Window Snyder, chief security officer Mozilla.

Cacat ini muncul dari uniform resource identifier (URI) (alamat yang menunjuk ke sebuah resource di internet) dengan format “firefoxurl://” di Mozilla. URI tersebut bisa digunakan untuk mengeksekusi kode jahat yang beresiko bagi penggunanya.

Billy rios, Nate Mcfeters dan Raghav Dube, pakar keamanan komputer menandaskan bahwa ketika Firefox 2.0 terinstall di komputer, aplikasi ini mendaftarkan URI “firefoxurl” di Windows Registry.

“Dengan menggunakan firefox URI, ada kemungkinan Internet Explorer ataupun browser berbasis windows lainnya bisa memunculkan Firefox dan juga langsung mengeksekusi kode JavaScript,” kata mereka seperti dikutip detikINET dari InternetNews, Rabu (11/7/2007).

Peneliti keamanan independen Thorn Larlholm mengungkapkan bahwa cacat ini hakikatnya adalah masalah Internet Explorer (IE). Pasalnya IE tidak ‘menetralkan’ tanda kutip (“) saat mengakses command line.

Thorn mengatakan Firefox bisa menghindari masalah ini dengan tidak memasang URI ‘firefoxurl’ di registry. “Namun IE juga harus bisa memunculkan aplikasi eksternal dengan aman,” sebutnya. sumber : detikinet