Delphi 怎样查看剪贴版的内容
我在窗体中放一个Memo控件.一个按钮,点击按钮,Memo控件就显示出剪贴版的内容.
代码怎样写呢?
uses Clipbrd;
procedure TForm1.Button1Click(Sender: TObject);
var
btn : TButton;
begin
if Clipboard.HasFormat(CF_TEXT) then
begin
Memo1.Text := Clipboard.AsText;
end;
end;