关于stringgrid的三个问题

Question

1  列宽在运行时如何动态调整
2  如何去掉网格显示
3  假定cell[0,0]='test.doc'如何在双击这个网格时打开这个word文档???

Answer 1

回答1：
stringgrid1.colwidths[1]:=20;//设置第二列的列宽为20象素回答2：
好象是在其Options中分别有一项横线和竖线是否画出的设置，记不起来了，自己找一个。回答3：
在stringgird的OnDblClick事件中编写代码：
if pos('.doc',cells[0,stringgrid.row])>-1 then
//如果单元格的文字包含有.doc字样则尝试打开它
ShellExecute(handle,'open',PChar(cells[0,stringgrid.row]),'','',sw_show);
//调用ShellExecute API函数打开文档
//注意，对于3，需要先在uses 子句中加入对 shellapi 单元的引用！

Answer 2

3,
uses shellapi;
procedure TForm1.StringGrid1DblClick(Sender: TObject);
begin
   StringGrid1.Cells[0,0]:='test.doc';
  if (StringGrid1.Col=0) and (StringGrid1.Row=0) then
  begin
    shellexecute;
  end;
end;

Answer 3

1.options属性：
goRowSizing Scrollable rows can be individually resized.
goColSizing Scrollable columns can be individually resized.

Answer 4

今天的问题有深度，先谢谢大家的回答，给大家的分不多，呵呵，明天结贴。
    加深问题的难度，
第三个问题假设cell[0,i]里放的是各种不同后缀的文件，双击这个网格时运行第一个问题：列宽在运行时如何用鼠标来动态调整