一个很容易得分的问题，不信来瞧瞧！（在线等待）

Question

我写了如下程序：var
AllTables:Tstrings;
begin
  try
    connMain.GetTableNames(AllTables,False);//connMain是一个TSQLConnection实例,
    ......                                  //目的用于提取数据库中所有表名并存入AllTables
  finally
  AllTables.free;
  end;
end;
在执行到“connMain.GetTableNames(AllTables,False);”一句时出现如下提示，
[Warning] main.pas(91): Variable 'AllTables' might not have been initialized
好象是说"AllTables变量没初始化，我该怎样初始化Tstrings类型的变量？？

Answer 1

AllTables := TstringList.Create;

Answer 2

//使用前先要创建对象并初始化。
var
  AllTables:Tstrings;
begin
  AllTables := TstringList.Create;
  try
    connMain.GetTableNames(AllTables,False);//connMain是一个TSQLConnection实例,
    ......                         //目的用于提取数据库中所有表名并存入AllTables
  finally
    AllTables.free;
  end;
end;