hola a todos!
tengo un richedit y quiero pasar mi texto a word conservando el tamaño de la fuente.
uso esto codigo para hacerlo, pero mi problema es que de esta forma me cambia el tamaño de todo el texto, tomando el tamaño de el ultimo cambio.
Código:
var
WordApp, Document, Selection, word: OleVariant;
I: integer;
begin
WordApp := CreateOleObject('Word.Application');
Document := WordApp.Documents.Open('C:\doc1');
wordapp.visible:= true;
Selection := WordApp.Selection;
word:= WordApp.ActiveDocument.ActiveWindow.ActivePane.Selection;
word.font.size:= richedit1.SelAttributes.Size;
Selection.TypeText(RichEdit1.Text);
no me dan un ejemplo de como poder hacer una busqueda del tamaño de cada palabra para poder pasarla a word?
desde ya muchas gracias.