怎样得到dbgrid控件中的正在编辑的单元格中的值?(50分)

K

kapi

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样得到dbgrid控件中的正在编辑的单元格中的值?
 
var sFieldName :string;

procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
sFieldName :=lumn.FieldName;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage(table1.FieldByName(sFieldName ).AsString);
end;
 
好像是取不到的
 

var
s:string;
begin
with TStringGrid(dbGrid1) dp s:=cells[col,row];
 
procedure TForm1.StringGrid1GetEditText(Sender: TObject; ACol,
ARow: Integer; var Value: String);
begin
label2.Caption :=stringgrid1.Cells[ACol,ARow];
end;
先得到未编辑过的值。。
然后再取编辑过的值比较一下哦。。。。
 
顶部