FileForums

FileForums (https://fileforums.com/index.php)
-   Conversion Tutorials (https://fileforums.com/forumdisplay.php?f=55)
-   -   altef_4's installer (https://fileforums.com/showthread.php?t=93899)

altef_4 30-10-2013 08:17

Quote:

Originally Posted by amin fear (Post 424937)
I have tested your script with latest & newest version of bass.dll (2.4.10) from www.un4seen.com...

The script compiles without any error but when testing the created setup ( pressing F9 ) , i am getting this error in Setup program startup...

http://s2.picofile.com/file/79853560...s_Idea_Web.jpg

I have the inno setup v 5.5.1 enhanced edition...

hope to help you...;)

yes, library isn't finished

altef_4 12-11-2013 01:33

Preview of 2.3.1.3
 
1 Attachment(s)
new beta, many small bugs (easy fixable), added ReDrawText module 1.5e by Shegorat (v4 edited by me), new system check, updated my bp.dll (check temp folder for music.mp3) and script size is 265 kb.

y_thelastknight 12-11-2013 04:01

Quote:

Originally Posted by altef_4 (Post 425753)
new beta, many small bugs (easy fixable), added ReDrawText module 1.5e by Shegorat (v4 edited by me), new system check, updated my bp.dll (check temp folder for music.mp3) and script size is 265 kb.

cant run it dude.

http://img198.imageshack.us/img198/999/70m0.png

Razor12911 13-11-2013 04:37

Quote:

Originally Posted by ayateknik (Post 424951)
my project this code example. iss but I can not just add to the code to add anything else Do I need to add an extra dll jpg or png image

http://i40.tinypic.com/2qi7q1g.jpg

How can I do like the picture

I used my script then added Altef's example in it.

altef_4 17-11-2013 11:04

Inno Setup With AlphaSkins support
 
1 Attachment(s)
i find something interesting, it is modified Inno Setup 5.5.1 with alphaskins support (by tlama)
try it.

altef_4 22-11-2013 02:11

BASS Protect
 
1 Attachment(s)
new version of bp.dll
UPD
version without Runtime Packages, this will fix errors on computers without installed Delphi 2009 (thanks for Ne0N for info)

amin fear 22-11-2013 04:49

Quote:

Originally Posted by altef_4 (Post 426186)
new version of bp.dll
UPD
version without Runtime Packages, this will fix errors on computers without installed Delphi 2009 (thanks for Ne0N for info)

Hi @altef_4...

I have Delphi XE3 installed on my Windows 8 64 bit & it works like a charm !

PS : I have tested your setup also on a clean Windows 8.1 64Bit on VirtualBox & still works like a charm !:D;)

**********************************
You are genius , there is no extracted MP3 file in temp !:D

altef_4 22-11-2013 06:13

Image Animator (edited)
 
1 Attachment(s)
here is edited version of Inno ImageAnimator.dll from tlama , i added ANSI support, if you have Inoo Setup Enhanced Edition, graphics will be loaded from memory if not - then from folder "Resource" (yes, again protection :D) so, test it.

altef_4 22-11-2013 09:07

New Futures
 
1 Attachment(s)
Here is another preview, is not mine, based on new library - layered.dll by David.D.Rocco, i will use it in future in my installer

download library and examples

altef_4 30-11-2013 04:01

New Protection
 
1 Attachment(s)
hello again, i'm working on new protection method, that will allow to protect graphics, allow to use internal instalation and also allows to use b2p.dll in original Inno Setup (and other libraries like a b2p), here is an preview, try replace any image in Data.zip (password is Password) and run installer again (proof), also, check TEMP folder for finding this images (or any other folder :D)

Razor12911 30-11-2013 04:21

this is cool protection insanity. Awesome.

Smurf Stomper 30-11-2013 07:29

Altef, I was linked to your post #72 - any ideas on how I can implement just the gpu directX check in a desktop shortcut (see my short scenario here)? Thanks.

yener90 30-11-2013 08:19

Quote:

