fix: log > ban ip address, not working with AM/PM time locale

This commit is contained in:
Massimo Melina 2020-05-30 17:28:43 +02:00
parent df5fa09ba9
commit 8be3ff6331

View File

@ -4174,11 +4174,11 @@ logBox.SelAttributes.name:=logFontName;
if logFontSize > 0 then if logFontSize > 0 then
logBox.SelAttributes.size:=logFontSize; logBox.SelAttributes.size:=logFontSize;
logBox.SelAttributes.Color:=clRed; logBox.SelAttributes.Color:=clRed;
logBox.SelText:=ts+' '; logBox.SelText:=ts+' ';
if addr > '' then if addr > '' then
begin begin
logBox.SelAttributes.Color:=ADDRESS_COLOR; logBox.SelAttributes.Color:=ADDRESS_COLOR;
logBox.SelText:=addr+' '; logBox.SelText:=addr+' ';
end; end;
logBox.SelAttributes.color:=clr; logBox.SelAttributes.color:=clr;
logBox.SelText:=first+CRLF; logBox.SelText:=first+CRLF;
@ -11258,7 +11258,7 @@ if pt.x < 0 then
if pt.y >= logbox.lines.count then if pt.y >= logbox.lines.count then
exit; exit;
s:=logbox.lines[pt.y]; s:=logbox.lines[pt.y];
s:=reGet(s, '^\S+ +(\S+@)?(\S+):\d+ ', 2); s:=reGet(s, '.+ (\S+@)?(\S+):\d+ ', 2);
if checkAddressSyntax(s,FALSE) then if checkAddressSyntax(s,FALSE) then
result:=s; result:=s;
end; // ipPointedInLog end; // ipPointedInLog