Als men via scripting een project bewaard kunnen er boodschappen verschijnen die de gebruiker attent maken op bepaalde situaties, o.a. :
- project is van een oudere JP versie
- project is reeds in de fase produktie of verder
Tijdens het bewaren van een project via scripting is dit niet wenselijk daar dit doorgaans een process is waarbij interactie van de gebruiker niet gewenst is, daar dit het process onderbreekt. Daarom zijn de methodes in scripting om projecten te bewaren aangepast zodat er default geen boodschappen venster meer verschijnt. Indien dit toch wenselijk zou zijn kan dit geforceerd worden door een extra argument bij de desbetreffende routines :
_PROJECTPOOL class methods :
SAVE ([bVerbose]): B
SAVEAS ([Sfn[,bVerbose]]) : B
bVerbose = True (dialoog verschijnt)
bVerbose = False (dialoog verschijnt niet, standaard gedrag)
Scripting functies :
ProjectSave ([Sfn[,bVerbose]]) : B
ProjectSaveAs([Sfn[,bVerbose]]) : B
bVerbose = True (dialoog verschijnt)
bVerbose = False (dialoog verschijnt niet, standaard gedrag)
Onderstaand een voorbeeld van een script waarin bovenvermelde methodes en functies worden gebruikt:
CurPro := GetCurrentProject();
message := 'Geen huidig project!';
if CurPro != Nil then
{ CurPro.State := PROJECTSTATE_DONE;
Pool.Save(True); /* Save with warnings enabled */
CurPro.State := PROJECTSTATE_PRODUCTION;
Pool.Save(); /* Save with warnings disabled */
CurPro.State := PROJECTSTATE_DONE;
ProjectSave('C:\TEST SAVE WARN ON.JP',True); /* Save with warnings enabled */
CurPro.State := PROJECTSTATE_PRODUCTION;
ProjectSave('C:\TEST SAVE WARN OFF.JP'); /* Save with warnings disabled */
}
else ShowMessage(message);