FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour rpreview: como quitar icono de generaci贸n DOC
Posts: 117
Joined: Sun Oct 08, 2017 12:51 PM
rpreview: como quitar icono de generaci贸n DOC
Posted: Fri Apr 05, 2019 08:09 AM

Hola amigos !
Tengo el fwh 17.09 y quisiera saber como quitar el icono de generaci贸n de archivos DOC del rpreview.
Gracias !
Pedro.

Pedro L. Lavallen

San Luis (Capital), Argentina
Posts: 350
Joined: Wed Nov 02, 2005 03:28 PM
Re: rpreview: como quitar icono de generaci贸n DOC
Posted: Fri Apr 05, 2019 10:46 AM

Saludos,

No creo que haya opci贸n para hacerlo sin modificar el rpreview.prg

Puedes modificar el rpreview.prg quitando el boton del DOC y compilarlo con tu aplicaci贸n. Puedes encontrar el prg dentro fivewin\sources\classes (Lo he probado yo y si me lo quita)

Yo he modificado el fichero rpreview.prg por el tema del envi贸 por mail, hacer la barra m谩s grande y lo compilo con mi aplicaci贸n.

Saludos,
Regards,

Jose Luis Alepuz
joseluis@mancomputer.com
www.mancomputer.com
Posts: 117
Joined: Sun Oct 08, 2017 12:51 PM
Re: rpreview: como quitar icono de generaci贸n DOC
Posted: Fri Apr 05, 2019 02:38 PM
Garbi wrote:Saludos,

No creo que haya opci贸n para hacerlo sin modificar el rpreview.prg

Puedes modificar el rpreview.prg quitando el boton del DOC y compilarlo con tu aplicaci贸n. Puedes encontrar el prg dentro fivewin\sources\classes (Lo he probado yo y si me lo quita)

Yo he modificado el fichero rpreview.prg por el tema del envi贸 por mail, hacer la barra m谩s grande y lo compilo con mi aplicaci贸n.


Hola Garbi !
Ser铆a mucho pedir que me mandes tu rpreview modificado ?
lavallen61@hotmail.com
Muy amable !
Pedro L. Lavallen

San Luis (Capital), Argentina
Posts: 117
Joined: Sun Oct 08, 2017 12:51 PM
Re: rpreview: como quitar icono de generaci贸n DOC
Posted: Fri Apr 05, 2019 02:38 PM
Garbi wrote:Saludos,

No creo que haya opci贸n para hacerlo sin modificar el rpreview.prg

Puedes modificar el rpreview.prg quitando el boton del DOC y compilarlo con tu aplicaci贸n. Puedes encontrar el prg dentro fivewin\sources\classes (Lo he probado yo y si me lo quita)

Yo he modificado el fichero rpreview.prg por el tema del envi贸 por mail, hacer la barra m谩s grande y lo compilo con mi aplicaci贸n.


Hola Garbi !
Ser铆a mucho pedir que me mandes tu rpreview modificado ?
lavallen61@hotmail.com
Muy amable !
Pedro L. Lavallen

San Luis (Capital), Argentina
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: rpreview: como quitar icono de generaci贸n DOC
Posted: Fri Apr 05, 2019 03:28 PM
Hola, RPREVIEW.PRG:

Code (fw): Select all Collapse
METHOD BuildButtonBar() CLASS TPreview


     DEFINE TBBUTTON OF oBar WHEN( .F. )        ;  // Aqui
        ACTION ::ExportToMSWord()               ;
        TOOLTIP FWString( "Export to MS Word" ) ;
        MESSAGE FWString( "Export to MS Word" )


Saludos
Jo茫o Santos - S茫o Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: rpreview: como quitar icono de generaci贸n DOC
Posted: Fri Apr 05, 2019 07:17 PM

S贸lo quieres quitar ( desactivar ) ese boton?

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 117
Joined: Sun Oct 08, 2017 12:51 PM
Re: rpreview: como quitar icono de generaci贸n DOC
Posted: Sat Apr 06, 2019 02:37 AM
cnavarro wrote:S贸lo quieres quitar ( desactivar ) ese boton?



si, solo quiero quitarlo
Pedro L. Lavallen

San Luis (Capital), Argentina
Posts: 117
Joined: Sun Oct 08, 2017 12:51 PM
Re: rpreview: como quitar icono de generaci贸n DOC
Posted: Sat Apr 06, 2019 02:49 AM
karinha wrote:Hola, RPREVIEW.PRG:

Code (fw): Select all Collapse
METHOD BuildButtonBar() CLASS TPreview


聽 聽 聽DEFINE TBBUTTON OF oBar WHEN( .F. ) 聽 聽 聽 聽; 聽// Aqui
聽 聽 聽 聽 ACTION ::ExportToMSWord() 聽 聽 聽 聽 聽 聽 聽 ;
聽 聽 聽 聽 TOOLTIP FWString( "Export to MS Word" ) ;
聽 聽 聽 聽 MESSAGE FWString( "Export to MS Word" )


Saludos


Gracias, pero no me funcion贸 con el WHEN (.f.)
Pedro L. Lavallen

San Luis (Capital), Argentina
Posts: 350
Joined: Wed Nov 02, 2005 03:28 PM
Re: rpreview: como quitar icono de generaci贸n DOC
Posted: Sat Apr 06, 2019 07:57 AM
En mi rpreview.prg solo he puesto indicadores de ignoraci贸n de c贸digo para que no aparezca el boton de word :

En mi rpeview.prg para la barra de botones hay un if,else,endif y lo he puesto despu茅s del else

Code (fw): Select all Collapse
聽 聽 聽 聽 聽DEFINE BUTTON oBtn OF oBar ;
聽 聽 聽 聽 聽 聽 MESSAGE FWString( "Send by email as PDF" ) ;
聽 聽 聽 聽 聽 聽 ACTION 聽::SendEmail() ;
聽 聽 聽 聽 聽 聽 TOOLTIP FWString( "Send by email as PDF" )

聽 聽 聽 聽 聽oBtn:hBitmap1 = FWBitmap( "email" )
/*
聽 聽 聽 聽 聽DEFINE BUTTON oBtn OF oBar ;
聽 聽 聽 聽 聽 聽 MESSAGE FWString( "Export to MS Word" ) ;
聽 聽 聽 聽 聽 聽 ACTION 聽::ExportToMSWord() ;
聽 聽 聽 聽 聽 聽 TOOLTIP FWString( "Export to MS Word" ) ;
聽 聽 聽 聽 聽 聽 WHEN ::CanExportToWord

聽 聽 聽 聽 聽oBtn:hBitmap1 = FWBitmap( "Word2" )
*/
聽 聽 聽 聽 聽DEFINE BUTTON oBtn OF oBar ;
聽 聽 聽 聽 聽 聽 MESSAGE FWString( "Export to Excel" ) ;
聽 聽 聽 聽 聽 聽 ACTION ::ExportToMSExcel() ;
聽 聽 聽 聽 聽 聽 TOOLTIP FWString( "Export to Excel" ) ;
聽 聽 聽 聽 聽 聽 WHEN ::CanExportToExcel

聽 聽 聽 聽 聽oBtn:hBitmap1 = FWBitmap( "Excel" )
Saludos,
Regards,

Jose Luis Alepuz
joseluis@mancomputer.com
www.mancomputer.com

Continue the discussion