select ip4 ip6 error?

[gluhow]

./lib/lnet.pp

procedure TLUdp.SetAddress(const Address: string);
var
  n: Integer;
  s: string;
  p: Word;
begin
  if FSocketNet = LAF_INET6 then
    n := Pos(':', Address)  // IPv4
  else
    n := Pos(']:', Address) + 1; // IPv6

May be:

procedure TLUdp.SetAddress(const Address: string);
var
  n: Integer;
  s: string;
  p: Word;
begin
  if FSocketNet = LAF_INET then
    n := Pos(':', Address)  // IPv4
  else
    n := Pos(']:', Address) + 1; // IPv6

if FSocketNet = LAF_INET6

[almindor]

Yes I think you're right, will look into this soon. Thanks!

[serbod]

I post pull request for this bug

[almindor]

Thank you for the PR! this should be fixed now.