Originally Posted by Smurf Stomper (Post 426620)
Altef, I was linked to your post #72 - any ideas on how I can implement just the gpu directX check in a desktop shortcut (see my short scenario here)? Thanks.

This check takes a while, so i wouldnt use it for starting an application

@altef ive got the same idea with dxdiag, unfortunately the creation takes a lot of time :/

Razor12911 30-11-2013 08:38

yep. Maybe you could add a form which reads, "Detecting Components, Please wait"

altef_4 30-11-2013 09:23

here is new example, without XML module, if you use IS 5.5.4, you can uncommend first line to make this example better
Code:

;#define InnoSetup5_5_4
[Setup]
AppName=Get_SYS_INFO
AppVersion=0.1b
CreateAppDir=no
VersionInfoDescription=altef_4
OutputBaseFilename=Get_SYS_INFO
OutputDir=.

[Icons]
Name: {userdesktop}\Far Cry 3 DX9; Filename: {app}\bin\FarCry3.exe; Parameters: -offline; WorkingDir: {app}\bin; Check: DX9;
Name: {userdesktop}\Far Cry 3 DX11; Filename: {app}\bin\FarCry3_D3D11.exe; Parameters: -offline; WorkingDir: {app}\bin; Check: DX11;

[Code]
var GetDXV:integer;
function DX9:boolean;
begin
  if
GetDXV>=9 then Result:=True else Result:=False;
end;

function DX10:boolean;
begin
  if
GetDXV>=10 then Result:=True else Result:=False;
end;

function DX11:boolean;
begin
  if
GetDXV>=11 then Result:=True else Result:=False;
end;

function GetDX:Integer;
var
 
dxv:string;
  buf:ansistring;
