gracias OZ, veo que me estaba dando contra la pared.
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/
"Ignacio Ortiz de Zúñiga" <
NoName@xailer.com> escribió en el mensaje
news:4559f08e$[email=
1@news.xailer.com...]
1@news.xailer.com...[/email]
> Ramón,
>
> Efectivamente. Una vez llegado al Preview, el documento es imposible
> modificarlo.
>
> Un saludo
>
> --
> Ignacio Ortiz de Zúñiga
>
http://www.xailer.com
> "ramonzea" <
zeasoftware@hotmail.com> escribió en el mensaje
> news:[email=
4559ee45@news.xailer.com...]
4559ee45@news.xailer.com...[/email]
>> Te explico mas detalladamente:
>>
>> Quiero aplicar una imagen sobre el documento en la ventana PreView, pero,
>> como es la primera vez que llegaba a este punto, pense que seria mas
>> sencillo.
>>
>> Entonces una vez llegado al preview, el documento en él ya no puede ser
>> modificado?
>>
>> Si es asi, para buscar otra manera de obtener lo que busco.
>>
>> Gracias de nuevo.
>> --
>> Ramón Zea
>>
ramonzea@yahoo.com
>>
zeasoftware@hotmail.com
>>
zeasoft.movil@hotmail.com
>>
http://www.paginasprodigy.com/zeasoft/
>> "Ignacio Ortiz de Zúñiga" <
NoName@xailer.com> escribió en el mensaje
>> news:4559eb8f$[email=
1@news.xailer.com...]
1@news.xailer.com...[/email]
>>> Ramón,
>>>
>>> No se lo que quieres hacer, pero desde luego que el documento está
>>> terminado cuando se lanza el Preview, no puede ser de otra forma. Y por
>>> lo tanto no tiene ningún TCanvas activo.
>>>
>>> Un saludo
>>>
>>> --
>>> Ignacio Ortiz de Zúñiga
>>>
http://www.xailer.com
>>> "ramonzea" <
zeasoftware@hotmail.com> escribió en el mensaje
>>> news:[email=
4559e7d7@news.xailer.com...]
4559e7d7@news.xailer.com...[/email]
>>>> Gracias OZ, solo una ultima pregunta:
>>>> El documento creado entre StartDoc y EndDoc, ya no esta disponoble una
>>>> vez que llegamos al Preview?
>>>>
>>>> Por que segun lo que estoy analizando ese es mi problema, que antes del
>>>> preview, ya hice un endDoc, y por lo cual en Canvas me marca que es =
>>>> Nil.
>>>>
>>>> Gracias.
>>>> --
>>>> Ramón Zea
>>>>
ramonzea@yahoo.com
>>>>
zeasoftware@hotmail.com
>>>>
zeasoft.movil@hotmail.com
>>>>
http://www.paginasprodigy.com/zeasoft/
>>>> "Ignacio Ortiz de Zúñiga" <
NoName@xailer.com> escribió en el mensaje
>>>> news:4559c326$[email=
1@news.xailer.com...]
1@news.xailer.com...[/email]
>>>>>
>>>>> //---------------------------------------------------------- ----------------
>>>>>
>>>>> METHOD Preview( nShowMode, lModal, oParent ) CLASS XPrinter
>>>>>
>>>>> local oForm, oPreview
>>>>> local lRet
>>>>>
>>>>> If Empty( ::oPreviewDC ) .OR. Len( ::oPreviewDC:aEmf ) == 0
>>>>> return .f.
>>>>> Endif
>>>>>
>>>>> if Valtype( lRet := ::OnPreview( nShowMode, lModal ) ) == "L" .and.
>>>>> !lRet
>>>>> return .t.
>>>>> endif
>>>>>
>>>>> DEFAULT lModal TO ::lPreviewModal
>>>>> DEFAULT nShowMode TO ::nPreviewShowMode
>>>>> DEFAULT oParent TO Application:oMainForm
>>>>>
>>>>> WITH OBJECT oForm := TForm():New( oParent )
>>>>> :cText := ::cJobTitle
>>>>> :nWidth := 800
>>>>> :nHeight := 600
>>>>> :OnClose := {|| ::oPreviewDC:Destroy() }
>>>>> :Create()
>>>>> END WITH
>>>>>
>>>>> WITH OBJECT oPreview := TPreviewControl():New( oForm )
>>>>> :oPreviewDC := ::oPreviewDC
>>>>> :nLeft := 0
>>>>> :nTop := 0
>>>>> :nAlign := alCLIENT
>>>>> :Create()
>>>>> END
>>>>>
>>>>> If lModal
>>>>> oForm:ShowModal( nShowMode, .T. )
>>>>> else
>>>>> oForm:Show( nShowMode, .t.)
>>>>> Endif
>>>>>
>>>>> return .t.
>>>>>
>>>>> --
>>>>> Ignacio Ortiz de Zúñiga
>>>>>
http://www.xailer.com
>>>>> "ramonzea" <
zeasoftware@hotmail.com> escribió en el mensaje
>>>>> news:[email=
4559be29@news.xailer.com...]
4559be29@news.xailer.com...[/email]
>>>>>> gracias OZ, pero en realidad lo que me seria util, segun mis pobres
>>>>>> conocimientos, seria el methodo entero, vaya, esto:
>>>>>>
>>>>>> Method Preview(:::) Class TPrinter
>>>>>> //el cuerpo del preview
>>>>>> //esto para ver donde podria acomodar mi objeto que requiero llegue a
>>>>>> ser visible
>>>>>> //en el TForm del preview
>>>>>> ::::
>>>>>>
>>>>>> TPreviewControl():New() ::::::::::
>>>>>>
>>>>>> ::::
>>>>>> return ( :::: )
>>>>>>
>>>>>> no me imagino como seria el codigo del metodo en si.
>>>>>>
>>>>>> Gracias de nuevo.
>>>>>> --
>>>>>> Ramón Zea
>>>>>>
ramonzea@yahoo.com
>>>>>>
zeasoftware@hotmail.com
>>>>>>
zeasoft.movil@hotmail.com
>>>>>>
http://www.paginasprodigy.com/zeasoft/
>>>>>> "Ignacio Ortiz de Zúñiga" <
NoName@xailer.com> escribió en el mensaje
>>>>>> news:4559ba00$[email=
1@news.xailer.com...]
1@news.xailer.com...[/email]
>>>>>>> Ramón,
>>>>>>>
>>>>>>> Printer:Preview( nShowmode, lModal, oParent )
>>>>>>>
>>>>>>> Un saludo,
>>>>>>>
>>>>>>> --
>>>>>>> Ignacio Ortiz de Zúñiga
>>>>>>>
http://www.xailer.com
>>>>>>> "ramonzea" <
zeasoftware@hotmail.com> escribió en el mensaje
>>>>>>> news:[email=
4559aee2@news.xailer.com...]
4559aee2@news.xailer.com...[/email]
>>>>>>>> existe la posibilidad me informen como se hace el llamado de
>>>>>>>> Preview en
>>>>>>>> tPrinter?,
>>>>>>>> para ver si existe la posibilidad que resuelva mi problema, ya que
>>>>>>>> me es muy
>>>>>>>> necesario usarlo a como lo he expuesto.
>>>>>>>>
>>>>>>>> --
>>>>>>>> Ramón Zea
>>>>>>>>
ramonzea@yahoo.com
>>>>>>>>
zeasoftware@hotmail.com
>>>>>>>>
zeasoft.movil@hotmail.com
>>>>>>>>
http://www.paginasprodigy.com/zeasoft/
>>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>
>>>>>>
>>>>>
>>>>>
>>>>>
>>>>
>>>>
>>>
>>>
>>>
>>
>>
>
>
>