Import initial din SVN ROAAUTO/Trunk @HEAD

2026-04-11 17:11:32 +03:00
commit 656d98697f
1856 changed files with 163525 additions and 0 deletions
--- a/COMUN/utile/ListProperty/archivo1.txt
+++ b/COMUN/utile/ListProperty/archivo1.txt
@@ -0,0 +1,10 @@
+nControls = ASelObj(aObjects)
+If nControls = 0
+   nControls = ASelObj(aObjects, 1)
+EndIf   
+oObject = aObjects(1)
+If oObject.Class = "_sbrstatusbar"
+   Set Classlib To (oObject.ClassLibrary)
+   oPageProperty = Createobject("_pgeProperty", oObject)
+   oPageProperty.Show()
+EndIf