有一小段code,可能有啟發procedure TfrmPersonFind_Grid.grid1DblClick(Sender: TObject);
var i:integer ;
begin
grid1.Fields[0].FocusControl;
i:=grid1.SelectedField.AsInteger;
showmessage(IntToStr(i));
end;
var i:integer ;
begin
grid1.Fields[0].FocusControl;
i:=grid1.SelectedField.AsInteger;
showmessage(IntToStr(i));
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货