diff --git a/src/LokoRuc.pas b/src/LokoRuc.pas index aa6a9b2..0098276 100644 --- a/src/LokoRuc.pas +++ b/src/LokoRuc.pas @@ -45,7 +45,7 @@ TRucList = class implementation -uses TCPCLientPanel, Symbols, PanelPainter; +uses TCPCLientPanel, Symbols, PanelPainter, BottomErrors; //////////////////////////////////////////////////////////////////////////////// @@ -115,11 +115,11 @@ procedure TRucList.Show(obj:TDXDraw); left := (Self.Graphics.PanelWidth div 2)-5; top := Self.Graphics.PanelHeight-1; - for i := 0 to Min(Self.lokos.Count, 2)-1 do + for i := 0 to Min(Self.lokos.Count, Errors.ErrorShowCount)-1 do begin PanelPainter.TextOutput(Point(left, top), Self.lokos[i].str, clBlack, clWhite, obj); Dec(top); - end;//for i + end; end; //////////////////////////////////////////////////////////////////////////////// diff --git a/src/hJOPpanel.dproj b/src/hJOPpanel.dproj index 993cd33..ff9af44 100644 --- a/src/hJOPpanel.dproj +++ b/src/hJOPpanel.dproj @@ -184,7 +184,7 @@ True 1 14 - 8 + 9 0 False False @@ -197,7 +197,7 @@ Panel stanice hJOP - 1.14.8.0 + 1.14.9.0 hJOPpanel.exe Jan Horáček Jan Horáček