|
From: Peter T. <pe...@us...> - 2004-12-18 12:30:53
|
Update of /cvsroot/jvcl/dev/JVCL3/run In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18275/run Modified Files: JvDBGrid.pas Log Message: - Also check if columns fields are nil Index: JvDBGrid.pas =================================================================== RCS file: /cvsroot/jvcl/dev/JVCL3/run/JvDBGrid.pas,v retrieving revision 1.91 retrieving revision 1.92 diff -C2 -d -r1.91 -r1.92 *** JvDBGrid.pas 18 Dec 2004 07:40:42 -0000 1.91 --- JvDBGrid.pas 18 Dec 2004 12:30:44 -0000 1.92 *************** *** 1579,1583 **** Result := True; for I := 0 to FixedCols - 1 do ! if Assigned(Field) and (Columns.Items[I].FieldName = Field.FieldName) then begin Result := False; --- 1579,1583 ---- Result := True; for I := 0 to FixedCols - 1 do ! if Assigned(Field) and Assigned(Columns.Items[I]) and (Columns.Items[I].FieldName = Field.FieldName) then begin Result := False; |