处理数据栅格的编辑框

文章作者 100test 发表时间 2011:03:22 18:43:37
来源 100Test.Com百考试题网

　　///////Begin Source
　　function GetDBGridEdit(mDBGrid: TDBGrid): TEdit.
　　var
　　　　I: Integer.
　　begin
　　　　Result := nil.
　　　　if not Assigned(mDBGrid) then Exit.
　　　　if not mDBGrid.EditorMode then begin