home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Loisirs 6
/
CDL_N6.iso
/
pc
/
demodk.inf
< prev
next >
Wrap
Text File
|
1995-03-01
|
3KB
|
116 lines
DefineVariables
;; Define Windows Group Information
Text [DEMODK_Executable] := demodkpc.exe
Text [DEMODK_GroupTitle] := DK Multimedia
Text [DEMODK_GroupfileName] := DKMULTIM.Grp
;; Define Windows Icon Information
Text [DEMODK_IconTitle] := DΘmo Nathan MM
Text [DEMODK_IconFile] := [InstallFromDrive]:\DEMODK\demodk.Ico
EndDefineVariables
;;
;; Begin Main Script Execution
;;
Do SetupDemoDk
;; Product Introduction Screen(s)
Dialog PressAKey @xy(center,center) Use
Bienvenue,
ce programme installe l'ic⌠ne de la dΘmonstration
des produits de la gamme Nathan MultimΘdia :
.cMon Premier Dictionnaire Super GΘnial Nathan !
.cLe MystΦre du Passager Clandestin
.cComment τa Marche
EndDialog
Delay 1000
;; Installation Menu
ClearScreen
Do Install
Do ByeBye
;; Install Base Product Files
Procedure Install
[DEMODK_Executable] := [InstallFromDrive]:\DEMODK\demodkpc.exe
[DEMODK_IconFile] := [InstallFromDrive]:\DEMODK\demodk.Ico
;; CrΘation du groupe
ClearScreen
Do AddIconsStd
Do RuntimeVFW
EndProcedure
;; CrΘation du groupe et ajout des ic⌠nes
Procedure AddIconsStd
ShowWindow Minimize
BuildprogramGroup "[DemoDk_GroupTitle]" [DemoDk_GroupFileName]
[DEMODK_Executable] "[DemoDk_IconTitle]" [DemoDk_IconFile]
EndBuildProgramGroup
Delay 1000
ShowWindow Maximize
EndProcedure
Procedure RunTimeVFW
Dialog [YesOrNo1] @xy(center,center) UseHeader "Installation de VidΘo pour Windows"
Pour profiter des vidΘos de la dΘmonstration,
il faut que VidΘo pour Windows soit installΘ
sur votre machine.
Souhaitez-vous installer VidΘo pour Windows ?
(Dans le doute, repondez oui.)
EndDialog
if [YesOrNo1]=YesCharacter
run [InstallFromDrive]:\DEMODK\VFW\DISK1\INSTALL.EXE
endif
EndProcedure
Procedure ByeBye
Dialog PressAKey @xy(center,center) UseHeader "Installation terminΘe"
L'installation est terminΘe.
Si vous avez installΘ VidΘo pour Windows,
n'oubliez pas de relancer Windows avant de
lancer la dΘmonstration.
Votre Θcran doit Ωtre configurΘ en 256 couleurs
pour profiter au mieux de cette dΘmonstration.
Pour lancer la dΘmonstration, cliquez deux
fois sur l'ic⌠ne "DΘmo Nathan MM" dans le
groupe "DK Multimedia".
EndDialog
SoLong
EndProcedure
;; -----------------------------------------------------------------------
Procedure SetupDemodk
SetTopLineTo Produits Nathan MultimΘdia : dΘmonstration
SetDefaultBitMap Off
SetBackGroundColor 0 0 255 0 0 128 TopToBottom
ShowWindow Maximized
EndProcedure
EndScript