cheveguerra/Salma_Venta-DESCONTINUADO
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Salma_Venta-DESCONTINUADO.git synced 2026-04-22 23:20:09 +00:00
Code Issues Packages Projects Releases Wiki Activity

...

Browse Source
This commit is contained in:
cvaldes1201
2024-07-22 16:34:39 -06:00
parent 025a12c594
commit 4f86be6457
3 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
B4A/B4XMainPage.bas
View File

@@ -5,7 +5,7 @@ Type=Class
Version=9.85
@EndOfDesignText@
#Region Shared Files
#CustomBuildAction: folders ready, %WINDIR%\System32\Robocopy.exe,"..\..\Shared Files" "..\Files"
'#CustomBuildAction: folders ready, %WINDIR%\System32\Robocopy.exe,"..\..\Shared Files" "..\Files"
'Ctrl + click to sync files: ide://run?file=%WINDIR%\System32\Robocopy.exe&args=..\..\Shared+Files&args=..\Files&FilesSync=True
'###########################################################################################################
'###################### PULL #############################################################
@@ -605,9 +605,9 @@ End Sub
Sub i_engrane_Click
p_appUpdate.Left = (Root.Width/2) - (p_appUpdate.Width/2)
lv_server.Clear
lv_server.AddSingleLine("http://keymon.lat:1782")
If user.Text = "KMTS1" Then lv_server.AddSingleLine("http://10.0.0.205:1782")
If user.Text = "KMTS1" Then lv_server.AddSingleLine("http://10.0.0.214:1783")
lv_server.AddSingleLine("http://keymon.lat:1781")
' If user.Text = "KMTS1" Then lv_server.AddSingleLine("http://10.0.0.205:1782")
' If user.Text = "KMTS1" Then lv_server.AddSingleLine("http://10.0.0.214:1783")
l_server.Text = Starter.server
Subs.panelVisible(p_appUpdate,0,0)
p_appUpdate.Height = Root.Height