Show a progress dialog that doesn't interrupt the script. ProgressDlgClose must be used to close the dialog.
PROCEDURE ProgressDlgOpen(
title : STRING;
canCancel : BOOLEAN);def vs.ProgressDlgOpen(title, canCancel):
return None| Name | Type | Description |
|---|---|---|
| title | STRING | |
| canCancel | BOOLEAN |
les can be found at [[VS:Progress Dialog]].
{prepare progress dialog}
kProgressDlgStr := GetPlugInString(6012);
ProgressDlgOpen( kProgressDlgStr, FALSE );
ProgressDlgStart( 100.0, GetFileSize (gImportFilePath) );
kPIS5000 := 'Initializing Lights';
kPIS5001 := 'Initializing Gobo Projectors';
kPIS5002 := 'Initializing Focus Points';
kPIS5010 := 'Initializing';}
ProgressDlgOpen(kAnnScenesStr, FALSE);
ProgressDlgSetMeter( kPIS5010 );
If ResourceIsOK Then BEGIN END;
PrefRecHand := GetObject(kSLPrefRec);
DataExchangeSuspend := FALSE;import vs
# Show a progress dialog that doesn't interrupt the script.
title = 'Example'
canCancel = True
vs.ProgressDlgOpen(title, canCancel)ProgressDlgOpen | ProgressDlgClose | ProgressDlgSetTopMsg | ProgressDlgSetBotMsg | ProgressDlgSetMeter | ProgressDlgStart | ProgressDlgEnd | ProgressDlgHasCancel | ProgressDlgYield
Availability: from Vectorworks 2015