关于IdTCPServer中的多线程及动态创建TADOQuery的问题

Question

奇怪，我用都是对的阿，不过没有看到你使用TADOConnection，这是怎么回事？我觉得问题出在这里，你应该先创建TADOConnection,然后FQuery.ActiveConnection := ADOConnection.而不是直接指定ConnectionString罢？

Answer 1

对不起，应该是
FQuery.Connection := ADOConnection

Answer 2

我开始也是用cnn:TADOConnection
但是cnn.Create时报错标记不能存储
//此出报错：标记不能存储  ，FQuery创建失败 ？？？？
      FQuery := TADOQuery.Create(nil);      with FQuery do
      begin
         SQL.Clear ;
         SQL.Add(strSql);
         ConnectionString := IniData.m_strConnect ;
         Open;
      end;

Answer 3

我开始也是用cnn:TADOConnection
但是cnn.Create时报错标记不能存储
//此出报错：标记不能存储  ，FQuery创建失败 ？？？？
      FQuery := TADOQuery.Create(nil);      with FQuery do
      begin
         SQL.Clear ;
         SQL.Add(strSql);
         ConnectionString := IniData.m_strConnect ;
         Open;
      end;

Answer 4

我刚才按照上面几位朋友的建议试了试，还是不行
      cnn := TADOConnection.Create(nil);//此出报错：标记不能存储
      cnn.ConnectionTimeout := 50;
      cnn.ConnectionString := IniData.m_strConnect;
      cnn.Open ;

Answer 5

你应该初始化线程的，ADO是Com!