Description

Short story: Recreates functionality of the Clipboard object for VBA.

Longer description from old site: click here.

To be edited...

Published

This sample, or the one from which it originally derived, was published (or at least peripherally mentioned) in the following article(s):

• Draw Bitmaps on Device Contexts, Ask the VB Pro, VBPJ, June 2000
• Soup Up Office VBA, Ask the VB Pro, VBPJ, June 2001

APIs Usage

This sample uses the following API calls:

Module	Library	Function
CClipboard.cls	gdi32 kernel32 user32	DeleteObject GlobalAlloc GlobalFree GlobalLock GlobalSize GlobalUnlock lstrlen lstrlen RtlMoveMemory RtlZeroMemory ChangeClipboardChain CloseClipboard CopyIcon CountClipboardFormats DestroyIcon EmptyClipboard EnumClipboardFormats GetClipboardData GetClipboardFormatName GetClipboardOwner GetClipboardViewer GetOpenClipboardWindow GetPriorityClipboardFormat IsClipboardFormatAvailable OpenClipboard RegisterClipboardFormat SetClipboardData SetClipboardViewer
CClipFormats.cls	user32	ChangeClipboardChain CloseClipboard CountClipboardFormats EmptyClipboard EnumClipboardFormats GetClipboardData GetClipboardFormatName GetClipboardOwner GetClipboardViewer GetOpenClipboardWindow GetPriorityClipboardFormat IsClipboardFormatAvailable OpenClipboard RegisterClipboardFormat SetClipboardData SetClipboardViewer
CMemoryDC.cls	gdi32 olepro32 user32	BitBlt CreateCompatibleBitmap CreateCompatibleDC DeleteDC DeleteObject GetObject GetPixel SelectObject SetPixel OleCreatePictureIndirect GetDC GetDesktopWindow GetSysColor ReleaseDC
CStringBuilder.cls	kernel32 msvbvm50	RtlMoveMemory VarPtr

Download

Please, enjoy and learn from this sample. Include its code within your own projects, if you wish. But, in order to insure only the most recent code is available to all, I ask that you don't share the sample by any form of mass distribution. Download ClipEx.zip, 152Kb, Last Updated: Monday, 1 July 2002

See Also