Commit f751bb00 by Elias Sarraf

wcEmiMobile.dproj

parent 72cb3116
......@@ -2,8 +2,8 @@ object FMain: TFMain
Left = 0
Top = 0
Caption = 'emiMobileServer'
ClientHeight = 616
ClientWidth = 772
ClientHeight = 615
ClientWidth = 778
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
......@@ -12,15 +12,16 @@ object FMain: TFMain
Font.Style = []
OnClose = FormClose
DesignSize = (
772
616)
778
615)
TextHeight = 13
object pgcMain: TPageControl
Left = 8
Top = 39
Width = 756
Left = 0
Top = 40
Width = 778
Height = 575
ActivePage = tabConnectedClients
Align = alBottom
Anchors = [akLeft, akTop, akRight, akBottom]
TabOrder = 3
object tabServerLog: TTabSheet
......@@ -28,10 +29,9 @@ object FMain: TFMain
object memoInfo: TMemo
Left = 0
Top = 0
Width = 748
Width = 770
Height = 547
Align = alClient
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
WordWrap = False
......@@ -43,7 +43,7 @@ object FMain: TFMain
object grdConnectedClients: TDBGrid
Left = 0
Top = 0
Width = 748
Width = 770
Height = 487
Align = alClient
DataSource = dsConnectedClients
......@@ -76,7 +76,7 @@ object FMain: TFMain
object pnlConnectedClientsActions: TPanel
Left = 0
Top = 487
Width = 748
Width = 770
Height = 60
Align = alBottom
Caption = 'pnlConnectedClientsActions'
......@@ -120,7 +120,7 @@ object FMain: TFMain
OnClick = btnApiSwaggerUIClick
end
object btnExit: TButton
Left = 713
Left = 695
Top = 8
Width = 75
Height = 25
......
[Settings]
LogFileNum=105
LogFileNum=110
webClientVersion=9.4.0
[Database]
--Server=192.168.102.10
Server=192.168.56.129
Port=5432
Server=192.168.91.136
--Server=192.168.56.129
--Port=5432
--Port=5433
Database=lems_wcso
Username=postgres
--Password=postgreSQL
Password=emsys01
Password=postgreSQL
--Password=emsys01
--Postgre!SQL
\ No newline at end of file
{
"url": "http://localhost:2001/emsys/emiMobile/",
"jwtTokenSecret": "super_secret0123super_secret4567",
"adminPassword": "whatisthisusedfor?",
"webAppFolder": "static",
"memoLogLevel": 5,
"fileLogLevel": 5
}
\ No newline at end of file
......@@ -20,7 +20,7 @@ type
FWsUrl: string;
public
property WsUrl: string read FWsUrl;
const clientVersion = '9.4.0';
const clientVersion = '0.9.4.1';
procedure InitApp(SuccessProc: TSuccessProc;
UnauthorizedAccessProc: TUnauthorizedAccessProc);
procedure SetClientConfig(Callback: TVersionCheckCallback);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment