Este es otro ejemplo en Word que me parece un poco mas completo...

    ActiveDocument.Shapes.AddTextEffect(msoTextEffect2, "HOLA", "Arial
Black" _
        , 36#, msoFalse, msoFalse, 250.5, 148.1).Select
    Selection.InlineShapes(1).TextEffect.PresetShape = _
        msoTextEffectShapePlainText
    Selection.Copy
    ActiveDocument.Shapes.AddTextEffect(msoTextEffect2, "HOLA", "Arial
Black" _
        , 36#, msoFalse, msoFalse, 250.5, 148.1).Select
    Selection.InlineShapes(1).TextEffect.PresetShape = _
        msoTextEffectShapePlainText
    Selection.InlineShapes(1).Flip msoFlipHorizontal
    Selection.InlineShapes(1).Fill.ForeColor.ObjectThemeColor = _
        wdThemeColorBackground1
    Selection.InlineShapes(1).Fill.ForeColor.TintAndShade = -0.25
    Selection.InlineShapes(1).Fill.Visible = msoTrue
    Selection.InlineShapes(1).Fill.Solid

Armo 2 textos Hola y el que esta mas a la izquierda lo volteo
horizontalmente...

Despues es solo una cuestion de color o gradiente...

Una vez que lo tenes OK... lo grabas como rtf y de ahi al reporte...

Saludos,

Pancho


El 5 de marzo de 2013 15:30, francisco prieto <[email protected]>escribió:

> Walter,
>
> Mira... con esta instruccion en Word 2007 se puede introducir un texto con
> una sombra hacia adelante, como dandole la luz de atras... es cuestion de
> ubicar la sombra donde quieras para hacer el efecto que pretendes...
>
> ActiveDocument.Shapes.AddTextEffect(msoTextEffect2, "Hola", "Arial Black" _
>         , 36#, msoFalse, msoFalse, 261.35, 148.1).Select
>     Selection.InlineShapes(1).TextEffect.PresetShape = _
>         msoTextEffectShapePlainText
>     Selection.InlineShapes(1).Shadow.Type = msoShadow8
>
> Este texto generado en Word se puede guardar en un archivo rtf y luego
> imprimir el mismo como parte de un reporte...
>
> Ya se lo que me vas a decir... muy complicado Pancho... y te voy a
> contestar...
>
> Pero se puede...
>
> Saludos,
>
> Pancho
> Córdoba
>
>
>
> El 5 de marzo de 2013 14:35, Walter Cómito <[email protected]>escribió:
>
>> Amigos como están.****
>>
>> Hay alguna forma de imprimir un texto en espejo en los reportes de vfp.**
>> **
>>
>> ** **
>>
>> Gracias****
>>
>> ** **
>>
>> ** **
>>
>> ** **
>>
>> ** **
>>
>> *Walter Cómito*****
>>
>>  Analista de Sistemas****
>>
>>  MP 0397 C.P.C.I.P.C.****
>>
>> ** **
>>
>> *›* * **[email protected] - [email protected]*****
>>
>> *'** **+54 351 494.4667 / 153.292.707***
>>
>> *þ** **www.softram.com.ar***
>>
>>  ****
>>
>> Q  Si no es necesario, no imprima este correo. Todos somos responsables
>> por el cuidado del medio ambiente.****
>>
>>  ****
>>
>> *NOTA DE CONFIDENCIALIDAD*
>> Este mensaje (y sus anexos) es confidencial y puede contener información
>> de propiedad
>> exclusiva de Walter Cómito (SRS Sistemas). Si usted ha recibido este
>> mensaje por error,
>> por favor comuníquelo inmediatamente a 
>> *walter.comito<[email protected]>
>> **@gmail.com* y tenga la amabilidad
>> de eliminarlo; no deberá copiar el mensaje ni divulgar su contenido a
>> ninguna persona.****
>>
>> Muchas Gracias.****
>>
>> ** **
>>
>> *De:* [email protected] [mailto:[email protected]] *En nombre de *Fabricio
>> Bridera (GUFA)
>> *Enviado el:* lunes, 04 de marzo de 2013 7:54
>> *Para:* GUFA List Member
>> *Asunto:* [GUFA] FOTOS EN REPORTE****
>>
>> ** **
>>
>> Lo que yo uso es grabar en un campo texto el nombre y ruta del archivo y
>> luego lo muestro en el reporte con un control de imagen que referencia con
>> el nombre de archivo que indica el campo.****
>>
>> ** **
>>
>> Con esto, además, reduzco el tamaño de la tabla en caso que sean muchas
>> imágenes.****
>>
>> ** **
>>
>> Saludos****
>>
>> Fabricio A. Bridera****
>>
>> ** **
>>
>> *De:* [email protected] [mailto:[email protected] <[email protected]>] *En
>> nombre de *Walter Cómito
>> *Enviado el:* Sábado, 02 de Marzo de 2013 15:03
>> *Para:* GUFA List Member
>> *Asunto:* [GUFA] FOTOS EN REPORTE****
>>
>> ** **
>>
>> TENIA ENTENDIDO QUE LOS REPORTES NO SOPORTAN CAMPOS BLOB, SOLO GENERAL***
>> *
>>
>> ** **
>>
>> ** **
>>
>> ** **
>>
>> ** **
>>
>> *Walter Cómito*****
>>
>>  Analista de Sistemas****
>>
>>  MP 0397 C.P.C.I.P.C.****
>>
>> ** **
>>
>> *›* * **[email protected] - [email protected]*****
>>
>> *'** **+54 351 494.4667 / 153.292.707***
>>
>> *þ** **www.softram.com.ar***
>>
>>  ****
>>
>> Q  Si no es necesario, no imprima este correo. Todos somos responsables
>> por el cuidado del medio ambiente.****
>>
>>  ****
>>
>> *NOTA DE CONFIDENCIALIDAD*
>> Este mensaje (y sus anexos) es confidencial y puede contener información
>> de propiedad
>> exclusiva de Walter Cómito (SRS Sistemas). Si usted ha recibido este
>> mensaje por error,
>> por favor comuníquelo inmediatamente a 
>> *walter.comito<[email protected]>
>> **@gmail.com* y tenga la amabilidad
>> de eliminarlo; no deberá copiar el mensaje ni divulgar su contenido a
>> ninguna persona.****
>>
>> Muchas Gracias.****
>>
>> ** **
>>
>> *De:* [email protected] [mailto:[email protected] <[email protected]>] *En
>> nombre de *Omar Bellio
>> *Enviado el:* sábado, 02 de marzo de 2013 14:33
>> *Para:* GUFA List Member
>> *Asunto:* [GUFA] FOTOS EN REPORTE****
>>
>> ** **
>>
>> Me parece que tendrías que probar con campos tipo blob…****
>>
>> ** **
>>
>> *De:* [email protected] [mailto:[email protected] <[email protected]>] *En
>> nombre de *Walter Cómito
>> *Enviado el:* viernes, 01 de marzo de 2013 09:01 p.m.
>> *Para:* GUFA List Member
>> *Asunto:* [GUFA] FOTOS EN REPORTE****
>>
>> ** **
>>
>> Hola amigos, necesito imprimir unas fotos en un reporte y estaba viendo
>> en el solution simple de fox que hay algo asi con una imagen grabada en un
>> campo general.****
>>
>> Le hice un apped general ……. Y me guarda un icono representativo de fotos
>> en general, pero no la foto en realidad que quiero mostrar.****
>>
>> Como debería grabar la foto para que salga en el reporte, o si alguien
>> tiene otra solución que me pueda dar una mano.****
>>
>> ** **
>>
>> Gracias****
>>
>> ** **
>>
>> ** **
>>
>> ** **
>>
>> ** **
>>
>> *Walter Cómito*****
>>
>>  Analista de Sistemas****
>>
>>  MP 0397 C.P.C.I.P.C.****
>>
>> ** **
>>
>> *›* * **[email protected] - [email protected]*****
>>
>> *'** **+54 351 494.4667 / 153.292.707***
>>
>> *þ** **www.softram.com.ar***
>>
>>  ****
>>
>> Q  Si no es necesario, no imprima este correo. Todos somos responsables
>> por el cuidado del medio ambiente.****
>>
>>  ****
>>
>> *NOTA DE CONFIDENCIALIDAD*
>> Este mensaje (y sus anexos) es confidencial y puede contener información
>> de propiedad
>> exclusiva de Walter Cómito (SRS Sistemas). Si usted ha recibido este
>> mensaje por error,
>> por favor comuníquelo inmediatamente a 
>> *walter.comito<[email protected]>
>> **@gmail.com* y tenga la amabilidad
>> de eliminarlo; no deberá copiar el mensaje ni divulgar su contenido a
>> ninguna persona.****
>>
>> Muchas Gracias.****
>>
>
>

Responder a