Tried on Window 2000 Pro, AS Tcl 8.4.6, TWAPI 0.8. Put image on clipboard via Alt-PrntScrn. The image pastes into MSpaint fine. When I push paste on this test program the process just disappears with no message or error display of any kind. :*(  RT, 26March2006.  To install the patched Img I simply copied the zip files over top of existing
Img install. Was that correct? (I did this because the zip did not contain a full compliment of files)
'''Update by [RT], 30June06''' - finally tried with 8.4.9 (ActiveState) and the new Img is indeed working to load the .bmp file created by the Clipboard2Img proc below. Thanks!!

[PO] 2006/03/26
The Zip file should contain everything you need. 
But, I've compiled the Img extension against Tcl 8.4.9. This may be your problem; Stubs are only upwards compatible.

[APN] Both copy and paste worked fine for me on XP SP2 in 16 and 32 bit display modes.
Tcl 8.4.12, [TWAPI] 0.8. Unlike the above user, I removed by original Img directory
and just used the above version instead.

[MG] I used a simplified version of this code on XP SP2 for pasting PNG images for different Excel objects (charts, equations) from the clipboard directly to Tk canvas. Tcl 8.4.11, TWAPI 0.8 and a standard Img1.3. My code follows after the main example.

[DC] Paul, did you ever post a patch file or the source code to this modification?

[MR] Did not work for me on WinXP, Tcl 8.4.9, TWAPI 0.8. Getting this error: couldn't load library "Img1.3/tkimgwindow13.dll": this library or a dependent library could not be found in library path while executing.

[PO] 2006/09/19
The Img package available from my homepage is dependent on msvcrtd.dll. It was intended as a test/debug version.

The patched sources of the BMP parser are in the SF repository since 2006/06/06.
It could therefore be part of an actual AS distribution. 

'''[potrzebie] - 2011-11-15 07:46:28'''
The test code works directly with latest ActiveTCL, so I guess they included your extended BMP parser.

----

***Just copy image to clipboard***

(extract from below)
   *   requires [twapi] and [Img] (at least tkimg files pkgIndex.tcl, tkimg14.dll, tkimgbmp14.dll)
   *   Image is named Img (image create photo Img)

======tcl
set a {return button pack set menu}
package require twapi_clipboard
package require img::bmp
twapi::open_clipboard
twapi::empty_clipboard
# First 14 bytes are bitmapfileheader - get rid of this
twapi::write_clipboard 8 [string range\
        [binary decode base64 [Img data -format bmp]] 14 end]
twapi::close_clipboard
======

+&
| title: [tcl-only datefield]
| [notFound]
+&
| title: [sockspy]
| [notFound]
+&
| title: [1]
*** no link found for klimb [
+&
| title: [Dragon Curve]
| [vetter_DragonCurve_wiki3349_step8_screenshot_410x487.jpg]
+&
| title: [Octabug]
| [vetter_Octabug_wiki3494_animatedOctahedron_screenshot_667x543.jpg]
+&
| title: [TkTopoMap]
| [vetter_TkTopoMaps_wiki3926_screenshot_398x506.jpg]
+&
| title: [Why manhole covers are round]
| [notFound]
+&
| title: [3D Maze]
| [vetter_3D-Maze_wiki4188_mazeANDcontrols_screenshot_582x502.jpg]
+&
| title: [SpiroGraph]
| [notFound]
+&
| title: [TkChallenger]
| [vetter_tkChallenger_gameBoard_screenshot_337x281.jpg]
+&
| title: [TkPente]
| [vetter_tkPente_gameBoard_screenshot_431x489.jpg]
+&
| title: [TkOverload]
| [vetter_TkOverload_gameBoard_screenshot_243x342.jpg]
+&
| title: [Dot to Dots]
| [vetter_dot2dot_screenshot_1015x663.jpg]
+&
| title: [Pass by reference]
| [notFound]
+&
| title: [Maritime Signal Flags]
| [WikiDbImage maritime.jpg]
+&
| title: [Fractal Mountains]
| [notFound]
+&
| title: [Møiré Patterns]
| [vetter_MoirePattern_wiki4602_screenshot_708x531.jpg]
+&
| title: [Mandelbrot]
| [WikiDbImage mandelbrot.jpg]
+&
| title: [Juggler]
| [vetter_tkJuggler_wiki4801_screenshot_752x581.jpg]
+&
| title: [TkMapper]
| [vetter_TkMapper_wiki6277_screenshot_1024x547.jpg]
+&
| title: [Bitmap Editor]
| [vetter_bitmapEditor_wiki6298_screenshot_592x468.jpg]
+&
| title: [a triangle puzzle]
| [vetter_nestedTriangles_wiki8280_screenshot_708x580.jpg]
+&
| title: [TkRose]
| [vetter_TkRose_wiki8295_roseANDcontrols_screenshot_623x546.jpg]
+&
| title: [Morley's Miracle]
| [vetter_MorleysMiracle_triangle_screenshot_636x476.jpg]
+&
| title: [Bulging Line Illusion]
| [vetter_BulgingLineIllusion_wiki8340_GLWB_screenshot_405x470.jpg]
+&
| title: [Hilbert Curve]
| [WikiDbImage hilbert.gif]
+&
| title: [Buffon's Needle]
| [vetter_BuffonsNeedles_wiki8407_screenshot_719x611.jpg]
+&
| title: [3 Triangles]
| [3 Triangles screen.png]
+&
| title: [tkAtaxx]
| [WikiDbImage tkataxx.jpg]
+&
| title: [Polyhedron Nets]
| [vetter_polyhedronNets_wiki8528_screenshot_592x444.jpg]
+&
| title: [Cubic Splines]
| [vetter_cubicSpline_wiki8536_screenshot_571x392.jpg]
+&
| title: [Arrow buttons]
| [vetter_ArrowButtons_wiki8554_screenshot_110x106.jpg]
+&
| title: [Drawing rounded polygons]
| [vetter_Drawing-rounded-polygons_wiki8590_screenshot_508x547.jpg]
+&
| title: [Canvas Rotation]
| [clown2.jpeg]
+&
| title: [Named Colors]
| [notFound]
+&
| title: [tkGoldberg]
| [vetter_tkGoldberg_wiki8607_screenshot_866x711.jpg]
+&
| title: [Regular Polygons 2]
| [vetter_regularPolygons2_wiki8612_screenshot_542x477.jpg]
+&
| title: [3D Hilbert Curve]
| [vetter_3DhilbertCurve_wiki8723_screenshot_636x508.jpg]
+&
| title: [Playing Card Images]
| [notFound]
+&
| title: [Scat]
| [vetter_Scat_feltAndCards_screenshot_629x547.jpg]
+&
| title: [Falling Marbles]
| [notFound]
+&
| title: [Rain Storm]
| [notFound]
+&
| title: [Lissajous Figures]
| [vetter_lissajousFigures_wiki8875_screenshot_615x480.jpg]
+&
| title: [Puzzle Blocks]
| [vetter_PuzzleBlocks_boat_screenshot_635x550.jpg]
+&
| title: [Video Poker]
| [vetter_VideoPoker_screenshot_423x483.jpg]
+&
| title: [Eliminator]
| [vetter_Eliminator_screenshot_203x288.jpg]
+&
| title: [Gem Game]
| [vetter_GemGame_screenshot_432x337.jpg]
+&
| title: [Triangle Madness]
| [WikiDbImage trianglemadness.jpg]
+&
| title: [Square Root]
| [notFound]
+&
| title: [Hack-O-Matic]
| [vetter_Hack-O-Matic_binary-editor_wiki9755_screenshot_261x403.jpg]
+&
| title: [Printing text files under Windows]
| [notFound]
+&
| title: [Variable versus a Global Array]
| [notFound]
+&
| title: [TkMines]
| [vetter_tkmines_screenshot_1011x665.jpg]
+&
| title: [Widget Configure]
| [notFound]
+&
| title: [I love foreach]
| [I love foreach screenshot2.png]
+&
| title: [Starfield]
| [vetter_Starfield_wiki10100_screenshot_503x371.jpg]
+&
| title: [Collapse]
| [WikiDbImage TCL_wiki_Collapse_Game.PNG]
+&
| title: [Pastel Colors]
| [vetter_PastelColors_mainGUI_screenshot_151x125.jpg]
+&
| title: [Wiki History Diff]
| [notFound]
+&
| title: [Word Jumble]
| [vetter_WordJumble_screenshot_776x438.jpg]
+&
| title: [Pig Latin]
| [notFound]
+&
| title: [SkipList]
| [notFound]
+&
| title: [SkipList Demo]
| [notFound]
+&
| title: [Fern Fractal]
| [vetter_FernFractal_wiki10492_screenshot_609x548.jpg]
+&
| title: [A Very Simple Weather App]
| [notFound]
+&
| title: [A Simple Fan Animation]
| [vetter_fanBladesAnimation_wiki10820_screenshot_257x322.jpg]
+&
| title: [Parsing XML]
| [notFound]
+&
| title: [Parallel Geturl]
| [vetter_ParallelGeturl_wiki11060_screenshot_827x545.jpg]
+&
| title: [Azimuth Plotting]
| [notFound]
+&
| title: [Universal Transverse Mercator]
| [vetter_UniversalTransverseMercator_wiki13044_screenshot_616x142.jpg]
+&
| title: [Print Area Selector]
| [notFound]
+&
| title: [Convolutions]
| [notFound]
+&
| title: [Following Redirects]
| [notFound]
+&
| title: [Tic Tac Toe]
| [Tic Tac Toe game screen.png]
+&
| title: [Lights Out]
| [vetter_LightsOut_screenshot_649x526.jpg]
+&
| title: [Rush Hour]
| [WikiDbImage rushhour.gif]
+&
| title: [Word Search]
| [vetter_WordSearch_screenshot_474x483.jpg]
+&
| title: [A simple Font Viewer]
| [notFound]
+&
| title: [Dynix2RSS]
| [notFound]
+&
| title: [TriPeaks Solitaire]
| [vetter_TriPeaks_feltAndCards_screenshot_741x416.jpg]
+&
| title: [Can You Read This?]
| [notFound]
+&
| title: [WAV Dump]
| [notFound]
+&
| title: [XML Tree Walking]
| [notFound]
+&
| title: [My House]
| [vetter_MyHouse_wiki14330_screenshot_479x361.jpg]
+&
| title: [BMP Dump]
| [notFound]
+&
| title: [Hold'Em Solitaire]
| [vetter_HoldEmSolitaire_feltAndCards_screenshot_1021x711.jpg]
+&
| title: [Simple Tktable]
| [vetter_Simple-Tktable_wiki14901_demo_screenshot_294x250.jpg]
+&
| title: [3d Matrix Inversion]
| [notFound]
+&
| title: [Labyrinth]
| [vetter_LabyrinthGame_screenshot_661x601.jpg]
+&
| title: [Smallest Enclosing Disc]
| [vetter_smallestEnclosingDisk_screenshot_526x472.jpg]
+&
| title: [The Classic 15 Puzzle]
| [vetter_15puzzle_wiki15067_screenshot_208x291.jpg]
+&
| title: [N-Puzzle]
| [vetter_MxNpuzzle_wiki15085_screenshot_171x244.jpg]
+&
| title: [Animated Circles]
| [vetter_animatedCircles_wiki15104_screenshot_404x225.jpg]
+&
| title: [Wavy Text]
| [notFound]
+&
| title: [Mind Reader]
| [notFound]
+&
| title: [Kandinsky Dance]
| [vetter_KandinskyDance_wiki15178_animation_screenshot_507x413.jpg]
+&
| title: [Spotlight]
| [vetter_Spotlight_wiki15238_screenshot_325x284.jpg]
+&
| title: [Magnifying Glass]
| [vetter_MagnifyingGlass_wiki15239_zoom2_screenshot_322x266.jpg]
+&
| title: [Colliding Blocks]
| [vetter_collidingBlocks_wiki15262_screenshot_568x589.jpg]
+&
| title: [Lights On]
| [vetter_LightsOn_screenshot_647x461.jpg]
+&
| title: [Ring Master]
| [vetter_RingMaster_wiki15442_canvas_screenshot_465x377.jpg]
+&
| title: [Capturing Multiple Screens]
| [notFound]
+&
| title: [Shadow Photo]
| [WikiDbImage shadow.jpg]
+&
| title: [Photo Gallery]
| [vetter_PhotoGallery_wiki15611_top_screenshot_557x547.jpg]
+&
| title: [Montana Solitaire]
| [vetter_MontanaSolitaire_screenshot_1021x517.jpg]
+&
| title: [Black Box]
| [Black Box screen.png]
+&
| title: [Another Font Chooser Dialog]
| [notFound]
+&
| title: [Dithering]
| [notFound]
+&
| title: [Gradient Spheres]
| [colorGradient_6spheres_wiki16283_screenshot_553x400.jpg]
+&
| title: [Geneva Drive]
| [WikiDbImage Geneva.jpg]
+&
| title: [Vanishing Child]
| [vetter_VanishingChild_wiki16345_left_screenshot_670x327.jpg]
+&
| title: [Gear Animation]
| [WikiDbImage gears.jpg]
+&
| title: [Nice Numbers]
| [notFound]
+&
| title: [Reading BMP image dimensions]
| [notFound]
+&
| title: [Chinese Checkers]
| [WikiDbImage ChineseCheckers.jpg]
+&
| title: [Bulging Square Illusion]
| [WikiDbImage BulgingSquare.jpg]
+&
| title: [Ribbon Graphs]
| [WikiDbImage ribbon.jpg]
+&
| title: [Pulsing Squares]
| [WikiDbImage pulsquare.jpg]
+&
| title: [Benford's Law]
| [notFound]
+&
| title: [Word Chain]
| [Word Chain screen.png]
+&
| title: [Dice]
| [Dice screen.png]
+&
| title: [Cubic Function Explorer]
| [vetter_CubicFunctionExplorer_wiki17383_screenshot_671x459.jpg]
+&
| title: [Unzip in tcl]
| [notFound]
+&
| title: [Crazy Eights]
| [vetter_CrazyEights_screenshot_705x711.jpg]
+&
| title: [NOAA Weather Forecast]
| [notFound]
+&
| title: [Crossword Puzzle Builder]
| [vetter_CrosswordPuzzleBuilder_wiki17662_screenshot_611x549.jpg]
+&
| title: [Solving Logic Puzzles]
| [notFound]
+&
| title: [Cubic equation]
| [notFound]
+&
| title: [A Hypertext Help System]
| [notFound]
+&
| title: [Image Fading]
| [vetter_ImageFading_wiki19875_100_screenshot_326x266.jpg]
+&
| title: [Rotated Text Font]
| [WikiDbImage rotafont.jpg]
+&
| title: [Arbitrary Rectangle Selection]
| [notFound]
+&
| title: [Text2PDF]
| [notFound]
+&
| title: [Parsing PDF]
| [notFound]
+&
| title: [Celtic Braid]
| [vetter_CelticBraid_wiki20337_4sides_screenshot_683x545.jpg]
+&
| title: [Project Euler]
| [notFound]
+&
| title: [Scotch Yoke]
| [WikiDbImage scotchyoke.jpg]
+&
| title: [Tile Table]
| [notFound]
+&
| title: [Grid Debugger]
| [notFound]
+&
| title: [Tk Robots]
| [vetter_TkRobots_gameBoard_screenshot_925x625.jpg]
+&
| title: [High Score Package]
| [High Score Package screen png]
+&
| title: [Tk Robots2]
| [vetter_TkRobots2_gameBoard_screenshot_926x629.jpg]
+&
| title: [WhenIdle]
| [notFound]
+&
| title: [VS Project List Editor]
| [notFound]
+&
| title: [Nonogram]
| [notFound]
+&
| title: [Time Picker]
| [notFound]
+&
| title: [GridLines]
| [notFound]
+&
| title: [Canvas Annotations]
| [WikiDbImage canvasAnnotations_screen.png]
+&
| title: [TkAsciiArt]
| [WikiDbImage TkAsciiArt.png]
+&
| title: [Tk Dali Clock]
| [notFound]
+&
| title: [CryptoAid]
| [WikiDbImage cryptoAid_screen.png]
+&
| title: [TreeView Tooltips]
| [notFound]
+&
| title: [Cribbage Crib Aid]
| [notFound]
+&
| title: [CheckedListBox Widget]
| [notFound]
+&
| title: [ChooseDir]
| [notFound]
+&
| title: [Extensions to Plotchart 2]
| [notFound]
+&
| title: [Pythagoras Tree]
| [notFound]
+&
| title: [Slippy Map Demo]
| [notFound]
+&
| title: [GPX]
| [notFound]
+&
| title: [Word Clock]
| [notFound]
+&
| title: [Mormon Porn]
| [notFound]
+&
| title: [Line Simplification]
| [vetter_LineSimplification_wiki27610_screenshot_807x549.jpg]
+&
| title: [Integer Partition]
| [notFound]
+&
| title: [Bubble Letters]
| [notFound]
+&
| title: [CPU Monitor]
| [notFound]
+&
| title: [Nominatim Demo]
| [vetter_NominatimDemo_wiki37844_screenshot_727x316.jpg]
+&
| title: [Celtic Knot]
| [notFound]
+&
| title: [Reading WEBP image dimensions]
| [notFound]
+&
| title: [EpubCreator]
| [notFound]
+&
| title: [EpubDump]
| [notFound]
+&
| title: [Gmail Filters]
| [notFound]
+&
| title: [Flow Colors]
| [notFound]
+&
| title: [PNG Dump]
| [notFound]
+&
| title: [PNG Decoder]
| [notFound]
+&
| title: [Penrose Tiling]
| [Penrose Tiling screenshot]
+&
| title: [1010!]
| [1010! screenshot2]
+&
| title: [Divisible by 7]
| [7divScreenShot]
+&
| title: [Image Compare]
| [ICompareScreenShot]
+&
| title: [Rubik's Cube Timer]
| [RubiksTimerScreenShot]
+&
| title: [Image Sizes]
| [notFound]
+&
| title: [Photo Crop]
| [Photo Crop Screenshot]
+&
| title: [Continued Fraction]
| [Continued Fraction Screenshot]
+&
| title: [Image Viewer]
| [Image Viewer screenshot]
+&
| title: [Photo Album]
| [photo_album_screenshot]
+&
| title: [Super SymDoodle]
| [super_symdoodle_screen]
+&
| title: [string mapx]
| [notFound]
+&
| title: [Clock of Clocks]
| [clock_of_clocks_image]
+&
| title: [Solomon's Knot]
| [solomon knot screen shot]
+&
| title: [@decorators]
| [notFound]
+&
| title: [Centered Coordinate System]
| [notFound]
+&
| title: [Impossible Triangle]
| [impossible_triangle_image2]
+&
| title: [Tip #288]
| [notFound]
+&
| title: [Tip #508]
| [notFound]
+&
| title: [ao3]
| [notFound]
+&
| title: [ao3ToEpub]
| [notFound]
+&
| title: [Enhanced Expression Syntax]
| [notFound]
+&
| title: [FamFamFam Demo]
| [notFound]

[stevel] testing mail protection - mailto:person@mail.com