InoSetup ile Kendi Yazdığım Component'i kurulum dosyası yap

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
fesiharslan
Üye
Mesajlar: 591
Kayıt: 20 Eki 2006 11:37
Konum: Erzurum
İletişim:

InoSetup ile Kendi Yazdığım Component'i kurulum dosyası yap

Mesaj gönderen fesiharslan »

Bildiğiniz gibi yazdığınız componenti kullandırabilmek için Registry de;

1. HKEY_CURRENT_USER\Software\CodeGear(Embarcadero)\BDS\X.0\Known Packages kısmına bpl dosyasını register etmek,
2. HKEY_CURRENT_USER\Software\CodeGear(Embarcadero)\BDS\X.0\Library kısmında da mevcut anahtar değerine, kendi componentimizin kurulum yolunu eklemek gerekiyor.

Bunu innosetup kullanarak nasıl yapabilirim.
Kullanıcı avatarı
sabanakman
Kıdemli Üye
Mesajlar: 3081
Kayıt: 17 Nis 2006 08:11
Konum: Ah bi Antalya olaydı keşke (Ankara)

Re: InoSetup ile Kendi Yazdığım Component'i kurulum dosyası

Mesaj gönderen sabanakman »

Aslında bu meseleyi uzun uzun test etmek lazım ama vaktim olmadığından üstün körü bir cevap karaladım. Siz deneyerek sonucu bildirirsiniz. Bu istediğinizi inno içinde ("code" bloğunda) kod yazarak kontrollü olarak halledebilirsiniz.

Kod: Tümünü seç

[code]
function NextButtonClick(CurPage: Integer): Boolean;
//İleri butonu
var
  S:String;
begin
  case CurPage of
    wpFinished : begin //->Son butonuna tıklandığında....
      if RegQueryStringValue(HKEY_CURRENT_USER, 'Software\CodeGear(Embarcadero)\BDS\X.0\Library', 'Browsing Path', S) then
      begin
        S:=S+ExpandConstant(';{app}\');//Program kurulum klasörü...
        RegWriteStringValue(HKEY_CURRENT_USER, 'Software\CodeGear(Embarcadero)\BDS\X.0\Library', 'Browsing Path', S);
      end;
      RegWriteStringValue(HKEY_CURRENT_USER, 'Software\CodeGear(Embarcadero)\BDS\X.0\Known Package', ExpandConstant('{app}\Bilesen.bpl'), 'Yeni Bileşen');
    end;
  end;
end;
Şaban Şahin AKMAN
_________________
Derin olan kuyu değil kısa olan iptir. - .
Cevapla