PB EasySetup - Setup maker for your program

Applications, Games, Tools, User libs and useful stuff coded in PureBasic
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

Fixed! (Version 0.2.1)
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
User avatar
oryaaaaa
Addict
Addict
Posts: 825
Joined: Mon Jan 12, 2004 11:40 pm
Location: Okazaki, JAPAN

Post by oryaaaaa »

Hi , I translate to japanese.

EasySetup Japanese LanguageFile
http://dbp.cool.ne.jp/program/purebasic ... up_JPN.zip
; -> Setup
SetupFrame = Setup Program
SetupExe = Name of setup file:
SetupDir = Output Directory:
PrefFrame = Installation Defaults
DefaultDir = Program directory:
I do not understand working of DefaultDir.
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

Thanks! :D I will add it to EasySetup.
I'm sorry, that i'm not able to take look on it. My Computer doesn't display japanese charakters. :cry:

DefaultDir: The name of the programm directory for the installation.

Your program files will be installed by default in %programfiles%\DefaultDir\.
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
User avatar
ts-soft
Always Here
Always Here
Posts: 5756
Joined: Thu Jun 24, 2004 2:44 pm
Location: Berlin - Germany

Post by ts-soft »

> I do not understand working of DefaultDir.
for example: the DefaultDir of PureBasic is PureBasic
%ProgramFiles%\MyGreatProgram
PureBasic 5.73 | SpiderBasic 2.30 | Windows 10 Pro (x64) | Linux Mint 20.1 (x64)
Old bugs good, new bugs bad! Updates are evil: might fix old bugs and introduce no new ones.
Image
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

Would be glad to get another language translations (Spanish, French, usw.)

The LanguageID for your computer you find in the menu 'help' or ask me.
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

New version 0.2.2
- Licence and info file editable (preview window)
(RTF: font, text color, bold, italic, underline)
- Japanese translation from Hiroyuki Yokota (oryaaaaa)
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

New version 0.2.4
- path variables for program directory possible (see help)
- better edit for licence and info file:
text align (left, center, right) and copy&paste (right mousebutton)

available variables:

Code: Select all

%ProgramFiles%
%MyDocuments%
%Windows%
%System%
%StartUp%
%AppData%
%QuickLaunch%
%PureBasic%
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
User avatar
GeoTrail
Addict
Addict
Posts: 2794
Joined: Fri Feb 13, 2004 12:45 am
Location: Bergen, Norway
Contact:

Post by GeoTrail »

Nice work again Thorsten :)
I Stepped On A Cornflake!!! Now I'm A Cereal Killer!
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

New Version 0.2.5
- Preview window for availible path variables with example (= own computer)
- Insert of the path variable in 'program directory' by doubleclick in the listicon
- Preview possibility of the program directory, if it contains a path variable.
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

Project homepage with screenshots online:
http://www.easysetup.de.vu
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
lexvictory
Addict
Addict
Posts: 1027
Joined: Sun May 15, 2005 5:15 am
Location: Australia
Contact:

Post by lexvictory »

thefool wrote:A way to do it:

Simply let your uninstaller write the this file: delitself.bat
:begin
if exist uninstall.exe goto trydelete
del delitself.bat
exit
:trydelete
del uninstall.exe
launch it hidden and END your program afterwards.
this batch file will loop till uninstall.exe is removed, and when it is it will remove itself and exit.

(remember, the batchfiles name shall be delitself.bat unless you change the del delitself.bat of course. Try it :D)
a better way to do it i think is to do what NSIS does (the installer system that i use):
copy the uninstaller to the temp dir
run the copied version
perform uninstall (including delete uninstall.exe from program dir)
Demonio Ardente

Currently managing Linux & OS X Tailbite
OS X TailBite now up to date with Windows!
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

lexvictory wrote:copy the uninstaller to the temp dir
run the copied version
perform uninstall (including delete uninstall.exe from program dir)
How do you remove the uninstaller from the temp dir?

That's my way:

Code: Select all

Procedure SelfDestruct(ProgDir$="") 
  exe$ = ProgramFilename()
  bat$ = Left(exe$,1)+":\~~uninst.bat"
  If ProgDir$ And Right(ProgDir$,1) = "" : ProgDir$ = Left(ProgDir$,Len(ProgDir$)-1) : EndIf 
  If CreateFile(0, bat$) 
    WriteStringN(0, "cd ")
    WriteStringN(0, ":DeleteFile")
    WriteStringN(0, "del "+exe$) ;program executable
    WriteStringN(0, "if exist "+exe$+" goto DeleteFile")
    If ProgDir$
      WriteStringN(0, "rd "+ProgDir$) ; program directory
    EndIf
    WriteStringN(0, "del "+bat$) ; temporary batch file
    WriteStringN(0, "exit") 
    CloseFile(0)
    ShellExecute_(0,"open",bat$,0,0,#SW_HIDE)
  EndIf 
EndProcedure
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
lexvictory
Addict
Addict
Posts: 1027
Joined: Sun May 15, 2005 5:15 am
Location: Australia
Contact:

Post by lexvictory »

i dont know, have a look at the source...
Demonio Ardente

Currently managing Linux & OS X Tailbite
OS X TailBite now up to date with Windows!
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

Tip:
If you often have to create a setup program for your project, you can create a desktop link and insert the project as commandline parameter.

Code: Select all

EasySetup.exe KvGS.esp
=> Project ´KvGS´ will be loaded automaticly.
The date will be 'toady' and you only have to change the version information.
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
User avatar
Thorsten1867
Addict
Addict
Posts: 1372
Joined: Wed Aug 24, 2005 4:02 pm
Location: Germany

Post by Thorsten1867 »

New Version 0.2.6
- userdefinded links
(Desktop, StartMenu, Autostart, URL-Dektop, URL-StartMenu)

Please, test it!
Translated with http://www.DeepL.com/Translator

Download of PureBasic - Modules
Download of PureBasic - Programs

[Windows 11 x64] [PB V5.7x]
Post Reply