Sayfayı Yazdır | Pencereyi Kapat

INF dosyasının kurulması

Nereden Yazdırıldığı: Datakent
Kategori: Diğer bölümler
Forum Adı: Borland Delphi
Forum Tanımlaması: Borland Delphi ile ilgili soru / sorun / paylaşım bölümü
URL: http://forum.datakent.com/forum_posts.asp?TID=1809
Tarih: 28.Nisan.2024 Saat 21:35


Konu: INF dosyasının kurulması
Mesajı Yazan: murat turan
Konu: INF dosyasının kurulması
Mesaj Tarihi: 13.Ekim.2009 Saat 22:00 
uses
  ShellAPI;

function InstallINF(const PathName: string; hParent: HWND) : boolean;
var
  instance: HINST;
begin { InstallINF }
  instance := ShellExecute(
    hParent,
    PChar('open'),
    PChar('rundll32.exe'),
    PChar('setupapi,InstallHinfSection DefaultInstall 132 ' + PathName),
    nil,
    SW_HIDE);
  
  Result := instance>32
end;


-------------
http://www.kasatakip.com - Kasa Takip  |  http://www.caritakip.com - Cari Takip  |  http://www.evraktakip.com - Evrak Takip  |  http://www.etasqlmobil.com - ETA SQL Mobil


Cevaplar:
Mesajı Yazan: murat turan
Mesaj Tarihi: 14.Ekim.2009 Saat 00:59
XP üstü sistemler için INF dosya kurulumu;
 
  instance := ShellExecute(
    hParent,
    PChar('open'),
    PChar('InfDefaultInstall.exe'),
    PChar(PathName),
    nil,
    SW_HIDE);


-------------
http://www.kasatakip.com - Kasa Takip  |  http://www.caritakip.com - Cari Takip  |  http://www.evraktakip.com - Evrak Takip  |  http://www.etasqlmobil.com - ETA SQL Mobil


Sayfayı Yazdır | Pencereyi Kapat