Xailer & OZ Software

Buenas tardes,
Tengo dos TRichEdit en una forma y quiero pasar varias veces el contenido
del primero al segundo pero insertando un salto de pagina entre cada uno,
tengo el siguiente codigo
::oRichEdit2:insertText(::oRichEdit1:getRTF())
::oRichEdit2:insertpagebreak()
El problema es que al darle un preview al archivo, me pone muchas paginas en
blanco al inicio y luego ya los textos sin separacion entre ellos, como que
esta poniendo primero todos los saltos de pagina.
Que es lo que tengo mal?
Saludos y Gracias
Margarita Valdez

Margarita,
> Buenas tardes,
> Tengo dos TRichEdit en una forma y quiero pasar varias veces el contenido
> del primero al segundo pero insertando un salto de pagina entre cada uno,
> tengo el siguiente codigo
>
> ::oRichEdit2:insertText(::oRichEdit1:getRTF())
> ::oRichEdit2:insertpagebreak()
>
> El problema es que al darle un preview al archivo, me pone muchas paginas
> en blanco al inicio y luego ya los textos sin separacion entre ellos, como
> que esta poniendo primero todos los saltos de pagina.
Prueba a añadir un :SetSel( -1, -1 ) antes de cada llamada a
:InsertPageBreak(). Algo así:
::oRichEdit2:insertText(::oRichEdit1:getRTF())
::oRichEdit2:SetSel( -1, -1 )
::oRichEdit2:insertpagebreak()
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

Funciono muy bien, muchas gracias.
Saludos!
Margarita Valdez
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:46a87408$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Margarita,
>
>> Buenas tardes,
>> Tengo dos TRichEdit en una forma y quiero pasar varias veces el contenido
>> del primero al segundo pero insertando un salto de pagina entre cada uno,
>> tengo el siguiente codigo
>>
>> ::oRichEdit2:insertText(::oRichEdit1:getRTF())
>> ::oRichEdit2:insertpagebreak()
>>
>> El problema es que al darle un preview al archivo, me pone muchas paginas
>> en blanco al inicio y luego ya los textos sin separacion entre ellos,
>> como que esta poniendo primero todos los saltos de pagina.
>
> Prueba a añadir un :SetSel( -1, -1 ) antes de cada llamada a
> :InsertPageBreak(). Algo así:
>
> ::oRichEdit2:insertText(::oRichEdit1:getRTF())
> ::oRichEdit2:SetSel( -1, -1 )
> ::oRichEdit2:insertpagebreak()
>
>
> --
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
> http://www.xailer.info
>