I did now, in the bottom the recorders results. Now i manage to make a process file, with commands (I get that running by calling the file with @c:\temp\process.txt process.txt : pointcloud convert outputfile:"c:\temp\test.pod" MDL COMMAND MGDSHOOK,fileList_setDirectoryCmd C:\temp\ MDL COMMAND MGDSHOOK,fileList_setFileNameCmd test.xyz MDL COMMAND msdDialogBoxResultOK I can see it working so far i gives me the dialog with test.xyz preset in the c:\temp directory but It dosent get opened automaticaly as I would have hoped? ---- VBA recorded ----- Implements IModalDialogEvents Private Sub IModalDialogEvents_OnDialogClosed(ByVal DialogBoxName As String, ByVal DialogResult As MsdDialogBoxResult) End Sub Private Sub IModalDialogEvents_OnDialogOpened(ByVal DialogBoxName As String, DialogResult As MsdDialogBoxResult) If DialogBoxName = "Select files to convert" Then ' Start a command CadInputQueue.SendCommand "MDL COMMAND MGDSHOOK,fileList_setDirectoryCmd C:\temp\" CadInputQueue.SendCommand "MDL COMMAND MGDSHOOK,fileList_setFileNameCmd test.xyz" ' Remove the following line to let the user close the dialog box. DialogResult = msdDialogBoxResultOK End If ' Select files to convert If DialogBoxName = "Specify new pod file" Then CadInputQueue.SendCommand "MDL COMMAND MGDSHOOK,fileList_setDirectoryCmd C:\temp\" CadInputQueue.SendCommand "MDL COMMAND MGDSHOOK,fileList_setFileNameCmd test.pod" ' Remove the following line to let the user close the dialog box. DialogResult = msdDialogBoxResultOK End If ' Specify new pod file End Sub
↧