Inno Setup tekrar kurulum

[sevgi_kelbas]

Herkese merhaba
Programımın install setini Inno Setup ile oluşturdum. Default olarak program files'a kurduruyorum ama diyelimki kullanıcı yüklü olanı uninstall etmeden yeniden yüklemek istedi aynı klasörü seçerse uyarı vermiyor direk yüklüyor. Farklı klasör seçersede oraya exe'yi taşıyor ama öncekini silmiyor. Ben programın yüklü olup olmadığını ve uyarıyı nasıl veririm.
Şimdiden teşekkürler.

[sabanakman]

Bu siteye biraz göz at. Sanki bu işi görüyor gibi .

http://www.han-soft.com/uninshs.php

[sevgi_kelbas]

aslında ben sabahtan beri araştırıyorum ama hiç bir şey bulamadım. Sanırım ben kilitlenmiş durumdayım amacım aynı konuyu iki kere açmak değil ama araştırmalarım sonucunda bir şey bulamadım..

[sabanakman]

Bende de durum farklı değil. Sabahtan beri kafa olmuş kazan, kafa dinlemek için buralara takılıyoruz. Mail geldi uyarısını görüce de dayanamıyor insan direk bakıyor. Bu sayfada da ne yapacağın adım adım anlatıyor oradan halledersin artık. Hala halledemezsen en erken yarın cevap yazarım aklında bulunsun . Üşenmezsem tabi.

http://www.uninshs.com/usages.php

[ALUCARD]

. Üşenmezsem tabi.

delphi turkiye ekibi üşenmez

[sevgi_kelbas]

ben bu işi yapamadım.Nerde hata yapıyorum bilmiyorum ben ilk install çalıştırıldığında program daha önce yüklenmişmi anlasın ve uyarsın istiyorum. Bana yardımcı olursanız çok sevinirim aman üşenmeyin tamamen kilitlenmiş durumdayım..

[sabanakman]

. Üşenmezsem tabi.

delphi turkiye ekibi üşenmez

Haklısınız . Mazeretim var hem asabiyim hem de versiyon çıkarıyoruz yoğunum desem kabul olur mu . Hele bu işin de biraz zahmetli olduğunu görünce biraz tırstım . Belki bende beceremeyebilirm ama ilk fırsatta bu iş için çalışacağımdır.

[sabanakman]

Akşam evde sakin kafa ile bu olayı gerçekleştirmeye çalıştım bende beceremedim. Sanırım inno versiyonu ve kullanılan yöntem ile ilgili bir uyuşmazlık ya da benim beceriksizliğim olabilir. Eğer sorunu aşan varsa paylaşmasını diliyorum, zira inno setup için bu özellik büyük bir eksiklik gibi duruyor.

[sevgi_kelbas]

Dün akşam bayağı bir uğraştıktan sonra bu işlemin Code ile olabileceğine karar verip o şekilde yaptım. Install sırasında register'a dosyanın en son yüklendiği adresi yazıyorum. Daha sonrada Code ile kontrol edip uyarı mesajı verdim.

örnek kod şöyle..

Kod: Tümünü seç

var r:Boolean;
Strres:STring;
function InitializeSetup(): Boolean;
begin
  RegQueryStringValue (HKEY_LOCAL_MACHINE,'HARDWARE\Mus2okur\', 'path', strRes);
  if strres<>'' then
  begin
    Result := MsgBox('Kurulum Başlangıcı' +  #13#13 + strres + '    klasörüne program daha önce yüklenmiş?' + #13#13+ 'Devam etmek istiyor musunuz?', mbConfirmation, MB_YESNO) = idYes;
   if Result = False then
MsgBox('Kurulum Başlangıcı' #13#13 'İptal edildi.', mbInformation, MB_OK);
end
else
  Result := True;
end;