寻找F1Book资料，或是相关的也可以。

如体

解决方案 »

  1.   

    到formular one的老家 down一个全版的，里面有帮助
      

  2.   

    我也不知道是什么东西哦是不是帮助的书哦 （f1是帮助，book书),
      

  3.   

    就是一个控件的使用说明~~~~~~~````现在没有人用这个了，好象有个新的，叫FBOOK1XXX，呵呵，忘记了
      

  4.   

    呵呵，
    Falling~L~Coin  ……
      

  5.   

    http://www.pbtips.com/bbs/usr/2/2_18_1.rar
    formular one6的帮助下载.好像是PB上用的.你下了看看吧.
      

  6.   

    http://www.goldensoft.net/Java/f1.htmhttp://zhangxzh.nease.net/
    只找到两个
      

  7.   

    http://zhangxzh.nease.net/down/ttf16.zip
    内容:  TTf1.hlp帮助文件(为F1book的帮助)
      

  8.   

    没有这些资料啊，看来老兄是 google 过了，也没有找到了。
      

  9.   

    我也找到这个http://zhangxzh.nease.net/
      

  10.   

    F1book是什么东东来
    小小老大开口，一定帮忙！！
      

  11.   

    我去google上搜的，大家难道没有搜到吗
    http://www.cyut.edu.tw/~nite/f1book.pdf
    http://www.powerba.com/develop/delphi/article/20001004030.htm
      

  12.   

    你们都找到的我找过的东西。。
    有没有开发的文档或是Demo啊？
      

  13.   

    http://zhangxzh.nease.net/  看看
      

  14.   

    大家看看我的问题呀！http://expert.csdn.net/Expert/topic/2016/2016211.xml?temp=.1899073赋值：
    f1book1.textrc[row+4,1]:=Table1.fields[0].asSTRING;
    f1book1.TextRC[2,2]:=datetostr(now);读入
    f1book1.read(ExtractFileDir(paramstr(0))+'\f1book1.xls',F1FileExcel5);写入
    f1book1.write(ExtractFileDir(paramstr(0))+'\SHHH.xls',F1FileExcel5);选择
    F1book1.SetSelection(2,2,2,2);
    F1book1.GetSelection(0,pRow1,pCol1,pRow2, pCol2); 合并
    var
     CellFormat: F1CellFormat;
    begin
     cellformat := F1Book1.GetCellFormat;
     cellformat.MergeCells := true;
     F1Book1.SetCellFormat(cellformat);
    end;  
      

  15.   

    TO： ihihonline(小卒)delphi自带的F1BOOK是Formula One的低版本，你还是下载一个Formula One 6.1吧，找到了给我一个[email protected]或者把下载地址贴出来。=========================
    网吧上网，实在不爽！
      

  16.   

    procedure TF1BookFrn.FormatCell(CellRow, CellCol: integer; CellWidth,
      CellXiaoShu: string);
    var
      f: F1CellFormat;
      i: integer;
      NumberWidth, NumberXiaoShu: string;  {}
    begin
      F1Book1.SetActiveCell(CellRow, CellCol);
      F := F1Book1.GetCellFormat;
      for i := 0 to strtoint(CellWidth) do
        NumberWidth := NumberWidth + '#';
      for i := 0 to strtoint(CellXiaoShu) do
        NumberXiaoShu := NumberXiaoShu + '#';
      if NumberXiaoShu <> '' then
        NumberXiaoShu := '.' + NumberXiaoShu;
      f.NumberFormat[F1Book1.Handle] := NumberWidth + NumberXiaoShu;
      F1Book1.SetCellFormat(f);     {}
    end;procedure TF1BookFrn.Button2Click(Sender: TObject);
    var
      i,j: Byte;
      aa: smallint;
      strName:WideString;
      //F1Book1: TF1Book;
    begin
      //F1Book1 := TF1Book.Create(self);
      for i := 1 to 9 do
      begin
        for j := 1 to 9 do
        begin
          F1Book1.Row := i;
          F1Book1.Col := j;
          F1Book1.Text := IntToStr(i)+'×'+IntToStr(j)+'='+IntToStr(i*j);
        end;
      end;
      F1Book1.FormulaRC[ir
      {}
        end;
      F1Book1.FormulaRC[irow, icol] := strFormula; //设置该单元格的公式
      F1Book1.SaveFileDlg('save',strname,aa);
      F1Book1.Write(strname,aa);
      ShellExecute(hwnd(nil), 'open',PChar(string(strName)),nil,nil, SW_MAXIMIZE);
      F1Book1.Free;
    end;