Hi Antonio,
are you thinking about implementing "PARAFORMAT" indenting in richedit control ?
Ciao
Gianni
Hi Antonio,
are you thinking about implementing "PARAFORMAT" indenting in richedit control ?
Ciao
Gianni
Gianni,
the structure PARAFORMAT is already supported, see method ::SetParaFormat ()
Stefan,
where is ::SetParaFormat () method?
I cannot found it in my Trichedi.prg
My version is FWH 8.05
Regards
METHOD SetAlign( nAlign ) CLASS TRichEdit
DEFAULT nAlign := PFA_LEFT
RESetParaFormat( ::hWnd, nAlign )
::Change()
return niltypedef struct _paraformat {
UINT cbSize;
DWORD dwMask;
WORD wNumbering;
WORD wReserved;
LONG dxStartIndent;
LONG dxRightIndent;
LONG dxOffset;
WORD wAlignment;
SHORT cTabCount;
LONG rgxTabs[MAX_TAB_STOPS];
} PARAFORMAT;
Gianni wrote:Stefan,
where is ::SetParaFormat () method?
I cannot found it in my Trichedi.prg

HB_FUNC( RESETPARAFORMAT )
{
PARAFORMAT pf;
memset( ( char * ) &pf, 0, sizeof( pf ) );
pf.cbSize = sizeof( pf );
pf.dwMask = PFM_ALIGNMENT;
pf.wAlignment |= hb_parnl( 2 );
hb_retl( SendMessage( ( HWND ) hb_parnl( 1 ), EM_SETPARAFORMAT, 0,
( LPARAM ) &pf ) );
}Antonio Linares wrote:Gianni,
Grids seem ok here:
Antonio Linares wrote:You can easily modify RESETPARAFORMAT() to support those struct members:
HB_FUNC( RESETPARAFORMAT ) { PARAFORMAT pf; memset( ( char * ) &pf, 0, sizeof( pf ) ); pf.cbSize = sizeof( pf ); pf.dwMask = PFM_ALIGNMENT; pf.wAlignment |= hb_parnl( 2 ); hb_retl( SendMessage( ( HWND ) hb_parnl( 1 ), EM_SETPARAFORMAT, 0, ( LPARAM ) &pf ) ); }
Gianni,
We are going to provide new enhancements for Class TRichEdit, and we will probably implement this too ![]()
Great!!!
I will waiting for it.
Many thanks
Ciao
Gianni