Formatos word en richedit
 

Hola amigos del foro.
A ver si pueden ayudarme Oootra vez.

Lo que quiero hacer ésta vez es abrir en un richedit un archivo word o rtf manteniendo los formatos originales de negrita, subrayado, tipo de fuente etc.

Estuve chequeando un poco los hilos pero generalmente se habla de pasar el formato de un richedit a otro y no es lo que quiero.

Desde ya gracias....

Creo recordar que si abres un rtf ya se ve con los tipos de letras, tamaños, etc.

Si el archivo de "word" lo has guardado en formato RTF, no deberías tener problemas en abrirlo.

Hola.

Como ya te comentaron Casimiro y Neftali, si el archivo se guarda en formato .RTF el TRichEdit leerá, mostrará y guardará con los formatos fijados (fuentes, estilos, alineación, etc).

Saludos.

Selección de un memo en 1ra línea Visible
 

Perdón por la demora en entrar nuevamente al foro.
Efectivamente como todos dijeron el RichEdit reproduce los formatos de las fuentes en Word.

Les pregunto (si me dicen que abra un nuevo hilo lo hago) cómo hago para que un texto seleccionado en un memo aparezca en la primera linea visible de ese memo. No se si me explico.

Acá les dejo el código como lo tengo hasta ahora donde "cita" es un TEdit.

Con este código viasualizo el memo y en la última línea visible de ese memo lo selecionado. Yo quisiera que esa lección quede en la primera línea que se ve del memo.

Gracias a todos.

No, no hemos dicho eso ;) porque no es así. Hemos dicho el formato RTF. Ya que el formato de word es el DOC y ese no se puede reproducir en un memo.

Para tu otra pregunta es mejor que crees un nuevo hilo, no solamente por nuestras normas, sino también porque aquí nadie se va a enterar que has preguntado eso.

Hola sac.

Código Delphi [-]
  Memo1.Lines.Insert(0, Copy(Memo1.Text, Pos(Cita.text, Memo1.Text), Length(Cita.Text)));

Saludos.

Ahora si....
 

Ecfisa gracias era lo que necesitaba había probado y no funcionaba lo mio.
Otra vez gracias.

Error
 

Ops perdón ecfisa pero no es lo que esperaba. Aplicando tu respuesta en realidad lo que hace es una copia del texto seleccionado en la primera línea.

Lo explico con un ejemplo:
Tengo un archivo de texto con unas 30 lineas.
Lo que deseo encontrar se ubica en la linea 18.
Supongamos que el Memo tiene un tamaño donde caben 10 líneas.

Lo que yo necesitaba era que al hallar la selección, la posicion del cursor, lo seleccionado, aparezca en la linea 1 que se ve en el memo y sea lo primero que se lee pero sin cortar, sin copiar etc.

Hola sac.

No estoy seguro de entenderte, a ver si lo que buscas es esto...

Código Delphi [-]
  if Pos(Cita.Text, Memo1.Text) <> 0 then
    Memo1.Text:= Cita.Text + Memo1.Text;

Saludos.