FiveTech Software tech support forums

mantonio_08
Un saludo cordial
Lo que ocurre Antonio es que con oRichEdit:SetCharFormat() se invoca el dialogo que trae las fuentes Propias de
Window, lo que se requiere realmente es que el usuario pueda elegir el color de la fuente antes de editar o abrir el texto

Si tienes una idea te la ...

no seria mas sencillo que el usuario elijiera el color,,, jajajaj como en word....


uso esto si te interesa::

oRichEdit:SetCharFormat()

me cuentas,,, nos vemos,,

FELICES FIESTAS

mantonio_08

Un saludo cordial para ti y tu grupo
Acabo de llegar pues estaba fuera en la ciudad de Manizales ...

Jairo,

En este caso, Antonio lo pone para indicar que ahí irá el color del texto y nClrBack es para indicar que ahí irá el color que se utilizará como fondo.

*-----------------------------------------------------------------------------

Willian

Gracias por tu respuesta, como puedes ver ...

jaba wrote:

Antonio Linares wrote:Jairo,

Has probado a usar oRichEdit:SetColor( nClrText, nClrBack ) ?

*/--------------------------------------


Antonio

Gracias por tu orientacion ahora mismo lo intentare

Jairo

Antonio

La variable nClrText es un valor RGB ?
Disculpa mi desconocimiento

Jairo

Antonio Linares wrote:Jairo,

Has probado a usar oRichEdit:SetColor( nClrText, nClrBack ) ?

*/--------------------------------------


Antonio

Gracias por tu orientacion ahora mismo lo intentare

Jairo

Antonio

Un saludo cordial para usted.

Respecto a la clase Richedit, el color del texto por defecto es el negro, como lo puedo cambiar?

Gracias de antemano y mis deseos de una navidad llena de gozo y paz junto con los que mas amas

Cordialmente

Ing Jairo Barbosa

Hola Jairo

a mi me pasaron este dato, quizas te sirva


oRich = TRichEdit():Redefine( 101, { || "" }, oDlg )
oRich:LoadFromRTFFile(xfileRtf ) && Lee el archivo Rtf

* Cambio de color
oRich:bGotFocus:= {||oRich:SetBkGndColor(nRGB(0,100,250)) }
oRich:bLostFocus:= {||oRich:SetBkGndColor(nRGB(255 ...

Hola Jairo

a mi me pasaron este dato, quizas te sirva


oRich = TRichEdit():Redefine( 101, { || "" }, oDlg )
oRich:LoadFromRTFFile(xfileRtf ) && Lee el archivo Rtf

* Cambio de color
oRich:bGotFocus:= {||oRich:SetBkGndColor(nRGB(0,100,250)) }
oRich:bLostFocus:= {||oRich:SetBkGndColor(nRGB(255 ...

Hola foro
Saludo cordial
y mis mejores deseos de bienestar para todos en esta navidad

Antonio
Como Cambio el color por defecto del texto en richedit?

Gracias

Jairo Barbosa

[quote="Antonio Linares"]Jairo,

Revisa fwh/samples/TestRtf.prg gracias[/quot

Gracias por tu respuesta... si ahi esta la manera de hacerlo,es una muestra muy bien argumentada tiene de todo.

Cordialmente

Jairo Barbosa

Hola Foro
Reciban un cordial saludo

Antonio

Testrich.prg enseña como emplear richedit desde recursos, Como se hace desde codigo o para encajarlo en una ventana?

Gracias nuevamente

Cordialmente

Jairo Barbosa

Saludos para el Foro

Alguien me puede indicar como coloco una imagen en una ventana MDI

Cordialmente

Jairo Barbosa


Yo lo hago de la manera siguiente. Espero te sirva.

Function Main()
local oBmp

DEFINE BITMAP oBmp file ".\MiBmp.bmp"
...
...
oWnd:bPainted := { | hDC | PongaBmp( hDC , oBmp ...

Hola amigo.
Prueba lo siguiente:

DEFINE BRUSH oBrush1 RESOURCE "IMAGEN" // Defines la imagen



DEFINE WINDOW oWnd1 MDICHILD OF oWnd BRUSH oBrush1 ICON "A_ICONO1";
TITLE "ABM de clientes";
VSCROLL HSCROLL


Nota: La imagen está dentro de una DLL de recursos, dentro de un RC es lo mismo ...

Saludos para el Foro

Alguien me puede indicar como coloco una imagen en una ventana MDI

Cordialmente

Jairo Barbosa

Jairo,

Esta funcion es muy rapida:

// nFrom hay que pasarlo por referencia "@" y empieza valiendo 1

function ExtractLine( cText, nFrom )

local cLine, nAt

nAt := At( CRLF, SubStr( cText, nFrom ) )

if nAt > 0
cLine := Substr( cText, nFrom, nAt - 1 &#41 ...