begin
Result:=9;
while Not FileExists(ExpandConstant('{tmp}')+'\dxdiag.txt') do Sleep(100);
LoadStringFromFile(ExpandConstant('{tmp}')+'\dxdiag.txt',buf);
delete(buf,1,Pos('DDI Version: ',buf));
dxv:=Copy(buf,13,2);
StringChange(dxv,#13,'');
Result:=StrToIntDef(dxv,9);
end;

function InitializeSetup(): Boolean;
var
 
res:integer;
begin
 
Exec(ExpandConstant('{win}\system32\dxdiag.exe'),'/whql:off /t '+ExpandConstant('{tmp}')+'\dxdiag.txt',ExpandConstant('{tmp}'),0,ewNoWait,res)
  Result:=True;
end;
#ifdef InnoSetup5_5_4
procedure CurInstallProgressChanged(CurProgress, MaxProgress: Integer);
begin
  if
CurProgress = MaxProgress-1 then GetDXV:=GetDX;
end;
#else
procedure CurStepChanged(CurStep: TSetupStep);
begin
  if
CurStep=ssInstall then GetDXV:=GetDX;
end;
#endif


Razor12911 30-11-2013 10:21

Altef, there's also DX 10.1 and I think DX 11.2;

Oh and, What about 9.0c or does it fall under 9?

altef_4 30-11-2013 11:09

Quote:

Originally Posted by Razor12911 (Post 426636)
Altef, there's also DX 10.1 and I think DX 11.2;

Oh and, What about 9.0c or does it fall under 9?

just little change code

Code:

;#define InnoSetup5_5_4
[Setup]
AppName=Get_SYS_INFO
AppVersion=0.1c
CreateAppDir=no
VersionInfoDescription=altef_4
OutputBaseFilename=Get_SYS_INFO
OutputDir=.

[Icons]
Name: {userdesktop}\Far Cry 3 DX9; Filename: {app}\bin\FarCry3.exe; Parameters: -offline; WorkingDir: {app}\bin; Check: DX9;
Name: {userdesktop}\Far Cry 3 DX11; Filename: {app}\bin\FarCry3_D3D11.exe; Parameters: -offline; WorkingDir: {app}\bin; Check: DX11;

[Code]
var GetDXV:string;

function DX9:boolean;
begin
  Case
GetDXV of
   
'9':    Result:=True;
    '9.0c': Result:=True;
    '10':  Result:=True;
    '10.1': Result:=True;
    '11':  Result:=True;
    '11.2': Result:=True;
  else
 
Result:=False;
  end;
end;

function DX10:boolean;
begin
  Case
GetDXV of
   
'9':    Result:=False;
    '9.0c': Result:=False;
    '10':  Result:=True;
    '10.1': Result:=True;
    '11':  Result:=True;
    '11.2': Result:=True;
  else
 
Result:=False;
  end;
end;

function DX11:boolean;
begin
  Case
GetDXV of
   
'9':    Result:=False;
    '9.0c': Result:=False;
    '10':  Result:=False;
    '10.1': Result:=False;
    '11':  Result:=True;
    '11.2': Result:=True;
  else
 
Result:=False;
  end;
end;

function GetDX:string;
var
 
dxv:string;
  buf:ansistring;
begin
Result:='';
while Not FileExists(ExpandConstant('{tmp}')+'\dxdiag.txt') do Sleep(100);
LoadStringFromFile(ExpandConstant('{tmp}')+'\dxdiag.txt',buf);
delete(buf,1,Pos('DDI Version: ',buf));
dxv:=Copy(buf,13,Pos(' ',buf));
StringChange(dxv,#13,'');
Result:=dxv;
end;

function InitializeSetup(): Boolean;
var
 
res:integer;
begin
 
Exec(ExpandConstant('{win}\system32\dxdiag.exe'),'/whql:off /t '+ExpandConstant('{tmp}')+'\dxdiag.txt',ExpandConstant('{tmp}'),0,ewNoWait,res)
  Result:=True;
end;
#ifdef InnoSetup5_5_4
procedure CurInstallProgressChanged(CurProgress, MaxProgress: Integer);
begin
  if
CurProgress = MaxProgress-1 then GetDXV:=GetDX;
end;
#else
procedure CurStepChanged(CurStep: TSetupStep);
begin
  if
CurStep=ssInstall then GetDXV:=GetDX;
end;
#endif


altef_4 06-12-2013 05:16

1 Attachment(s)
little preview

Razor12911 06-12-2013 05:56

Nice one bro.

Smurf Stomper 09-12-2013 06:16

altef, I had a question for you in the gpu directX thread, please answer when you have time. Thanks!

altef_4 13-12-2013 01:04

Mini Designer demo
 
1 Attachment(s)
here is demo of my Mini Designer, please, check it :)
(necessary files are not included, so you can't create setup.exe and data.zip, just to know how it looks)

sentinelks 13-12-2013 08:47

Design incomparable

yener90 13-12-2013 09:13

Quote:

Originally Posted by altef_4 (Post 427228)
here is demo of my Mini Designer, please, check it :)
(necessary files are not included, so you can't create setup.exe and data.zip, just to know how it looks)

Sexy.

German Translation:
Create Data.zip = Data.zip erstellen
Create EI.exe = EI.exe erstellen
Stop Operations = Aufgaben stoppen
Generate Pass = Passwort generieren
Password length = Passwortlänge
Animated Splashscreen = Animierte Splashanzeige
Simple Splashscreen = Einfache Splashanzeige
Custom Font = Eigene Schriftart
Text Shadows = Textschatten
Music = Musik
Button Sound = Tastenton !!! dont know exactly Translation
Textured Progressbar = Texturierte Progressbar
Progressbar Animation = Animierte Progressbar
Glass Borders = Glas Ränder !!! dont know exactly Translation
Taskbar Preview = Taskleisten-Vorschau
Slideshow = Diashow
Transparent Borders = Transparente Ränder
Transparent Effect = Transparente Effekte
Simple Button = Einfache Tasten
Animated Button = Animierte Tasten

Those i skipped are not necessary to translate ;)

pakrat2k2 13-12-2013 12:34

Quote:

Originally Posted by altef_4 (Post 427228)
here is demo of my Mini Designer, please, check it :)
(necessary files are not included, so you can't create setup.exe and data.zip, just to know how it looks)

looks sweet, nice job :D

altef_4 14-12-2013 04:18

2.3.1.5 beta
 
1 Attachment(s)
new preview, finally i added support of Original Inno Setup 5.5.4 (all features still present) script code only 220 kb :) soon i will need help with translations, now work on languages section.

