delphi
use Vcl.Clipbrd
procedure TForm27.FormCreate(Sender: TObject);
begin
Caption := Clipboard.AsText;
end;
不用创建对象,直接使用剪贴板
#include <Vcl.Clipbrd.hpp>
Caption = Clipboard()->AsText‘
时间: 2024-12-11 15:04:12
delphi
use Vcl.Clipbrd
procedure TForm27.FormCreate(Sender: TObject);
begin
Caption := Clipboard.AsText;
end;
不用创建对象,直接使用剪贴板
#include <Vcl.Clipbrd.hpp>
Caption = Clipboard()->AsText‘