* 49161 Data Object * 1 Text Format * 13 Unicode Text * 49352 HTML Format * 49398 Rich Text Format * 49171 Ole Private Data * 16 Locale Identifier handle * 7 Text format with OEM charsetStep 2:
_CLIPTEXT = ""
After that enumerating of available clipboard formats returned:* 1 Text Format * 13 Unicode Text * 16 Locale Identifier handle * 7 Text format with OEM charsetSo the clipboard was not exactly empty, but it contained an empty string.
DECLARE INTEGER EmptyClipboard IN user32 DECLARE INTEGER GetActiveWindow IN user32 DECLARE INTEGER CloseClipboard IN user32 DECLARE INTEGER OpenClipboard IN user32 INTEGER hwnd IF OpenClipboard(GetActiveWindow()) <> 0 = EmptyClipboard() = CloseClipboard() ENDIFthe clipboard is really empty, no handles inside. Certainly in most cases it is not important whether the clipboard is empty or contains an empty string.
DECLARE INTEGER EnumClipboardFormats IN user32 INTEGER wFormat DECLARE INTEGER OpenClipboard IN user32 INTEGER hwnd DECLARE INTEGER CloseClipboard IN user32 DECLARE INTEGER GetClipboardFormatName IN user32; INTEGER format, STRING @lpszFormatName,; INTEGER cchMaxCount