[JVCL-Checkins] CVS: dev/restructured/source JvInspDB.pas,1.2,1.3

[Marcel B. <jed...@us...>]

Update of /cvsroot/jvcl/dev/restructured/source
In directory usw-pr-cvs1:/tmp/cvs-serv25451/dev/restructured/source

Modified Files:
	JvInspDB.pas 
Log Message:
* Corrected a bug in one of the New methods.

Index: JvInspDB.pas
===================================================================
RCS file: /cvsroot/jvcl/dev/restructured/source/JvInspDB.pas,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** JvInspDB.pas	25 Aug 2002 11:22:25 -0000	1.2
--- JvInspDB.pas	25 Aug 2002 14:04:26 -0000	1.3
***************
*** 501,505 ****
    TmpItem: TJvCustomInspectorItem;
  begin
!   SetLength(Result, DS.FieldCount);
    DS := ADataSource.DataSet;
    IArr := 0;
--- 501,505 ----
    TmpItem: TJvCustomInspectorItem;
  begin
!   SetLength(Result, ADataSource.DataSet.FieldCount);
    DS := ADataSource.DataSet;
    IArr := 0;