Execute feature

I want to create a button that executes a feature and immediately RefreshPart the dimension.

something similar to this.

Set PCDApp = CreateObject("PCDLRN.Application")
Set PCDPartPrograms = PCDApp.PartPrograms

PCDApp.Visible = True

Set PCDPartProgram = PCDApp.ActivePartProgram
AppActivate ("PC-DMIS CAD++ 2019 R1 (release)")
PCDPartProgram.EXECUTEfeature
PCDPartProgram.RefreshPart

Parents

vpt.se over 3 years ago

What about EXECUTE (in the command method)?

EXECUTE Attempts to execute the current command.

Executes the command if the command is immediately executable.

You'd need to add the command object though.
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel

Reply

vpt.se over 3 years ago

What about EXECUTE (in the command method)?

EXECUTE Attempts to execute the current command.

Executes the command if the command is immediately executable.

You'd need to add the command object though.
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel

Children

carlos silva over 3 years ago in reply to vpt.se

how do I do that?
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel