visual studio

I am struggling with two problems. Hopefully someone can help.
The following code will open pcdmis 2014.1, 32 bit, execute a program and close pcdmis.

1) How can I make pcdmis visible? Seems like "PCDApp.visible = True" doesn't do anything.
2) How can I make the application moveable when pcdmis is running? The application can be moved around the screen before and after pcdmis runs, but not during.

Dim PCDApp, PCDPartPrograms, PCDPartProgram
        PCDApp = CreateObject("PCDLRN.Application")
        PCDApp.visible = True
        PCDPartPrograms = PCDApp.PartPrograms
        PCDPartPrograms.Open("c:\test.PRG", "CMM1")
        PCDPartProgram = PCDApp.ActivePartProgram
        PCDPartProgram.Execute()
        PCDPartProgram.Close()
        PCDApp.Quit()

Parents

sp032 over 9 years ago

1) I must be missing something really obvious to some of you, but PCDApp .visible, .restore of .maximize does nothing. In fact, the only selections that pop up when I type PCDApp. are Equals, GetHashCode, GetType, ReferenceEquals, or ToString.

2) Looks like background worker is the way to go. Thanks!

AndersI, any chance of posting some of the 'watchdog timer' code?
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel

Reply

sp032 over 9 years ago

1) I must be missing something really obvious to some of you, but PCDApp .visible, .restore of .maximize does nothing. In fact, the only selections that pop up when I type PCDApp. are Equals, GetHashCode, GetType, ReferenceEquals, or ToString.

2) Looks like background worker is the way to go. Thanks!

AndersI, any chance of posting some of the 'watchdog timer' code?
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel

Children

No Data