如何取stringgrid双击该行的值在EDIT1显行，还有其它。。。。

Question

我想双击STRINGGRID其中的一个值在EDIT1显出，怎么做，还有，0101-0130，0201-0230,0301-0320我现在一行显示20个（0101-0130是分成两行，0201要从第三行开始，同样0301从第五行），到0201时要另一起一行怎么做。

Answer 1

双击时，确定StringGird的行和列，直接给Edit1赋值不可以吗？
注意使用如下确定行和列
sGrid.Row
sGrid.Col
其中sGrid是StringGird类型。

Answer 2

对于第一个问题，取值可以在双击事件中这样写
procedure TForm1.StringGrid1DblClick(Sender: TObject);
var
  thiscol,ThisRow:integer;
begin
  ThisCol:=StringGrid1.Col;
  ThisRow:=StringGrid1.Row;
  edit1.Text:=StringGrid1.Cells[ThisCol,ThisRow];
end;