Cara Membuat Tombol Shutdown dan Restart Windows Dengan Delphi 7

Tags

Tahukah anda kalau pemograman delphi juga bisa membuat program untuk mengendalikan fitur-fitur windows? salah satunya adalah merestart dan mematikan komputer windows dengan program delphi, pada kesempatan kali ini saya akan berbagi Cara Membuat Tombol Shutdown dan Restart Windows Dengan Delphi 7, walau sifatnya hanya pembelajaran tapi boleh anda coba membuatnya sendiri untuk menambah wawasan anda tentang bahasa pemograman delphi 7.

Berikut adalah Cara Membuat Tombol Shutdown dan Restart Windows Dengan Delphi 7


Cara Membuat Tombol Shutdown dan Restart Windows Dengan Delphi 7

Komponen yang diperlukan adalah:

2 buah button

Baik langsung saja kita praktekan cara pembuatanya, pertama buka program delphi 7 anda lalau masukan dua buah button, button1 kita beri label Restart dan button2 kita beri label, agar lebih jelas silahkan perhatikan gambar di bawah ini

Cara Membuat Tombol Shutdown dan Restart Windows Dengan Delphi 7

Sekarang kita masuk ketahap pengcodingan

1. Dobel klik pada button1 atau button yang kita beri Label Restart lalu masukan coding berikut

procedure TForm1.Button1Click(Sender: TObject);
begin
sleep (2000);
winexec('Shutdown -r -t 0 -f',sw_normal);
end;

2. Lalu dobel klik pada Button2 atau yang kita beri Label Shutdown lalu masukan coding berikut

procedure TForm1.Button2Click(Sender: TObject);
begin
sleep (2000);
winexec('Shutdown -s -t 0 -f',sw_normal);
end;

Coding diatas saya beri sleep (2000) maksudnya untuk memberi delay ketika kita klik tombol button selama 2 detik, sekarang silahkan tekan F9 untuk mencoba hasilnya.

Itulah Cara Membuat Tombol Shutdown dan Restart Windows Dengan Delphi 7 semoga bermanfaat.

Silahkan berkomentar dengan sopan dan tidak meninggalkan link aktip.

Terima Kasih.

EmoticonEmoticon