Via de script functie het PROJECT object kunnen opvragen.
Vroeger kon men enkel de “Atoms” van het project opvragen: PROJECTDATA, ASSEMBLY, FRAMPART, FRAMEELEMENT, FRAMEOPENING, SEGMENT, VENTPART, VENTELEMENT, VENTOPENING
De script functie “AtomToObj” werd aangepast zodat het eveneens mogelijk is om project objecten op te vragen zodat ook het overkoepelende PROJECT object opgezocht worden.
Onderstaand script geeft een voorbeeld van het gebruik van de functie “AtomToObj” om aan de hand van vroeger bewaarde project object referenties opnieuw de objecten op te vragen en aan te spreken:
| JoPPS scripting |
|
/* Object conversions */
iPro := 0;
nPro := Pool.Count;
pPro := Array.Create(0);
while (iPro < nPro) do
{
aPro := Pool.Projects[iPro];
pPro.Redim(iPro +1);
pPro[iPro] := ObjToInt(aPro);
iPro := iPro +1;
};
iPro := 0;
nPRo := pPro.Length;
while (iPro < nPRo) do
{
aPro := AtomToObj(pPro[iPro]);
message := aPro.Filename;
ShowMessage(message);
iPro := iPro +1;
}
pPro.Free();
|