5,386
社区成员
发帖
与我相关
我的任务
分享
procedure TForm1.DBGridEh1CellClick(Column: TColumnEh);
begin
Edit1.Text:=DBGridEh1.Columns[1].DisplayText;
end;
var s:string;
begin
S:='约定人';
if DBGridEh1.DataSource.DataSet.FieldByName('申请发起人').AsString=S
then ......