Power Builder - Clipboard

Sres:

Tengo un RTE con un formato espefico colores y todo lo demas esto lo tengo directamente a WORD con el siguiente codigo

Long ll_RC
OLEObject lole_Word

//tab_1.tabpage_3.rte_1.selecttextall( )
Clipboard (tab_1.tabpage_3.rte_1.copyrtf(FALSE ))

//Crea un nuevo OLEWord
lole_Word = CREATE OleObject
ll_RC =lole_Word.ConnectToNewObject( 'Word.Application' )
IF ll_RC <> 0 THEN
DESTROY lole_Word
RETURN
END IF
//Si se pudo crear el Word se crea y muestra el Documento
lole_Word.Documents.Add()
lole_Word.Selection.Paste()
lole_Word.Application.Visible = True
lole_Word.DisconnectObject()
DESTROY lole_Word

El tema es que quiero que el clipboard quede con el tipo de Doc enriquecido pero no se comos se llama a la API

Function Ulong RegisterClipboardFormat(string lpszFormat) Library 'user32'

Si alguno de los mestro PB sabe please... help me...

Creo que ya estoy casi...

uint TRTF
ulong l_mem

String StrRTF

StrRTF=tab_1.tabpage_3.rte_1.copyrtf(FALSE )

l_mem=Long (StrRTF )

TRTF=RegisterClipboardFormatA("Rich Text Format")

If OpenClipboard(handle(parent)) Then
EmptyClipboard()
SetClipboardData(TRTF, l_mem)
CloseClipboard()
Else
MessageBox("OpenClipboard Failed", of_GetLastError())
End If

Lo que no se es como asignar el string a la funcion SetClipboardData por favor si alguien sabe como

//Declarando estas funciones API

Function boolean OpenClipboard ( &
ulong hWndNewOwner &
) Library "user32.dll"

Function boolean EmptyClipboard ( &
) Library "user32.dll"

Function boolean CloseClipboard ( &
) Library "user32.dll"

Function ulong SetClipboardData ( &
uint uFormat, &
ulong hMem &
) Library "user32.dll"

Function UINT RegisterClipboardFormatA(&
string lpszFormat) Library "user32.dll"