关于delphi 操作EXcel的问题

我用创建对象的方法对excel单元个赋值，
一条语句如下：
ExcelApp.cells[17,1].value:= '是';
但是一看该单元格显示  26159 ；这个数字好像是'是'的什么编码，后来发现，只要是赋值一个汉字就出现这种请况，全变成输入汉字的一种编码，两个汉字则没问题，请高人帮忙解答一下。

补充：首先谢谢大家，这些方法我都试过了都不行啊，结果一样都是 26159。最后没办法了，我只好在‘是’后加了空格，才变成汉字，不知其解啊！
ExcelApp.cells[17,1].value:= '是 ';
这样写就没问题。

答案：我这边按你的操作是对的，如果不知道怎么解决可以试试，看是不是单元格显示的格式有误，如下修改看看
var
  strFormat:OleVariant;
begin    
    strFormat:='@';   //表示显示的是文本格式
    ExcelApp.cells[17,1].NumberFormatLocal:=strFormat;
end;

其他：易做图作Excel用是的是eclApp:=CreateOleObject('Excel.Application')
不知你是不是一样，给单元格赋值用：
eclApp.Cells(1 , 1):='是';
eclApp.Cells(1 , 1):='测试';

显示正常 你这样写，看行不？ 
ExcelApp.cells[17,1]. := '是'; 应该操作 ExcelApp.activeSheet.cells[17,1]:= '是'; ExcelApp.cells(17,1):= '是'; 这个 我不知道 ExcelApp.cells[17,1] := '是'; 这样写 这个zzzyk关于编程的人很小的，还是上CSDN吧
我的号是：sgzhou12345，可以上去找我

上一个：有谁知道怎样在Delphi 7中显示代码的行数啊？或者有什么方法能够快速找到已知某一行数的代码啊！
下一个：delphi ，sql，， 数据库 ，求助~~~~ 急~~~~~