🚀 go-pugleaf

Thanks Vassiliev, that works perfert!!. The problem that I have now is when
I try to write it in C++.
Which is the way to do this in Builder ? :
DataSet.Recordset.Fields['OrderID'].Value

All the other things works perfect in Builder too. Thanks

"Viatcheslav V. Vassiliev" <support@oledbdirect.com> escribi� en el mensaje
news:3fd874b0@newsgroups.borland.com...
> It is interesting. This will not solve your problem, but it is not with
> CacheSize - it is with ADO Express. However exactly CacheSize first rows
are
> missed:
>
> procedure TForm1.ADOQuery1FetchComplete(DataSet: TCustomADODataSet;
>   const Error: Error; var EventStatus: TEventStatus);
> var
>   ListItem: TListItem;
>   i: Integer;
> begin
>   i := 0;
>
>   DataSet.First;
>   DataSet.Recordset.MoveFirst();
>   with ListView1 do
>   begin
>  while ( DataSet.Eof = false ) do
>  begin
>    ListItem := Items.Add;
>    ListItem.Caption := //DataSet.FieldValues['OrderID'];
>   DataSet.Recordset.Fields['OrderID'].Value;
>    ListITem.SubItems.Add(//DataSet.FieldValues['ProductID']);
>   DataSet.Recordset.Fields['ProductID'].Value);
>    Inc(i);
>    DataSet.Next;
>  end;
>   end;
>   Label1.Caption := 'Dataset '+ IntToStr(Dataset.RecordCount) + ' Items '
+
>  IntToStr(ListView1.Items.Count) + ' Items2 ' + IntToStr(i);
> end;
>
> I added variable i to be sure that the problem is not in TListView (in
other
> tests I commented all TListView-related code). I found that if I use ADO
> recordset methods (avoiding TDataSet methods) all works correctly.
> DataSet.Recordset.MoveFirst() added to position to first record and
> DataSet.FieldValues['FieldName'] should be changed to
> DataSet.Recordset.Fields['FieldName'].Value. Now correct number is
> displayed. Tested with [Order Details] table from Northwind database, MS
SQL
> Server.
>
> //------------------------------------------
> Regards,
> Vassiliev V. V.
> http://www.managed-vcl.com - using .Net objects in Delphi + ADO.Net
> http://www.oledbdirect.com - The fastest way to access MS SQL Server,
> MS Jet (Access) and Interbase (through OLEDB)
>