2006/05/02

Edit

     
 

Projekt InstScript

artefaktur

InstScript ist eine DLL in der die Funktionalität einer einfachen Installation unter Windows 3.1, Windows 95 und NT (16/32) zur Verfügung gestellt wird.

Zeit:1997
Kunde:Endkunden
Position:Entwicklung, Vertrieb
Technologien: C++
Beispielcode:
[Procedures]

Proc Main
setvar message=This routine will prepare installation of\n\n%APPNAME%.\n\nPlease select in the next dialog, where the program should be installed.
setvar title=Installation
askmsg erg=%message%,%title%,1
if %erg%==2 then abort
askdir TARGETDIR=c:\nmwm,Select installation directory
askmsg erg=Start Installation now,Installation,1
if %erg%==2 then abort
call prepareinst
:exitmain
endproc

proc prepareinst
call preparedefvals
set LOGINSTFILES=0
instfile erg=INSTALL.INI,INSTALL.INI,,0,Prepare installation
if %erg%==0 then abort
setini Defines,SOURCEDIR,%TARGETDIR%\INSTALL.INI,%SOURCEDIR%
instfile erg=B%MM%.EXE,B%MM%.EXE,,0,Prepare installation
if %erg%==0 then abort
instfile erg=TEST%MM%.EXE,TEST%MM%.EXE,,0,Prepare installation
if %erg%==0 then abort
instfile erg=INST%MM%.DLL,INST%MM%.DLL,,0,Prepare installation
if %erg%==0 then abort
exec %erg%=%TARGETDIR%\TEST%MM%.EXE,,,1
if %erg%==1 then abort
endproc

proc preparedefvals
setvar APPNAME=New Menus Window Manager
setvar PROGNAME=NMWM
setvar COMPANY=artefaktur
setvar VERSION=2.03
setvar LG=E
if %FLAT%==1 then goto isflat
setvar MM=16
goto exitproc
:isflat
setvar MM=32
:exitproc
endproc


[Defines]
APPNAME=Win4Help
COMPANY=Roger Rene Kommer, artefaktur
PROGNAME=Win4Help
TARGETDIR=%WINDIR%
LOGINSTFILES=1

[PraeCopy]

Die Installation von New Menus Window Manager und Win4Help wurde mittels InstScript und dem Simple Basic Script Interpreter bewerkstelligt.