Delphi7 动态数组

初学Delphi，感觉.......这感觉就是写代码太费劲了，已经习惯了c#那种信手拈来，不能说pascal不适应只能说还是费劲，可能是D7太老了，也可能是我还没有上道儿，就这么着吧，下面简单的写俩函数作为参考，修改修改可以当c#中的List 用

arr: array of string;procedure add(s: string);begin  SetLength(arr, Length(arr) + 1);  arr[Length(arr) - 1] := s;end;procedure remove(s: string); //只能删除第一个符合的var  i, j: Integer;begin  for i := 0 to Length(arr) - 1 do begin    if arr[i] = s then begin      for j := i to Length(arr) - 2 do arr[j] := arr[j + 1];      SetLength(arr, Length(arr) - 1);      Break;    end;  end;end;procedure removeAt(index: Integer);var  i: Integer;begin  if Length(arr) > index then begin    for i := index to Length(arr) - 2 do arr[i] := arr[i + 1];    SetLength(arr, Length(arr) - 1);  end;end;