VIDEO.CreateTool |
status = VIDEO.CreateTool( nControl AS INTEGER, properties AS INTEGER ARRAY ) AS INTEGER
Creates a new tool from the supplied tool properties integer array. The contents depends on the tool being created. Use the following constant to size the array.
' Tool Properties CONST MT_Tool_Properties = 100
Example:
DIM props(MT_Tool_Properties) AS INTEGER DIM count AS INTEGER
' Get Tool #1 Properties count = VIDEO.GetToolProperties( nControl, 1, props ) IF i = 0 THEN PRINT "GetToolProperties Failed!", ELSE ' Output the Tool Properties FOR i = 1 TO count PRINT i;": ";props(i), ENDFOR ENDIF
' Recreate the Tool VIDEO.ClearTool( nControl, 1, TRUE, MT_Tools_Angle ) VIDEO.CreateTool( nControl, props )
|