 TBinClipboard (C) S. Tkachenko (svt@system.unicor.ac.ru)
 http://www.crosswinds.net/~svtpro/
 http://www.crosswinds.net/~svtpro/richview.htm (Home of TRichView -
 rich hypertext viewer/editor component)
==============================================================================
 TBinClipboard - component for copying/pasting data in custom formats
 to/from Clipboard.
 This component is FREE.
 For: Delphi 3, Delphi 4 (may be also C++Builder, not tested)
------------------------------------------------------------------------------
 Component:                                                                   
 Properties:                                                                  
 - FormatName - name of your Clipboard format                                 
 Methods:                                                                     
 - function HasFormat: Boolean; -                                             
     Indicates if the Clipboard contains data in format FormatName            
 - procedure Copy(Stream: TStream); -                                         
     Copies data from stream to Clipboard as format FormatName                
 - function Paste(Stream: TStream): Boolean;                                  
     Pastes data from Clipboard, if Clipboard contatins data in format        
     FormatName. If does not, returns False                                   
------------------------------------------------------------------------------
 You can also use functions                                                   
 - BinClipboardHasFormat                                                      
 - BinClipboardCopy                                                           
 - BinClipboardPaste                                                          
 without component                                                            
------------------------------------------------------------------------------
 NOTES:                                                                       
 - BinClipboardCopy,  BinClipboard.Copy set Stream position to the end;       
 - BinClipboardCopy,  BinClipboard.Copy always copy whole Stream data,        
   regardless of Stream.Position                                              
 - BinClipboardPaste, BinClipboard.Paste set Stream position to 0             
 - BinClipboardPaste, BinClipboard.Paste replace current contents in Stream   
 - data in clipboard has addition first 4 bytes - length of data (excluding   
   these 4 bytes)                                                             
 - memory checking tools may report memory leak in BinClipboardCopy;          
   ignore - there is no memory leaks in this component.                       
==============================================================================
                   * * * * * * * * * * * * * * * * * *
               THIS SOFTWARE IS PROVIDED "AS IS" WITHOUT
               WARRANTY OF ANY KIND, EITHER EXPRESSED OR
               IMPLIED. THE USER ASSUMES THE ENTIRE RISK
                 OF ANY DAMAGE CAUSED BY THIS SOFTWARE.

                 IN NO EVENT SHALL THE AUTHOR BE LIABLE
               FOR DAMAGE OF ANY KIND, LOSS OF DATA, LOSS
               OF PROFITS, BUSINESS INTERRUPTION OR OTHER
             PECUNIARY LOSS ARISING DIRECTLY OR INDIRECTLY.
                  * * * * * * * * * * * * * * * * * *