diff --git a/src/hJOPpanel.dproj b/src/hJOPpanel.dproj
index aa989e1..993cd33 100644
--- a/src/hJOPpanel.dproj
+++ b/src/hJOPpanel.dproj
@@ -184,7 +184,7 @@
True
1
14
- 7
+ 8
0
False
False
@@ -197,7 +197,7 @@
Panel stanice hJOP
- 1.14.7.0
+ 1.14.8.0
hJOPpanel.exe
Jan Horáček
Jan Horáček
diff --git a/src/net/TCPClientPanel.pas b/src/net/TCPClientPanel.pas
index b1fcbbd..5e71e1c 100644
--- a/src/net/TCPClientPanel.pas
+++ b/src/net/TCPClientPanel.pas
@@ -601,10 +601,13 @@ procedure TPanelTCPClient.ParseOR();
end else if (parsed[1] = 'SHP') then
Relief.ORHlaseniMsg(parsed[0], parsed)
- else if (parsed[1] = 'MENU') then
- Relief.ORDkShowMenu(parsed[0], parsed[2], parsed[3])
+ else if (parsed[1] = 'MENU') then begin
+ if (parsed.Count > 3) then
+ Relief.ORDkShowMenu(parsed[0], parsed[2], parsed[3])
+ else
+ Relief.ORDkShowMenu(parsed[0], parsed[2], '');
- else if (parsed[1] = 'HV') then
+ end else if (parsed[1] = 'HV') then
begin
if (parsed[2] = 'ADD') then
F_HVEdit.ServerAddResp(parsed)