Ver Mensaje Individual
  #3
Antiguo 10 de mayo de 2017, 12:47
Hrmcobol
Guardián del Foro
Guardián del Foro: Guardián del espíritu y clima del Foro - Issue reason: Por implicación en la vida del Foro 
Última Actividad 01.03.2022 02:59
Posts Posts: 323
Likes enviados Enviados: 102
Likes recibidos Recibidos: 120

Hola Fito, el tema es que pierde los font de manera aleatoria, cada vez que se abre el formulario debes cambiarle los valores del tamaño de los Fonts, y ejecutar algun comando para que los registre, como por ejemplo el sortlist, te paso las lineas.
Yo le muevos el font de un cttext que ya tengo formateado.

Probalo y comentame como anduvo

Código COBOL:
  1.      MOVE "Font"       OF CT-TEXT               TO                    "TitleFont"   OF CT-List
  2.      MOVE 9,75                                        TO "Size"          OF "TitleFont"   OF CT-List
  3.      MOVE POW-ON                                   TO "Bold"          OF "TitleFont"   OF CT-List
  4.      MOVE POW-OFF                                  TO "Italic"        OF "TitleFont"   OF CT-List
  5.      MOVE POW-OFF                                  TO "Underline"     OF "TitleFont"   OF CT-List
  6.      MOVE POW-OFF                                  TO "StrikeThrough" OF "TitleFont"   OF CT-List
  7.      MOVE 11                                            TO                    "TitleOffset" OF CT-List
  8.  
  9.      MOVE 2 TO "SortColumn"    OF CT-List
  10.      MOVE 1 TO "SortDirection" OF CT-List
  11.      INVOKE CT-020102    "CT-List"
Hrmcobol is offline   Responder Con Cita