UPD: fixed version without bug :)

altef_4 15-12-2013 07:58

VERY IMPORTANT NOTE, do not use uninstaller in my latest preview, thare is bug that will delete all software section from your registry and you will need to reinstall OS, i'm sorry (DON'T RUN Uninstaller.exe)

y_thelastknight 15-12-2013 09:29

Quote:

Originally Posted by altef_4 (Post 427331)
VERY IMPORTANT NOTE, do not use uninstaller in my latest preview, thare is bug that will delete all software section from your registry and you will need to reinstall OS, i'm sorry (DON'T RUN Uninstaller.exe)

late information for me
u killed my pc :'(
just installed windows 8.1 :@
damn you

edit- do i need to try the fixed one..i wont try that :p :@

altef_4 15-12-2013 09:36

Quote:

Originally Posted by y_thelastknight (Post 427333)
late information for me
u killed my pc :'(
just installed windows 8.1 :@
damn you

edit- do i need to try the fixed one..i wont try that :p :@

your choise, i "killed my pc" too :(

y_thelastknight 15-12-2013 09:40

Quote:

Originally Posted by altef_4 (Post 427335)
your choise, i "killed my pc" too :(

lol so you are the 1st lucky guy ;)
i will try that later..

jackstuff 15-12-2013 10:19

Hmm uninstaller.exe act like a virus i will try in friend pc who always asked me to give something free

y_thelastknight 15-12-2013 10:23

Quote:

Originally Posted by jackstuff (Post 427339)
Hmm uninstaller.exe act like a virus i will try in friend pc who always asked me to give something free

lolz

altef_4 15-12-2013 10:54

after this i saw how easy to "kill" OS (even with Inno Setup)
problem was with Installer.ini, because an installer searchs Application name and publisher values in Installer.ini and if this values '' then he's delete whole Software section (i think system Restore Point will help)
and if you have this buggy (or virus) preview - better even don't install this and give it to your "best" friends ;)

y_thelastknight 15-12-2013 11:28

Quote:

Originally Posted by altef_4 (Post 427342)
after this i saw how easy to "kill" OS (even with Inno Setup)
problem was with Installer.ini, because an installer searchs Application name and publisher values in Installer.ini and if this values '' then he's delete whole Software section (i think system Restore Point will help)
and if you have this buggy (or virus) preview - better even don't install this and give it to your "best" friends ;)


i have the exe..i will keep it..some time it will come in handy ;) :p

sentinelks 15-12-2013 19:05

LOL bro..
as yener script .. Delete all :D:D

altef_4 16-12-2013 01:01

1 Attachment(s)
BEWARE, the new cool stuff is on the way :D
p.s i disabled installation in this preview, so be sure that your OS is safe :D

y_thelastknight 16-12-2013 02:08

that was awesome man..cool..

sentinelks 16-12-2013 06:59

my friend, you're a titan .. I like the flags .. I want to give you my autorun to fit me too :p

altef_4 16-12-2013 12:20

i found a little library that check DxVersion link, please tell me (who can) what version check this dll OS or Videocard (i ask for those who have OS directX version higher then videocard) and, please, report back.
autor is sjwrec

sentinelks 16-12-2013 19:58

altef.. there is a way to translate the Russian .. on google is impossible
thanks

pakrat2k2 16-12-2013 20:32

Quote:

Originally Posted by altef_4 (Post 427365)
BEWARE, the new cool stuff is on the way :D
p.s i disabled installation in this preview, so be sure that your OS is safe :D

very cool install preview :cool:


All times are GMT -7. The time now is 02:29.

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