🚀 go-pugleaf

DataSet->Recordset->Fields->Item[WideString("OrderID")]->Value;

//------------------------------------------
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)

"Vic" <victor@espainformatica.com> �������/�������� � �������� ���������:
news:3fd891a0$1@newsgroups.borland.com...
> 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)
> >
>
>