Hi,
I used the information to write and test code. The searched layers were written in a text file. I noticed that not all layers were searched. Am I doing something wrong?
Procedure Test;
Var ...
PROCEDURE SelectThem(oLayer :HANDLE);
Begin
hLayer := GetParent(oLayer);
WHILE hLayer <> NIL DO BEGIN
tempLayerName := GetLName(hLayer);
hLayer := NextLayer( hLayer );
WriteLn(concat('LayerName: ',tempLayerName));
END;
End;
Begin
ReWrite(fileName);
Begin
ForEachObject(SelectThem, ALL)
End;
Close(fileName);
End;