home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 October / Chip_2002-10_cd1.bin / zkuste / delphi / kolekce / d56 / FLEXCEL.ZIP / XLSAdapter / Inc / TFormulaCacheImp.inc < prev    next >
Text File  |  2002-06-20  |  866b  |  26 lines
  1. //************************************************************************************//
  2. //  File created automatically by GenerateRecords.xls                                 //
  3. //  Do not modify by hand                                                             //
  4. //************************************************************************************//
  5.  
  6. function TFormulaCache.GetItems(index: integer): TFormulaRecord;
  7. begin
  8.   Result := inherited Items[Index] as TFormulaRecord;
  9. end;
  10.  
  11. procedure TFormulaCache.SetItems(index: integer; const Value: TFormulaRecord);
  12. begin
  13.   inherited Items[Index] := Value;
  14. end;
  15.  
  16. function TFormulaCache.Add(aRecord: TFormulaRecord):integer;
  17. begin
  18.   Result:=inherited Add(aRecord);
  19. end;
  20.  
  21. procedure TFormulaCache.Insert(Index: Integer; ARecord:TFormulaRecord);
  22. begin
  23.   inherited Insert(Index, ARecord);
  24. end;
  25.  
  26.