topic-41321

Posts: 6755

Joined: Wed Feb 15, 2012 08:25 PM

Re: Necesito ayuda con Tree
Posted: Thu Jan 20, 2022 11:22 PM

Ramon, tienes el acrobat reader instalado en tu ordenador ?

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

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Necesito ayuda con Tree
Posted: Fri Jan 21, 2022 01:38 AM

Ramón J. wrote:João

Code (fw): Select all Collapse

 @ 0, 205 RICHEDIT5 oMemo VAR cItemText OF oWndData SIZE 300, 100 PIXEL BARBUTTON ;
      ON CHANGE ( cItemText := oMemo:SaveAsRTF(), oBtnSave:Enable(), oMemo:Cargo := .T.,;
                  If( oTree:GetSelected() != nil, oTree:GetSelected():Cargo := cItemText,) )                  
                  
   oMemo:Cargo = .F. // it has not changed   <----- João, esto lo tienes?

Si Ramon, está igual. Ninguno de los dos ejemplos funciona con Borland.

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Ramón J.

Posts: 152

Joined: Mon Feb 13, 2006 08:23 PM

Re: Necesito ayuda con Tree
Posted: Fri Jan 21, 2022 07:36 AM

Buenos días, Cristóbal. Sí, tengo instalado Acrobat Reader DC.

FWH 20.12 BCC7

Ramón J.

Posts: 152

Joined: Mon Feb 13, 2006 08:23 PM

Re: Necesito ayuda con Tree
Posted: Fri Jan 21, 2022 07:57 AM

karinha wrote:

Ramón J. wrote:João

Code (fw): Select all Collapse

 @ 0, 205 RICHEDIT5 oMemo VAR cItemText OF oWndData SIZE 300, 100 PIXEL BARBUTTON ;
      ON CHANGE ( cItemText := oMemo:SaveAsRTF(), oBtnSave:Enable(), oMemo:Cargo := .T.,;
                  If( oTree:GetSelected() != nil, oTree:GetSelected():Cargo := cItemText,) )                  
                  
   oMemo:Cargo = .F. // it has not changed   <----- João, esto lo tienes?

Si Ramon, está igual. Ninguno de los dos ejemplos funciona con Borland.

Saludos.

João, has probado con este código que está antes y desactivado?

Code (fw): Select all Collapse

    @ 0, 25.7 GET oMemo VAR cItemText MEMO OF oWndData SIZE 300, 100 ;
   ON CHANGE ( oBtnSave:Enable(), oMemo:Cargo := .T.,;
                   oTree:GetSelected():Cargo := cItemText )

   //@ 0, 205 RICHEDIT5 oMemo VAR cItemText OF oWndData SIZE 300, 100 PIXEL BARBUTTON ;
   //   ON CHANGE ( cItemText := oMemo:SaveAsRTF(), oBtnSave:Enable(), oMemo:Cargo := .T.,;
   //               If( oTree:GetSelected() != nil, oTree:GetSelected():Cargo := cItemText,) )                  
                  
   oMemo:Cargo = .F. // it has not changed

FWH 20.12 BCC7

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Necesito ayuda con Tree
Posted: Fri Jan 21, 2022 11:01 AM

Ramón, TRABA GENERAL. Muchas gracias.

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

FiveTech Support Forums

Continue the discussion