Celý jsem to nečetl, ale je Ti jasné, že to je NEGACE - ta funkce se jmenuje jeToKurvaŠpatně, tzn:if (z > 255) or ((z <> 0) and (ip[st[1] + 1] = '0')) then
begin
IsWrongIP := True;
Exit;
TRUE = špatná IP
FALSE= dobrá ip
Celý jsem to nečetl, ale je Ti jasné, že to je NEGACE - ta funkce se jmenuje jeToKurvaŠpatně, tzn:if (z > 255) or ((z <> 0) and (ip[st[1] + 1] = '0')) then
begin
IsWrongIP := True;
Exit;