stringgird可以编辑么,该如何解决

stringgird可以编辑么
如果双击stringgird某单元,能否直接在stringgrid中编辑这个单元的值,并且updata到数据库,

可以的话,给个demo看看

//是在stringgird编辑哦,不是在新窗口中编辑。

------解决方案--------------------
给你做好了,给分吧
var
Form1: TForm1;
EdtCol,EdtRow:integer;
implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
self.StringGrid1.Options:=[goFixedVertLine,goFixedHorzLine,goVertLine,goHorzLine,goRangeSelect,goEditing];
end;

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
begin
if stringgrid1.Cells[EdtCol,EdtRow]<>'' then
//在这儿可以提交你修改的内容
showmessage(stringgrid1.Cells[EdtCol,EdtRow]);
end;

procedure TForm1.StringGrid1SetEditText(Sender: TObject; ACol,
ARow: Integer; const Value: String);
begin
EdtCol:=acol;
EdtRow:=arow;
end;