Necesito ayuda con Tree

[cnavarro]

Ramon, tienes el acrobat reader instalado en tu ordenador ?

[karinha]

João

Code: Select all  Expand view

@ 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.

[Ramón J.]

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

[Ramón J.]

João

Code: Select all  Expand view

@ 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: Select all  Expand view

   @ 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      

[karinha]

Ramón, TRABA GENERAL. Muchas gracias.

Saludos.