Richtext

[Otto]

Hello Antonio,

For drag and drop to a RichTxt control I would like to distinguish between text and files.

drop a text or email fro outlook


drop a file from explorer


To detect a text drop I watch
GetWindowText( ::hWnd ) and changed the HandleEvent method.
This is working. But I can’t find out in which DATA a file drop is stored.

Could you please help me.


Thanks in advance
Otto



METHOD HandleEvent( nMsg, nWParam, nLParam ) CLASS xTRich
local nRow, nCol, nFlags
do case
case nMsg == WM_NCHITTEST
if ::cCargo = GetWindowText( ::hWnd ) .or. len(ALLTRIM(GetWindowText( ::hWnd )))=0

else
::MButtonDown( nRow, nCol, nFlags )
::cCargo := GetWindowText( ::hWnd )

endif

[Antonio Linares]

Otto,

We are reviewing docs related to your question.

Please expect an answer from us asap,

[Otto]

Hello Antonio,

I think I can find out with

cText1 := ::SaveAsRTF()

but I need the filename and the path.

Is it possible to save the HandleEvent in the

METHOD HandleEvent( nMsg, nWParam, nLParam ) CLASS xTRich

and if cText1 := ::SaveAsRTF() is not an email to post pack or forward the

HandleEvent to a DIALOG which DragAcceptFiles( oDlg:hWnd, .t. ) .

Thanks in advance
Otto