声明:
EmptyClipboard: BOOL; {}
举例:
begin
  OpenClipboard(0);
  EmptyClipboard;
  CloseClipboard;
end;