🚀 go-pugleaf

Try remove eoAsyncExecute - if you want to execute asyncronous, then you
cycle should be executed only when all records are fetched.

Regards,
Vassiliev V.V.
http://www.oledbdirect.com

"Johnnie Lann" <mortalpain@mortalpain.net> �������/�������� � ��������
���������: news:3c9c9a99_2@dnews...
> hi all
>
> as title I create recordset through TADOConnection.
>
> No Error, Warning.
>
> But wow there is Stack overflow problem.
>
> problem code is following this.
>
>   objConn->CursorLocation = clUseClient;
>   objRsTitles->Recordset  = objConn->Execute(WideString("select * from
> titles"),
>                                              cmdText,
>                                              TExecuteOptions() <<
> eoAsyncExecute);
>
>   while (!objRsTitles->Eof)
>   {
>     Ls->Items->Add(objRsTitles->FieldByName("title_id")->AsString);
>     objRsTitles->Next();
>   }
>
> I don't know what problem is. help me.
>
> And then
>
> if above code is
>
> while (!objRsTitles->Recordset->Eof)
>   {
>     Ls->Items->Add(objRsTitles->FieldByName("title_id")->AsString);
>     //  I Suppose this is wrong. but How do I retrieve data of field and
> append it in listbox?
>     objRsTitles->Recordset->MoveNext();
>   }
>
> ,
>
> How Ls->Items->Add(objRsTitles->FieldByName("title_id")->AsString); does
> change?
>
> Nice Programming and All Happiness~
>
>