Un ejemplo de TRichedit por favor

[jmartial]

Hola,

Necesitaría un ejemplo por código sin recursos, de un Diálogo y dentro un control TRichedit y que funcione.

Lo he intentado de todas las maneras y no funciona.

Sólo me gustaría ver que un ejemplo tan simple funciona, o en su defecto, cuales son los requisitos para que funcione.

Un Saludo,
Joaquín

[Antonio Linares]

Joaquín,

Code: Select all

#include "Fivewin.ch"
#include "richedit.ch"

function Main()

   local oDlg, cText := "Esto es una prueba"
   local hRichDLL := LoadLibrary( "riched20.dll" )
    
   DEFINE DIALOG oDlg SIZE 300, 200

   @ 1, 1 RICHEDIT cText SIZE 140, 80

   ACTIVATE DIALOG oDlg CENTERED
   
   FreeLibrary( hRichDLL )

return nil

Usa las librerías que te hemos enviado por email.

[Joel Andujo]

Master Antonio, aprovechando Yo tengo FW24 recien lo recompile con xHarbour, pero no me funciona la RichEdit, con Harbour si me funcionaba
me tira este error al momento de linkear :

Unresolved external 'HB_FUN_TRICHEDIT

y efectivamente al momento de recompilar mis fuentes de FW24 no tengo la TRICHEDIT.prg, lo unico que tengo es ..\classes\xObj\TRichEdi.hrb
Esto me podria servir para incluirlo en mi recompilacion con xHarbour

Saludos y gracias de antemano
Joel Andujo

[Antonio Linares]

Joel,

El fichero hrb no te sirve. El nombre del fichero es trichedi.prg, mira a ver si lo tienes.

[Joel Andujo]

Master ese es el problema no tengo el fuente y deberia de tenerlo
tengo FW24

Joel

[Antonio Linares]

Joel,

La clase TRichEdit ha cambiado mucho desde la version 2.4, además requiere de un módulo en C interno que no se proporciona con FWH, sólo en la librería.