Public Declare Function RTFfrom_file Lib "ecncrichink.dll" (ByVal hwnd As Long, ByVal filename As String) As Long 
Public Declare Function RTFfrom_string Lib "ecncrichink.dll" (ByVal hwnd As Long, ByVal rtf_string As String, ByVal str_size As Long) As Long 
Public Declare Function LocalAlloc Lib "Coredll" (ByVal wFlags As Long, ByVal wBytes As Long) As Long 
Public Const LMEM_ZEROINIT = &H40 
Public Declare Function LocalFree Lib "Coredll" (ByVal hMem As Long) As Long 
Public Declare Sub MemMove Lib "Coredll" Alias "memmove" _ 
                (ByVal Destination As Long, _ 
                ByVal Source As String, _ 
                ByVal Length As Long) 
Public Declare Function LoadLibrary Lib "Coredll" Alias "LoadLibraryW" (ByVal lpLibFileName As String) As Long 
Public Declare Function InitRichInkDLL Lib "richink.dll" () As Long 
Public Declare Function CreateWindowEx Lib "Coredll" Alias "CreateWindowExW" _ 
(ByVal dwExStyle As Long, _ 
ByVal lpClassName As String, _ 
ByVal lpWindowName As String, _ 
ByVal dwStyle As Long, _ 
ByVal x As Long, _ 
ByVal y As Long, _ 
ByVal nWidth As Long, _ 
ByVal nHeight As Long, _ 
ByVal hWndParent As Long, _ 
ByVal hMenu As Long, _ 
ByVal hInstance As Long, _ 
ByRef lpParam As Long) As Long 
Public Declare Function ShowWindow Lib "Coredll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long 
Public Const ES_READONLY = &H800& 
Public Const ES_MULTILINE = &H4& 
Public Const WM_USER = &H400 
Public Const EM_STREAMIN = 1097 
Public Const CW_USEDEFAULT = &H80000000 
Public Const WS_EX_TOPMOST = &H8& 
Private Const WS_HSCROLL = &H100000 
Private Const WS_VSCROLL = &H200000 
Public Declare Function UpdateWindow Lib "Coredll" (ByVal hwnd As Long) As Long