ClipEx

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
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

Don't see what you're looking for? Here's a complete API cross-reference.

Module	Library	Function
CClipboard.cls	gdi32 kernel32 user32	DeleteObject GlobalAlloc GlobalFree GlobalLock GlobalSize GlobalUnlock 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, July 1, 2002