Delphi7 动态数组

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

arr: array of string;procedure add(s: string);beginSetLength(arr, Length(arr) + 1);arr[Length(arr) - 1] := s;end;procedure remove(s: string); //只能删除第一个符合的vari, j: Integer;beginfor i := 0 to Length(arr) - 1 do beginif arr[i] = s then beginfor 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);vari: Integer;beginif Length(arr) > index then beginfor i := index to Length(arr) - 2 do arr[i] := arr[i + 1];SetLength(arr, Length(arr) - 1);end;end;