4 Werte einer IP in 4 variablen

[Tpercon]

Hier mal ne Funktion zum Teilen von Text:

Delphi-Quellcode:

procedure TCheckCompObject.SplitString(Str: string; Separator: Char; var ts: TStringList);
begin
  try
    ts.Clear;
    while AnsiPos(Separator, Str) > 0 do begin
      ts.Add(trim(Copy(Str, 1, AnsiPos(Separator, Str) - 1)));
      Str := Copy(Str, AnsiPos(Separator, Str) + 1, Length(Str));
    end;
    ts.Add(trim(Str));
  except
//
    end;
  end;
end;

Du mußt ne StringList übergeben und darin stehen dann die einzelnen Teile. Dann prüfst du, ob da 4 Werte enthalten sind und schon schon hast du die 4 Werte.