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

Reply
 
Thread Tools Display Modes
  #166  
Old 03-02-2013, 06:53
Razor12911's Avatar
Razor12911 Razor12911 is offline
Noob
 
Join Date: Jul 2012
Location: South Africa
Posts: 3,746
Thanks: 2,141
Thanked 11,076 Times in 2,295 Posts
Razor12911 is on a distinguished road
-mprecomp:t-nfj:zl99:d1+srep+exe+rep:800mb+delta+lzma:a1:mfbt4 :d256m:fb128:mc1000:lc8
Reply With Quote
Sponsored Links
  #167  
Old 03-02-2013, 07:02
Compiler Compiler is offline
Registered User
 
Join Date: Aug 2012
Location: A Planet called Earth.
Posts: 38
Thanks: 10
Thanked 7 Times in 7 Posts
Compiler is on a distinguished road
Quote:
Originally Posted by Razor12911 View Post
-mprecomp:t-nfj:zl99:d1+srep+exe+rep:800mb+delta+lzma:a1:mfbt4 :d256m:fb128:mc1000:lc8
What does rep:800mb stand for ? and it dosen't include ARC right
Reply With Quote
  #168  
Old 03-02-2013, 09:53
Razor12911's Avatar
Razor12911 Razor12911 is offline
Noob
 
Join Date: Jul 2012
Location: South Africa
Posts: 3,746
Thanks: 2,141
Thanked 11,076 Times in 2,295 Posts
Razor12911 is on a distinguished road
Quote:
Originally Posted by Compiler View Post
What does rep:800mb stand for ? and it dosen't include ARC right
rep is a version before srep
old - rep, new - super rep.
Reply With Quote
  #169  
Old 03-02-2013, 10:59
Andre Jesus's Avatar
Andre Jesus Andre Jesus is offline
Registered User
 
Join Date: Jun 2012
Location: Brazil
Posts: 70
Thanks: 11
Thanked 0 Times in 0 Posts
Andre Jesus is on a distinguished road
Quote:
Originally Posted by Razor12911 View Post
Post #159

Filecopy uninstall.jpg to app directory.

then filecopy to tmp directory when uninstallling, load image, done.
Razor12911, thank you for your help again.

Work fine.
Sem título.jpg
Reply With Quote
  #170  
Old 04-02-2013, 00:19
thilanka thilanka is offline
Registered User
 
Join Date: Oct 2011
Location: CO
Posts: 2
Thanks: 0
Thanked 0 Times in 0 Posts
thilanka is on a distinguished road
I want to Automatically detect and set MAC Address to Input Query when i run setup

(Sorry for my English)



I want to Automatically detect and set MAC Address to Input Query when i run setup ( inno setup key generator).

Attachment 5554

Attachment 5555

Please send me the Script because i have no knowledge about this coding


This is very Important to me please help me


Thank you very much


This is inno script




[_ISTool]

EnableISX=true

Use7zip=false

[Files]

Source: sample2.iky; DestDir: {tmp}; Flags: ignoreversion

Source: ISID.dll; DestDir: {sys}\ISID; Flags: ignoreversion


[Setup]

AppName=Inno Key Generator2

AppVerName=Inno Key Generator 1.0.2.1 2

DefaultDirName={pf}\MJ Freelancing\IKG

DefaultGroupName=Inno Key Generator

OutputDir=output

AppCopyright=Copyright © Oct 2002 - 2006 MJ Freelancing

OutputBaseFilename=IKGSetup


[ThirdParty]

CompileLogMethod=append


[Code]


function ValidateSerialNumber(InnoKeyFile, User, Orgn, ProdCode, HDD, MAC, PrivateKey, Serial: AnsiString): Boolean;

external 'ValidateSerialNumber@files:ISID.dll stdcall';

function GetMACAddress(output: AnsiString): Boolean;

external 'GetMACAddress@files:ISID.dll stdcall';


var

UserPage: TInputQueryWizardPage;

UserValues: TArrayOfString;

I: Integer;

procedure InitializeWizard();

begin

{ create the custom page }

UserPage := CreateInputQueryPage(wpInfoBefore, //wpWelcome,

'Enter Registration Details', 'You need to be a registered user to be able to proceed',

'Enter your registration details exactly (case sensitive), then click Next.');

UserPage.Add('MAC Address:', False);
UserPage.Add('Unlock Code:', False);
UserPage.Add('Private Key:', False);

// here's how to assign texts to those edit boxes
UserPage.Edits[0].Text := 'Detect and set MAC Address';
UserPage.Edits[1].Text := '123456789_Unlock';
UserPage.Edits[2].Text := 'Pr1v4t3 k3y';

// iterate all edit boxes to set them ReadOnly mode and gray color in
// an easier way than writing the same three times for all edit boxes
for I := 0 to 2 do
begin
UserPage.Edits[I].ReadOnly := True;
UserPage.Edits[I].Color := clBtnFace;
end;

{ Set default values }

SetArrayLength(UserValues, 3);

end;

