我有一个dbgrid,我想在其中复制两列,两列都用“ Ctl + C”
是这样,但是有一个错误
procedure TForm24.mniN2Click(Sender: TObject);
begin
Clipboard.AsText:=qry2.FieldValues['name_subagent']+'='+qry2.FieldValues['result'];
end;
答案 0 :(得分:0)
感谢雷米·勒博(Remy Lebeau)的回答,您的回答是正确的,一切正常
begin
Clipboard.AsText:=VarToStr(qry2.FieldValues['name_subagent'])+'='+VarToStr(qry2.FieldValues['result']);
end;