Asmaul Husna

Asmaul Husna

Pesan

Kebahagian itu karena adanya cinta,maka jika tanpa cinta kebahagiaan akan sirna,jika kebahagian sirna akan tampaklah kegalauan hati, karena hati pengendali raga, maka jikalau sakit hati, sakitlah semua, oleh karenanya perolehlah cinta, kemanakah mencari cinta,tak perlulah mencarinya,karena cinta ada di manapun kita berada, bukanlah kiranya mencari,tetapi perkenankanlah mendekatinya, mendekat kepada penguasa cinta,pemilik alam semesta & tentulah sang Maha Agung yg bersifat tak seperti makhluk-Nya ...

Pages - Menu

Friday, April 12, 2013

Aplikasi Run As Administrator Menggunakan Delphi

بسم الله الرحمن الرحيم

 
Pada sistem operasi Windows, khususnya pada versi Windows Vista, Windows 7 dan Windows 8 sering sekali ada aplikasi yang harus kita jalankan dengan modus Run As Administrator, dikarenakan aplikasi tersebut perlu akses kontrol sebagai administrator agar berjalan normal. Cara menjalankan aplikasi dengan modus Administrator sangat mudah, dengan cara klik kanan pada aplikasi kemudian pilih Run As Administrator pada menu Popup.
Beberapa aplikasi ada yang secara otomatis berjalan pada modus Administrator. Bagi para programmer delphi, menjalankan aplikasi yang dibuat juga dapat dijalankan dengan modus Administrator. Namun, untuk membuat aplikasi dengan modus Administrator kita perlu melakukan sedikit editing pada library delphi. Langkah-langkahnya sebagai berikut:

1. Buat file text dengan isi berikut:
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3">
  <assemblyIdentity type="win32" name="DelphiApplication" version="1.1.1.1" processorArchitecture="*"/>
  <dependency>
    <dependentAssembly>
      <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" publicKeyToken="6595b64144ccf1df" language="*" processorArchitecture="*"/>
    </dependentAssembly>
  </dependency>
  <description/>
  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3">
    <security>
      <requestedPrivileges>
        <requestedExecutionLevel level="requireAdministrator" uiAccess="false"/>
      </requestedPrivileges>
    </security>
  </trustInfo>
  <asmv3:application>
    <asmv3:windowsSettings xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings"/>
  </asmv3:application>
</assembly>
2. Simpan dengan nama file RequestAdmin.manifest
3. Buat file RC dengan nama file RequestAdmin.rc, isi file tersebut dengan kode: 
1 24 "RequestAdmin.manifest"
4. Kemudian buat file RES, dengan menggunakan file RC yang telah dibuat. Cara membuat file RES dapat dilihat pada posting http://banuaanam.blogspot.com/2012/01/membuat-file-resource-res.html
5. Simpan 3 file tersebut pada folder yang sama dengan project delphi .DPR anda
6. Buka source delphi project file (DPR), tambahkan kode {$R 'RequestAdmin.res'} seperti gambar berikut:
7. Compile aplikasi anda, kemudian buka file exe aplikasi anda, jika langkah-langkah sudah benar, maka aplikasi anda akan jalan pada modus Administrator
Silahkan unduh demo aplikasi di sini.
Sekian yang bisa saya samapaikan pada kesempatan ini, mohon kritik dan saran dari pengunjung
Wassalamu 'Alaikum Wr. Wb.
Terima Kasih.

0 komentar:

Post a Comment

Selamat berkunjung di blog saya, terima kasih.

Labels