#Copyclip autocad base point code
#Copyclip autocad base point windows

NewNameCell.Value = 'Clipboard ' & _clipboardCounter ' Create and add a cell for the name, using our counterĭim newNameCell As New DataGridViewTextBoxCell ' Create a new row for our grid and add our clipboard If IsAutoCAD(currentClipboardData.GetFormats) Then ' If the clipboard contents are AutoCAD-related _nxtCbVwrHWnd = SetClipboardViewer(Handle)ĭim currentClipboardData As DataObject = _ ' Register ourselves to handle clipboard modifications

#Copyclip autocad base point windows

' This call is required by the Windows Form Designer ( ByVal HWnd As IntPtr, ByVal Msg As Integer, _īyVal wParam As IntPtr, ByVal lParam As IntPtr) As Long ' Boolean to control access to clipboard dataĭeclare Auto Function SetClipboardViewer Lib 'user32' _ĭeclare Auto Function SendMessage Lib 'User32' _ Private Const WM_CHANGECBCHAIN As Integer = &H30D

Private Const WM_DRAWCLIPBOARD As Integer = &H308 The real “magic” is how it hooks into AutoCAD’s COPYCLIP by attaching itself as the default “clipboard viewer”. It’s the Clipboard_Palette.vb file that contains the more interesting code, implementing the behaviour of the CbPalette object. + ' automatically in future editing sessions.' )

'The Clipboard Manager will not be loaded' _ Implements IExtensionApplication.Terminateĭ()Ī _ Implements IExtensionApplication.Initializeĭ() Public ReadOnly Property PaletteSet() As PaletteSet

Public ReadOnly Property ClipboardPalette() As CbPalette It also contains the PaletteSet that contains our CbPalette and gets displayed by the CLIPBOARD command. The main file, Clipboard.vb, sets up the application to create demand-loading entries when first loaded into AutoCAD and defines a couple of commands – CLIPBOARD and REMOVECB, which removes the demand-loading entries to “uninstall” the application.

#Copyclip autocad base point code

Under the hood, the code is quite straightforward. Thanks for providing such a great little tool, Mark! :-) That’s really all there is to it: a simple yet really useful application. When you want to use these clipboard entries, you simply right-click on one and choose the appropriate paste option (which ultimately just calls through to the standard AutoCAD paste commands, PASTECLIP, PASTEBLOCK and PASTEORIG, reducing the complexity of the tool). Each entry contains a time-stamp and an automatically-generated name which you can then change to something more meaningful. The implementation of the tool is quite straightforward but the functionality is really very compelling: after having NETLOADed the tool and run the CLIPBOARD command, as you use Ctrl-C to copy drawing objects from inside AutoCAD to the clipboard a custom palette gets populated with entries containing these sets of objects. Mark was inspired by the “clipboard ring” functionality that used to be in Microsoft Office (at least I say “used to be” because I haven’t found it in Office 2007), and decided to implement similar functionality in AutoCAD. Mark has been drafting/designing with AutoCAD for the last 10+ years and, during this time, has used a variety of programming languages to customize AutoCAD: LISP, VBA and now VB.NET. This is a very cool little application developed by Mark Dubbelaar from Australia. Here’s a link to Scott’s post announcing the tool. As Scott is leaving on a well-deserved sabbatical, he has gone ahead and posted our next Plugin of the Month a few days ahead of schedule.