Put data from file to the clipboard in all available formats?

[piterek]

Hi...

How to put data to clipboard in all available formats?

 

I use _ClipBoard_GetData to save all formats data to files but when I try to put them again to clipboard using _ClipBoard_SetData, I have available  only the last data format which I used. After that when I try put this data to "Microsoft Word" I get only "Cleaned" text format. 

When I the set last format as a HTML and I put to "Micorosft Word" everything fine, but I can't put to Notepad (I get empty value). 

 

When I doing this same with _ClipBoard_GetDataEx to save data to memory object (not to file) and put them again using _ClipBoard_SetDataEx all data formats are available...

 

Help? 

 

[BrewManNH]

Post the code you're using, without knowing what you're doing and how we're only guessing.

[piterek]

Sorry...

expandcollapse popup

#include <Clipboard.au3>
#include <Array.au3>

$_ClipData = _ClipGet()
_ArrayDisplay($_ClipData)
_ClipEmpty()
_ClipPut($_ClipData)
$_ClipData = _ClipGet()
_ArrayDisplay($_ClipData)

Func _ClipGet()
    Local $RECORDS[1][2]
    $RECORDS[0][0] = 0
    Local $iFormat, $Errors = 0, $iData

    Do
        If Not _ClipBoard_Open(0) Then Return -1
        $iFormat = _ClipBoard_EnumFormats ($iFormat)
        _ClipBoard_Close()
        If $iFormat <> 0 Then
            ReDim $RECORDS[UBound($RECORDS) + 1][2]
            $RECORDS[UBound($RECORDS) - 1][0] = $iFormat
            $RECORDS[UBound($RECORDS) - 1][1] = _ClipBoard_GetData($iFormat)
            $RECORDS[0][0] += 1
        EndIf
    Until $iFormat = 0
    Return $RECORDS
EndFunc

Func _ClipPut($_ClipArray)
    If Not IsArray($_ClipArray) Then Return -1
    For $Step = 1 To $_ClipArray[0][0]
        _ClipBoard_SetData($_ClipArray[$Step][1], $_ClipArray[$Step][0])
    Next
EndFunc

Func _ClipEmpty()
    _ClipBoard_Open(0)
    _ClipBoard_Empty()
    _ClipBoard_Close()  
EndFunc

 

When I copy data from a website I receives formats: 13, 493811, 16, 1, 7

 

When I re-paste the data and get the data again receives formats 4, 16, 1, 13.

Edited August 14, 2013 by piterek