Hello!
With this code:
I get:
With this code:
#include "FiveWin.ch"
#include "RichEdit.ch"
//----------------------------------------------------------------------------//
FUNCTION MAIN()
LOCAL oDlg, oRTF, hDLL
local cRTF := ""
SetResDebug()
hDLL := LoadLibrary( "Riched20.dll" )
DEFINE DIALOG oDlg FROM 1, 1 TO 22, 75 ;
TITLE "Test"
@ 3, 2 RICHEDIT oRTF VAR cRTF PIXEL SIZE 100, 100 OF oDlg
ACTIVATE DIALOG oDlg
FreeLibrary( hDLL )
FERASE("CHECKRES.TXT")
CHECKRES()
winExec("notepad .\checkres.txt")
return(0)
//----------------------------------------------------------------------------//I get:
03/23/11 00:58:53: BRUSH,1480,TDIALOG:SETCOLOR(2477)->TDIALOG:NEW(196)->MAIN(17)
03/23/11 00:58:53: FONT,1496,TRICHEDIT:NEW(307)->MAIN(19)
03/23/11 00:58:53: FONT,1700,TDIALOG:GETFONT(2751)->TDIALOG:INITIATE(633)->TDIALOG:HANDLEEVENT(917)->DIALOGBOXINDIRECT(0)->TDIALOG:ACTIVATE(273)->MAIN(21)
Best Regards,
Ruediger Alich
---
HMG 3.1.3 | FTDN/FWH 13.12 | Harbour 3.2 | BCC/MinGW | Windows XP/Vista/7/8/10 (32/64-Bit), Wine (Linux/Mac) - started 1999 with FW, 1989 with Clipper
Ruediger Alich
---
HMG 3.1.3 | FTDN/FWH 13.12 | Harbour 3.2 | BCC/MinGW | Windows XP/Vista/7/8/10 (32/64-Bit), Wine (Linux/Mac) - started 1999 with FW, 1989 with Clipper