Go Back   FileForums > Game Backup > PC Games > PC Games - CD/DVD Conversions > Conversion Tutorials

Reply
 
Thread Tools Display Modes
  #1  
Old 12-06-2016, 06:01
Luck Luck is offline
Registered User
 
Join Date: Dec 2015
Location: EUA
Posts: 8
Thanks: 5
Thanked 1 Time in 1 Post
Luck is on a distinguished road
Setup for Updates

Can someone help me?

How do I create setup for Updates, the installation location is found in the registry,

Example: he check the record and show where you installed the game

someone has the code to do this?

Sorry my english
Reply With Quote
Sponsored Links
  #2  
Old 12-06-2016, 10:02
coveiro coveiro is offline
Registered User
 
Join Date: Dec 2014
Location: EUA
Posts: 77
Thanks: 90
Thanked 52 Times in 32 Posts
coveiro is on a distinguished road
Use this program Patch Maker
Reply With Quote
The Following User Says Thank You to coveiro For This Useful Post:
Epic Titan 69 (10-03-2021)
  #3  
Old 12-06-2016, 11:28
vint56 vint56 is offline
Registered User
 
Join Date: May 2011
Location: almaty
Posts: 52
Thanks: 118
Thanked 55 Times in 31 Posts
vint56 is on a distinguished road
Code:
1
[Setup]
DefaultDirName={code:MyDirName}

[ Code]
function MyDirName(S:String): String;
var
  InsPath: String;
  er: boolean;
  myFile:String;
begin
  Result:=ExpandConstant('C:\Games\World_of_Tanks\'); //если ключа нет то будем ставить сюда
  er := RegQueryStringValue(HKLM, 'SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812RU}_is1', 'InstallLocation', InsPath);
  er := RegQueryStringValue(HKCU, 'Software\Microsoft\Windows\CurrentVersion\Uninstall\{1EAC1D02-C6AC-4FA6-9A44-96258C37C812ru}_is1', 'InstallLocation', InsPath);
  if er and (InsPath<>'') then //если ключ существует и там что-то записано
  begin
    Result := InsPath;
  end;
end;
2
Code:
[Setup]
AppName=My Program
AppVerName=My Program 1.5
DefaultDirName={code:GetInstallDir}
AppendDefaultDirName=no

[Languages]
Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"

[ Code]
function GetInstallDir(Path: String ): String;
begin
RegQueryStringValue(HKLM, 'SOFTWARE\Rockstar Games\EFLC', 'InstallPath', Path);//Какой ключ реестра ищет ...
Result := Path;
end;

function InitializeSetup(): Boolean;
begin
Result:= true;
if not RegKeyExists(HKLM, 'SOFTWARE\Rockstar Games\EFLC') then
MsgBox('Игра {#SetupSetting("AppName")} не найдена! Укажите путь к папке с игрой вручную!', mbinformation, mb_ok);
end;
3
Code:
[Setup] 
AppName=S.T.A.L.K.E.R OGS Evolution 0.6.9.3 Patch 
AppVersion=2.12 
VersionInfoVersion=0.2.1.2 
DefaultDirName={reg:HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\S.T.A.L.K.E.R OGSE Mod_is1,InstallLocation|{pf}}
AppendDefaultDirName=no
Reply With Quote
Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
BlackBox v2 y_thelastknight Conversion Tutorials 564 21-10-2021 09:34
Useful Dll for Inno Setup users peterf1999 Conversion Tutorials 88 01-12-2017 16:00
Inno Setup issue: windows security shield does not appear on setup icon Mohandas Software 1 08-09-2015 17:22
INNO TUTORIAL - Using Unicode and ANSI Versions of INNO Setup REV0 Conversion Tutorials 51 26-03-2015 06:57



All times are GMT -7. The time now is 21:18.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2022, vBulletin Solutions Inc.
Copyright 2000-2020, FileForums @ https://fileforums.com