TStringList怎样初试化？

Question

... := TStringList.Create();

Answer 1

tList:=TStringList.Create;
tList:=nil;

Answer 2

var
  vStringList
begin
  vStringList := TStringList;
  try
    { .... }
  finally
    vStringList.Free;
  end;
end;
  

Answer 3

var
  vStringList: TStringList;
begin
  vStringList := TStringList;
  try
    { .... }
  finally
    vStringList.Free;
  end;
end;
  

Answer 4

var
  vStringList: TStringList;
begin
  vStringList := TStringList.Create;
  try
    { 操作.... }
  finally
    vStringList.Free;
  end;
end;
    

Answer 5

var
  vStringList: TStringList;
begin
  vStringList := TStringList.create;
  try
    { .... }
  finally
    vStringList.Free;
  end;
end;
  

Answer 6

var
  vStringList   ////定义TStringList对象
begin
  vStringList := TStringList.Create; ///初始化TstringList
  try
    { .... }
  finally
    vStringList.Free;   ////释放TStringList
  end;
end;

Answer 7

create一下就行了。这个连我都会，哈哈。