DEFINE CLASS myclass AS SESSION OLEPUBLIC
* Define property
PROTECTED Test32
PROCEDURE OpenPrj1
BlockDir1 = "C:\jdoffice\data\res.blk"
BlockDir2 = "C:\jdoffice\data\umi.blk"
DI = THIS.Test32.dataTree.addTopoLBlock(BlockDir1, -1)
DI.caption = "Resa Mais"
THIS.Test32.mapWindows.actionAfterOpenData(2, DI)
DI = THIS.Test32.dataTree.addTopoLBlock(BlockDir2, -1)
DI.caption = "Umidita Mais"
THIS.Test32.mapWindows.actionAfterOpenData(2, DI)
ENDPROC
ENDDEFINE
<\PRE>
Is there any solution?
Thank you in advance
Luigi