function ScriptDlgPages(CurPage: Integer; BackClicked: Boolean): Boolean;

var

ExpPath: String;

begin

Result := True;

if (CurPage = UserPage.ID) then

begin

ExtractTemporaryFile('sample2.iky'); { the public key file }

ExpPath := ExpandConstant('{tmp}\sample2.iky');

Result := False;

UserValues[0] := UserPage.Values[0];
UserValues[1] := UserPage.Values[1];
UserValues[2] := UserPage.Values[2];

if (UserValues[0] = '') or (UserValues[1] = '') or (UserValues[2] = '') then

MsgBox('No fields can be blank !', mbError, MB_OK)

else

begin



//UserPage.Values[0] := GetPreviousData('MAC', UserValues[0]);

//UserPage.Values[1] := GetPreviousData('Unlock', UserValues[1]);

//UserPage.Values[2] := GetPreviousData('Private', UserValues[2]);



//function ValidateSerialNumber(InnoKeyFile, User, Orgn, PCe,HDD,MAC,PrivateKey, Serial: AnsiString): Boolean;

Result := ValidateSerialNumber( ExpPath,'','','','',UserValues[0],UserValues[2],UserValues[1] );

if (not Result) then

MsgBox('Invalid Entry !', mbError, MB_OK);

end
end

end;


function NextButtonClick(CurPage: Integer): Boolean;

begin

Result := ScriptDlgPages(CurPage, False);

end;

function BackButtonClick(CurPage: Integer): Boolean;

begin

Result := True;//ScriptDlgPages(CurPage, True);

end;

function HasHtmlHelp(): Boolean;

begin

{ HHCTRL.OCX GUID }

Result := RegValueExists(HKCR, 'CLSID\{4662DAB0-D393-11D0-9A56-00C04FB68B66}\InprocServer32', '');

end;

function HasNoHtmlHelp(): Boolean;

begin

Result := not HasHtmlHelp;

end;

Last edited by thilanka; 21-11-2013 at 02:49.
Reply With Quote
  #171  
Old 04-02-2013, 05:41
Andre Jesus's Avatar
Andre Jesus Andre Jesus is offline
Registered User
 
Join Date: Jun 2012
Location: Brazil
Posts: 70
Thanks: 11
Thanked 0 Times in 0 Posts
Andre Jesus is on a distinguished road
Quote:
Originally Posted by Razor12911 View Post
[Files]
Source: Font.ttf; DestDir: {tmp}; Flags: dontcopy;

[Code]
#ifdef UNICODE
#define A "W"
#else
#define A "A"
#endif


const
FR_PRIVATE = $10;

function AddFontResource(lpszFilename:string;fl:dword;pdv:i nteger): Integer; external 'AddFontResourceEx{#A}@gdi32.dll stdcall';
function RemoveFontResource(lpszFilename:string;fl:dword;pd v:integer): BOOL; external 'RemoveFontResourceEx{#A}@gdi32.dll stdcall';

procedure InitializeWizard;
begin
ExtractTemporaryFile('Font.ttf');
AddFontResource(ExpandConstant('{tmp}\Font.ttf'), FR_PRIVATE, 0);
end;

procedure DeinitializeSetup;
begin
RemoveFontResource(ExpandConstant('{tmp}\Font.ttf' ), FR_PRIVATE, 0);
end;

__________________________________________________ ______________

Glad could help with font.

Work on ANSI and UNICODE

Sorry for bad english.
Thank you again man.

This was the result:
1.jpg
Reply With Quote
  #172  
Old 04-02-2013, 07:17
Razor12911's Avatar
Razor12911 Razor12911 is offline
Noob
 
Join Date: Jul 2012
Location: South Africa
Posts: 3,746
Thanks: 2,141
Thanked 11,076 Times in 2,295 Posts
Razor12911 is on a distinguished road
Quote:
Originally Posted by Andre Jesus View Post
Thank you again man.

This was the result:
Attachment 5560
Mhhm, awesome. Hide progressbar and install a new progressbar with .png via PBProc
Reply With Quote
  #173  
Old 05-02-2013, 03:17
Andre Jesus's Avatar
Andre Jesus Andre Jesus is offline
Registered User
 
Join Date: Jun 2012
Location: Brazil
Posts: 70
Thanks: 11
Thanked 0 Times in 0 Posts
Andre Jesus is on a distinguished road
Quote:
Originally Posted by Razor12911 View Post
Mhhm, awesome. Hide progressbar and install a new progressbar with .png via PBProc
Great suggestion.
I will try to do this.

