I, Alex, foi mal... vou traduzir pra cá de novo rapidinho. :)


Pessoal,

Isso funciona

loTest = NewObject("MyClassName", "MyVCXName.VCX", "MyExecutableName.EXE")
Mas isso não funciona

loTest = NewObject("MyClassName", "MyPRGName.PRG", "MyExecutableName.EXE")

Tenho uma classe num programa(.EXE) e preciso usar essa classe de outro programa. Posso fazer isso por pela função NewObject(), mas se a classe estiver num programa .PRG não funcionará retornando uma mensagem de erro.


No arquivo .PRG tenho

Define class MyClassName as Custom
...
EndDefine

no help fala assim:

NEWOBJECT(cClassName, cModule, cInApplication)

cModule
Specifies a .vcx file or Visual FoxPro program (.prg, .fxp, .mpr, .app, .exe, and so on) containing the class or object specified with cClassName. The default is a .vcx file. If you specify a program file, you must include an extension.


---
Depois que foi adicionado o Document View no VFP passei a ter preferência pelos PRGs às VCXs