我是这样定义的
   CellFormula=^Tformula;
   TFormula=record
           row,col:integer;
           Formula:string;