FiveTech Software tech support forums

Dear Antonio,
thank you. I thought similar to the RTF control (C:\FWH\source\classes\fget.prg).

@ 0,155 FORMAT GET oFGet1 VAR cTxt OF oWnd;
SIZE 360,40 PIXEL

Best regards,
Otto

for "rtf" RichEdit
for "gtf" FGet (FORMAT GET)
for "multiline text" MGET ( GET ..... MEMO )
for "single line text" Normal GET

FGET rara vez se usa, pero les aseguro que es excelente y de una calidad maravillosa. Para probar su potencia, vea estos ejemplos de \samples: FGET is rarely used, but I assure you it is excellent and of wonderful quality. ...

FGET:

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=19416&p=102300&hilit=memo+readonly&sid=ef2ada9622dfe801c9bb2b806d7245e7&sid=aaa963e72dd94acb1a5e1cffaa04c949#p102300

... but that helps only for new text How to change to overwrite mode. The normal get works. Works only on a normal get READINSERT( .F. ) I tested FGET where overwrite works REDEFINE FORMAT GET oGet[4] VAR cText1 ID 210 OF oFld:aDialogs[ 1 ] UPDATE FONT oFontSys http://www.pflegeplus.com/IMAGES/Overwrite1.jpg ...

... referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|TRICHEDI Error: Unresolved external '_HB_FUN_HIDECARET' referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|FGET Error: Unresolved external '_HB_FUN_DESTROYCARET' referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|FGET Error: Unresolved external '_HB_FUN_CARETFLINE' ...

Günther,

I missed it.

Already implemented for next FWH 17.03

thanks for the reminder!

Antonio, have you seen this?

Antonio, on Formatget-Class (method default()) this should be changed: if ::oFont == nil     if ::oWnd == nil        ::oFont = TFont():New()     else        if ::oWnd:oFont != nil       ::SetFont( ::oWnd:oFont )     //Change           //::oFont = ::oWnd:oFont        else     ...

Tendrás que añadir un parámetro más de READONLY para añadírselo al código y definición del fget o memo en la function existente Navarro, es en lo que pense, pero queria ver si ya lo habian hecho de alguna manera, lo otro pendiente tambien sera copiar el .prg a mi sistema ...

Tendrás que añadir un parámetro más de READONLY para añadírselo al código y definición del fget o memo en la function existente

... [Source\Classes\dlgfind.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Classes\edit.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Classes\fget.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Classes\fline.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Classes\folder.prg] MYC_FLAGS ...

... "Obj\database.obj" "Obj\dde.obj" "Obj\dialog.obj" "Obj\dlgfind.obj" "Obj\edit.obj" "Obj\fget.obj" "Obj\fline.obj" "Obj\folder.obj" "Obj\font.obj" "Obj\group.obj" "Obj\icon.obj" "Obj\iget.obj" ...

... Cancel to exit" ; ID 912 OF oDlg UPDATE Get with Memo/Text is only meant for editing pure text. MemoEdit() function uses Get or RichEdit or FGet depending on the requirement to edit text, rtf or gtf.

... Fecha: 03 de Noviembre del 2011 Lima - Perú Pendiente: 1. Convertir cBody a texto con formato * */ #include "FiveWin.ch" *#include "FGet.ch" #include "Fileio.ch" * #define WS_3DLOOK 4 #define CLR_HBROWN nRGB( 205, 192, 176 ) #define CLR_NBLUE nRGB( 142, 171, 194 ) ...