Delimiter Problem

[reyka]

Bei

Delphi-Quellcode:

var sl: TStringList; i, k: Integer;
[...]
  sl := TStringList.Create;
  try
    sl.Delimiter := ' ';
    sl.DelimitedText := 'Du hast 800 Euro und 20 Fische im Karton';
    for i := 0 to sl.count - 1 do
    begin
      if TryStrToInt(sl[i], k) then
      begin
        //Ich bin eine Zahl
      end else begin
        //Ich bin keine Zahl
      end;
    end;
  finally
    sl.Free;
  end;
end;

zeigt er mir an [Fehler] Unit1.pas(31): Undefinierter Bezeichner: 'Delimiter'

muss ich noch was in Uses schreiben? Wenn ja was?
Oder geht das in Delphi 4 überhaupt nicht?