Question

请问在Delphi中怎么点击一个按钮复制Edit1 文本框中的内容。

请问在Delphi中怎么点击一个按钮复制Edit1 文本框中的内容。 谢谢啦~~~

Answer 1

edit1.text就是它的内容，你想往哪儿复制，内存？edit1.CopyToClipboard;

Answer 2

uses Clipbrd;
var
c: TClipboard;
begin
c := TClipboard.Create;
c.SetTextBuf(PChar(edt1.Text));
c.Free;
end;

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.SelectAll;
Edit1.CopyToClipboard;
end;