Showing posts with label delphi7. Show all posts
Showing posts with label delphi7. Show all posts

Monday, December 9, 2013

RunAsAdmin untuk delphi

Tadi nyari2 masalah ini kayanya belum ada yg buat padahal di google dah banyak 
Ya dah ini khusus buat yg belum tau aja ya..
kalo yg udah tau jangan lanjutin bacanya ya 

Oke langsung aja..
ini cuman hasil copas dari sumber sini dan saya edit2 dikit

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 td
Caranya, buka CMD.exe, masuk ke direktori penyimpanan file RequestAdmin.rc yg kita buat tadi
5. Ketikkan perintah BRCC32 RequestAdmin.rc
6. jika tdk ada kesalahan maka kita akan berhasil membuat file *RES td
7. Simpan 3 file tersebut ( RequestAdmin.manifest, RequestAdmin.rc, RequestAdmin.RES ) pada folder yang sama dengan project delphi .DPR anda
8. Buka source delphi project file (DPR), tambahkan kode {$R 'RequestAdmin.res'} seperti gambar berikut:
Posted Gambar
Kalo gak bisa buka nya bisa klik kanan project *.DPR pilih open with notepad 

Kalo masih ribet silahkan ambil 3 file yg dah jadi dibawah ini, tinggal lanjut ke step 7 - 8 
ambil disini

Thursday, November 7, 2013

Menampilkan Nama Komputer Dan IP Address Dengan Delphi

Hallo para pecinta delphi dimana saja kalian berada, saya nich punya artikel yang berguna untuk menampilkan Nama Komputer dan IP Address komputer, andapun bisa menembangkan dengan artikel ini untuk membuat program chatting dalam jaringan dengan mengunakan Borland Delphi (Jangan Pernah Berhenti Berfikir Untuk Membuat Program). Adapun langkah-langkah langkahnya adalah sebagai berikut :
Sediakan aplikasi baru dengan menyimpan nama unit-nya dengan Unit1 dan project-nya dengan Project1, jangan lupa untuk nambahkan Label1 dengan Caption Nama Komputer dan Label2 dengan Caption IP Address, tambahkan pula Edit1 (Sejajarkan dengan Label1) dan Edit2 (Sejajarkan dengan Label2) dibagian uses milik unit1 tambahkan WinSock, seperti terlihat dibawah ini :
unit Unit1;
interface
uses
WinSock, // Tulisan yang ditambahkan, tulisan ini wajib untuk diketikan
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
Setelah itu implementasikan fungsi dengan nama GetIP dibawah tulisan
implementation
{$R *.dfm}

Tuesday, October 15, 2013

Fungsi Komponen Delphi

Fungsi Komponen Delphi - Jendela IDE Delphi 7 mempunyai perangkat-perangkat yang dapat dipergunakan untuk memudahkan seorang programmer dalam membuat program. Secara default , Borland telah mengatur letak perangkat-perangkat sedemikian rupa, perangkat-perangkat tersebut diantaranya :

1. Menu

Menu pada Delphi memiliki kegunaan seperti menu pada aplikasi Windows lainnya. Dari menu ini programmer dapat memanggil, menyimpan program, menjalankan program, meremove komponen atau menambahkan komponen baru dan lain sebagainya. Singkatnya segala sesuatu yang berhubungan dengan IDE Delphi dapat Anda lakukan dari menu.

2. Speed Bar 
Speed Bar atau yang sering juga disebut toolbar berisi kumpulan tombol yang tidak lain adalah pengganti beberapa item menu yang sering digunakan. Dengan kata lain, setiap tombol pada Speed Bar menggantikan salah satu item menu. Sebagai contoh, tombol kiri atas adalah pengganti File New , tombol disebelah kanannya adalah pengganti menuFile Open , dan seterusnya.

Monday, October 14, 2013

Minimize Tray Icon Delphi7

Tutorial kali ini saya posting mengenai Minimize Tray Icon di delphi, Tray icon biasanya ada pada sudut bawah taskbar windows berdekatan dengan jam di komputer. Pengen kan kalau bisa minimize program tapi bisa ke tray icon.. untuk menghemat tempat di taskbar windows. Langsung saja Ke Tutorialnya

Langkah Pertama Buka Aplikasi Delphi

  • New application
  • save all
  • simpan pada folder yg telah ditentukan


Langkah Kedua Tambahkan Komponen

  • Button
  • Popupmenu


Langkah Ketiga Masukan Listing Code Programnya

Pada Uses Paling Atas Tambahkan 

ShellApi;

Seperti contoh dibawah ini



Kemudian tambahkan

komponen standar Delphi 7

Jenis-jenis komponen standar Delphi 7.

Komponen Fungsi

Pointer
Pointer adalah komponen khusus dan terdapat disetiap tab dalam component palatte. Komponen
pointer adalah komponen select yang digunakan untuk memilih komponen dalam form designer.

Frames
Sebuah kontainer yang digunakan untuk menampung komponen frame dapat diletakkan dalam form
atau frame-frame yang lain.

MainMenu
Komponen yang digunakan untuk membuat menu bar dan menu drop down. Komponen ini bersifat
invisible.

form transparan dengan delphi7

Untuk langkah-langkahnya seperti ini :

1. Project baru

2. Atur properties Formnya seperti ini :

AlphaBlend : True

Border Style : bsNone

Color : clWhite(untuk ini bisa diganti sesuai dengan warna background)

Position : poDesktopCenter (utk mengatur agar form tampil ditengah)