Copy beliebigen String ins Clipboard

[MaddinR]

Hallo Leute

Ich habe mir heute aus dem Web das Source-Beispiel zum Kopieren rausgesucht und erfolgreich in mein Programm eingebaut. Es handelt sich um das Beispiel mit mehreren notwendigen Funktionen, über den Umweg eines leeren Writer-Dokuments:

Code: Alles auswählen

Sub TextToClipboard( ByVal cText As String )
End Sub

Sub ClipboardCopy( oDocumentFrame )
End Sub

Sub SelectAll( oDocumentFrame )
End Sub

Sub DocumentDispatch( ByVal oDocumentFrame As Object,_
End Sub

Function GetDocumentFrame( oDoc As Object ) As Object
entFrame() = oFrame
End Function

Also, es funktioniert prima... nur so richtig elegant scheint mir das nicht zu sein. Gibts heute schon einfachere Möglichkeiten? Mit Code, der weniger aufwendig ist?

vg, Maddin