This is complete? (see #158).

Thanks.

Last edited by Andre Jesus; 05-02-2013 at 03:19.
Reply With Quote
  #174  
Old 05-02-2013, 06:11
Andre Jesus's Avatar
Andre Jesus Andre Jesus is offline
Registered User
 
Join Date: Jun 2012
Location: Brazil
Posts: 70
Thanks: 11
Thanked 0 Times in 0 Posts
Andre Jesus is on a distinguished road
I'm having a problem with the music during installation.
If the operating system volume is at 30%, when I run the installer, it automatically goes to 100%.
Could you suggest a code that does not affect the volume of operating system?

This is the code I'm using:
Code:
#include "botva2.iss"
#include "BASS_Module.iss"

procedure InitializeWizard();
begin
  ExtractTemporaryFile('BASS.dll');
  ExtractTemporaryFile('CallbackCtrl.dll');
  ExtractTemporaryFile('botva2.dll');
  ExtractTemporaryFile('MusicButton.png');
  ExtractTemporaryFile('Music.mp3');

  BASS_Init(ExpandConstant('{tmp}\Music.mp3'))
  BASS_CreateOnOffButton(ExpandConstant('{tmp}\MusicButton.png'), 20, 320, 36, 36, 4)
end;

procedure DeinitializeSetup();
begin
  BASS_DeInit;
  gdipShutdown
end;
Thanks in advance.

Last edited by Andre Jesus; 05-02-2013 at 06:13.
Reply With Quote
  #175  
Old 05-02-2013, 06:22
Razor12911's Avatar
Razor12911 Razor12911 is offline
Noob
 
Join Date: Jul 2012
Location: South Africa
Posts: 3,746
Thanks: 2,141
Thanked 11,076 Times in 2,295 Posts
Razor12911 is on a distinguished road
check in bass script. It is best if you use 100 instead of another number.

this usually happens if you are using windows xp
Reply With Quote
  #176  
Old 05-02-2013, 06:46
Razor12911's Avatar
Razor12911 Razor12911 is offline
Noob
 
Join Date: Jul 2012
Location: South Africa
Posts: 3,746
Thanks: 2,141
Thanked 11,076 Times in 2,295 Posts
Razor12911 is on a distinguished road
Quote:
Originally Posted by Andre Jesus View Post
Great suggestion.
I will try to do this.

This is complete? (see #158).

Thanks.
Post #158

Test it.
Reply With Quote
  #177  
Old 09-02-2013, 11:13
Andre Jesus's Avatar
Andre Jesus Andre Jesus is offline
Registered User
 
Join Date: Jun 2012
Location: Brazil
Posts: 70
Thanks: 11
Thanked 0 Times in 0 Posts
Andre Jesus is on a distinguished road
Quote:
Originally Posted by pakrat2k2 View Post
reg entries are simple, you grab them from your original installed game version, then using reg to inno conversion program english version ( under useful programs ( joe edited it to english from russian ) ).

http://fileforums.com/showthread.php?t=92995

Its make as ISS script from your saved reg file, the entire contents from the script go into [REGISTRY] section of your inno script.

DO NOT INSTALL, JUST RUN THE EXE TO SEE HOW THE MUSIC BUTTON LOOKS, THEN CANCEL INSTALL

here's a music button script that adds music to your script ( in russian so translate to english ). In the output dir is a setup.exe, just run it and you'll see the music botton in lower LH corner, you can change the image of the button & sound played by making appropriate changes to the files used. ( use any on CI8.5.7.4 or CIU etc for image / sound files )

good luck
Hi.
I used the script about music but don´t appear the button on/off music and the music audio..
Can you please see where is my mistake?

Last edited by Andre Jesus; 09-02-2013 at 11:30.
Reply With Quote
  #178  
Old 09-02-2013, 11:15
Razor12911's Avatar
Razor12911 Razor12911 is offline
Noob
 
Join Date: Jul 2012
Location: South Africa
Posts: 3,746
Thanks: 2,141
Thanked 11,076 Times in 2,295 Posts
Razor12911 is on a distinguished road
Where are the setup files?
Reply With Quote
  #179  
Old 09-02-2013, 11:27
Andre Jesus's Avatar
Andre Jesus Andre Jesus is offline
Registered User
 
Join Date: Jun 2012
Location: Brazil
Posts: 70
Thanks: 11
Thanked 0 Times in 0 Posts
Andre Jesus is on a distinguished road
Quote:
Originally Posted by Razor12911 View Post
Where are the setup files?
Hi Razor12911.

Here is.
Attachment 5616

Thanks in advance.

Last edited by Andre Jesus; 09-02-2013 at 12:23.
Reply With Quote
  #180  
Old 09-02-2013, 11:29
Razor12911's Avatar
Razor12911 Razor12911 is offline
Noob
 
Join Date: Jul 2012
Location: South Africa
Posts: 3,746
Thanks: 2,141
Thanked 11,076 Times in 2,295 Posts
Razor12911 is on a distinguished road
what is wrong with script?
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
INNO TROUBLESHOOT - Tutorials and Answers about INNO Setup REV0 Conversion Tutorials 129 21-05-2021 06:51
INNO TUTORIAL - Using Unicode and ANSI Versions of INNO Setup REV0 Conversion Tutorials 51 26-03-2015 07:57
Frequently Asked Questions Joe Forster/STA PC Games - Frequently Asked Questions 0 29-11-2005 10:48



All times are GMT -7. The time now is 19:24.


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