TMSFNCIPEdit get ipaddress problem

FMX TMS FMX UI Pack
1

Hi to all, 

last version of fnc ui pack.
I have some problem to get correct ip address with TMSFNCIPEdit component.

the procedure to get this, ipv4, address is

function TTMSFNCCustomIPEdit.GetIPAddress: string;
var
  c, s: string;
  I: Integer;
begin
  s := '';
  if not IsDesignTime then
  begin
    case FIPAddressType of
      IPv4: c := IPV4SEPARATOR;
      IPv6: c := IPV6SEPARATOR;
      MAC: c := MACSEPARATOR;
    end;
    for I := 0 to FNumOfFields - 2 do
    begin
      s := s + FFields.Text + c;
    end;
    s := FFields[FNumOfFields - 1].Text; // *
  end
  else
    s := FIPAddress;

  Result := s;
end;

I think, where * is, that the correct line will be
s := S + FFields[FNumOfFields - 1].Text

In fact, now, this function always return the last ip number.

Thank?s for attention

Daniele

2

Thanks for reporting!
You're correct about this issue. We fixed this. The next update will address this.