Changeset 451 for branches/guitools-1.0/smbusers

Timestamp:

May 25, 2010, 6:17:14 PM (15 years ago)

Author:

Herwig Bauernfeind

Message:

GUI-Tools: SSCC 1.0.0, SMBUsers 0.9.8 several fixes, rest

Location:

branches/guitools-1.0/smbusers

Files:

• changes (modified) (1 diff)
• smbusers.VRP (modified) (1 diff)
• smbusers.VRX (modified) (7 diffs)
• smbusers.VRY (modified) ( previous)

branches/guitools-1.0/smbusers/changes

@@ +1 @@
+Version 0.9.8 14-03-2010
+                         !Fixed: Bug in NLV.VRS 2.0
+Version 0.9.7 06-03-2010
+                         +Added: SambaInit.VRS: _SambaInit() is more 
+                                 intelligent now
+                         *Changed: Use NLV.VRS 2.0 instead of 1.0
 Version 0.9.6 19-02-2010
                          !Fixed: Changing the password crashed smbusers.exe

branches/guitools-1.0/smbusers/smbusers.VRP

@@ -3 +3 @@
 MacroPath: VRM:U:\Develop\Samba\guitools-1.0\smbusers
 EXEPath: 
-RunParameters: 
+RunParameters: --user=herwig%0k2m
 RunDirectory: U:\Develop\Samba\guitools-1.0\smbusers
 VRXWindow: __VREMainWindow,1,2180,3710,891,8000
-VRXWindow: __VRESectionListWindow,1,2951,11130,8949,3342
-VRXWindow: __VREToolsWindow,1,2457,1012,6986,1669
+VRXWindow: __VRESectionListWindow,1,2951,9299,8949,5167
+VRXWindow: __VREToolsWindow,1,2457,1012,6992,1669
 VRXWindow: __VREWindListWindow,1,446,11130,2650,3150
 UserFile: 1
 UserWindow: Main,1
+UserWindow: About,1

branches/guitools-1.0/smbusers/smbusers.VRX

@@ -91 +91 @@
 __VXREXX____APPENDS__:
 /*
-#append U:\Develop\Samba\guitools-1.0\shared\nlv.vrs
+#append U:\Develop\Samba\guitools-2.0\shared\nlv.vrs
 #append U:\Develop\Samba\guitools-1.0\shared\inittempDir.vrs
 #append U:\Develop\Samba\guitools-1.0\shared\sambainit.vrs
@@ -614 +614 @@
     call rxfuncadd 'IniLoadFuncs', 'REXXINI', 'IniLoadFuncs'
     call IniLoadFuncs
+
+    call RxFuncAdd 'PRLoadFuncs',  'PR1UTIL', 'PRLoadFuncs'
+    call PRLoadFuncs
 
     /* Deal with DRCtrlxxx */
@@ -1613 +1616 @@
 /*:VRX         _UserRecWriteBackToStems
 */
-_UserRecWriteBackToStems: 
+_UserRecWriteBackToStems:
+    if \VRIsValidObject( RH )  then return
     Cur = VRMethod("CN_Users","GetFieldData", RH, NrFH)
     Username.Cur = VRMethod("CN_Users","GetFieldData", RH, UsernameFH) 
@@ -2119 +2123 @@
 return
 
+/*:VRX         CN_Users_Click
+*/
+CN_Users_Click: 
+    if VRInfo("Top") < 1325 & VRGet("CN_Users", "View") = "Detail" then return
+return
+
 /*:VRX         CN_Users_ContextMenu
 */
 CN_Users_ContextMenu: 
+    say VRInfo("top")
     if VRInfo("Top") < 1325 & VRGet("CN_users", "View") = "Detail" then call _ColumnsMenu "CN_users"
     else do
@@ -2136 +2147 @@
 */
 CN_Users_DoubleClick: 
+    if VRInfo("Top") < 340 & VRGet("CN_Users", "View") = "Detail" then return
     say 'CN_Users_DoubleClick() started'
     RH = VRInfo("Record")
@@ -2146 +2158 @@
 */
 CN_Users_EndEdit: 
+    if VRInfo("Top") < 340 & VRGet("CN_Users", "View") = "Detail" then do
+        say VRInfo("Object")
+        return
+    end
     call beep 880, 20
     RH = VRInfo("Record")
@@ -3089 +3105 @@
 
     call _SambaInit
+say "hier!"
     if ErrorState then call _OnErrorDisable
+say "hier jetzt!"
     if StartSamba then do
         address cmd samba.!smbcmd' start'
     end
+say "hier2!"
     if \_SambaRunning() then do
         Msg.Text  = NLVGetMessage(107)