Definitivamente hay problemas con DIALOGS y SAYS

[Antonio Linares]

Patricio,

Es un fichero RES ? No tienes el RC ?

Por favor intenta abrirlo con el Resource Workshop de Borland y sálvalo como RC y copia aqui la linea de esos labels, gracias

[Patricio Avalos Aguirre]

Code: Select all  Expand view  RUN

DLG_LISTA DIALOG FIXED IMPURE 95, -17, 377, 222
STYLE WS_POPUP|DS_MODALFRAME|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
CAPTION "<titulo>"
FONT 8, "Tahoma"
BEGIN
  CONTROL "", 102, "TWBrowse", WS_TABSTOP|0x00b00000, 0, 24, 371, 139
  CONTROL "", 201, "BorBtn", 0x00000000, 96, 200, 55, 16
  CONTROL "", 202, "BorBtn", 0x00000000, 172, 200, 55, 16
  CONTROL "Registro:", 110, "Static", 0x00000000, 8, 176, 31, 8
  CONTROL "", 103, "Static", 0x00000000, 48, 176, 52, 8
  CONTROL "Buscando:", 111, "Static", 0x00000000, 108, 176, 35, 8
  CONTROL "", 104, "Static", WS_BORDER|WS_GROUP, 148, 176, 212, 12
  CONTROL "", 714, "BorBtn", 0x00000000, 316, 200, 55, 16
END

[Antonio Linares]

Patricio,

Es este el control que redefines ?

CONTROL "", 104, "Static", WS_BORDER|WS_GROUP, 148, 176, 212, 12

[Antonio Linares]

Me respondo yo mismo: si es ese. Se ve en la imagen que has puesto.

Vamos a revisarlo cuanto antes

[karinha]

Code: Select all  Expand view  RUN

DEFINE DIALOG oDlg NAME "DLG_LISTA" TITLE cTitle COLOR nRgb(0,0,0),nRgb(238,221,187)

Gracias, Patricio. Mui belo.

Saludos.

[Mike Serra]

Antonio, ¿Sabés ya algo de este problema?, He detectado que también lo tengo en un proyecto que he pasado a FWH808

Saludos y Muchas Gracias.

[Antonio Linares]

Mike,

te refieres al borde de un SAY ? Usas temas ?

Puedes mostrar una imagen de como se veían los SAYS con bordes en tus diálogos ? gracias

[Mike Serra]

Antonio ahi va la imagen



Tengo WindowsManifest en recursos.

SALUDOS,
[/img]

[Antonio Linares]

Mike,

Gracias por la imagen

El borde si se ve, lo que ocurre es que el ancho del control se reduce.

Hay varias soluciones:

1) Que añadas espacios al final del texto para que te de el ancho adecuado

2) Modificar la Clase TSay para que no ajuste el ancho de los SAYs automaticamente, ó definir una DATA lAdjust para tal fin. O detectar que tiene borde, y entonces no variar el ancho (?)

3) Ajustarle el ancho deseado desde el programa, una vez le cambies el texto, con oSay:nWidth := ...

[Mike Serra]

Gracias Antonio,

Las soluciones 1 y 2 no me sirven ya que tendría que modificar mucho código (son muchos says y muchos dialogos), la que creo que me vendría bien sería la 2). En este caso ¿Me puedes echar una mano?, y por otro lado, ¿la versión FWH809 tiene corregido esto?

Muchas Gracias de antemano