Ergebnis der Suchanfrage

• Forum: Netzwerke

  Re: Optimierung von, IP-Addresse auf Gültigkeit überprüfen

   
    by himitsu, 10. Jan 2010
  ja, die '0.0.0.0' hab ich glatt übersehn :oops:
  
  function isIP(const ipString: String; ip: PCardinal = nil): Boolean;
  var
  pIpString: PChar;
  octetCount, octetSum, octetLen, octet: Integer;
  begin
  Result := False;
  pIpString := PChar(ipString);
  octetCount := 0;
• Forum: Netzwerke

  Re: Optimierung einer Prüfroutiene gesucht

   
    by himitsu, 10. Jan 2010
  Die untenstehende Routiene arbeitet derzeit am schnellsten.
  Stringoperationen sind niemals schnnell, vorallem, wenn dabei Strings reseviert, umkopiert und freigegeben werden.
  
  PS: mit mehr als 4 Punkten im String erzeugt deine Funktion einen Pufferüberlauf bei ix := i; .
  
  
  function isIP(const s: String): Boolean;
  var P: PChar;
  c, L, n: Integer;
  begin