In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Cambio de TDbBrowse a TDbBrowseMod

Foro de Xailer profesional en español
Responder
mcastabaron
Mensajes: 154
Registrado: Vie Mar 14, 2008 7:25 am
Ubicación: Almería

Cambio de TDbBrowse a TDbBrowseMod

Mensaje por mcastabaron »

Buenos días,
Adjunto una imagen con una pequeña corrección.
Saludos.
Miguel.
Adjuntos
TDbBrowseMod.png
TDbBrowseMod.png (35.49 KiB) Visto 1541 veces
mcastabaron
Mensajes: 154
Registrado: Vie Mar 14, 2008 7:25 am
Ubicación: Almería

Re: Cambio de TDbBrowse a TDbBrowseMod

Mensaje por mcastabaron »

Buenos días,
Por otro lado, cuando el dataset es una dbf no muestra los datos (imágen adjunta).
Sin embargo, si el datset es una sql si los muestra.
Saludos.
Miguel.
Adjuntos
TDbBrowseMod2.png
TDbBrowseMod2.png (115.7 KiB) Visto 1514 veces
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9243
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Re: Cambio de TDbBrowse a TDbBrowseMod

Mensaje por ignacio »

Buenas tardes,

Ambos problemas corregidos. Estarán disponible en la próxima versión. Gracias por su colaboración.

Un saludo
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
mcastabaron
Mensajes: 154
Registrado: Vie Mar 14, 2008 7:25 am
Ubicación: Almería

Re: Cambio de TDbBrowse a TDbBrowseMod

Mensaje por mcastabaron »

Buenos días,

Veo que en TDbBrowseMod faltan algunas propiedades que están en TDbBrowse como lAutoOrder, lAutoSeek, nRowDividerStyle,...y que en las columnas de TDbBrowseMod están las propiedades pero no hay ningún evento.
¿Se incluirán más adelante?

Saludos.
Miguel C.
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9243
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Re: Cambio de TDbBrowse a TDbBrowseMod

Mensaje por ignacio »

Buenos días,
lAutoOrder
lAllowSort
lAutoSeek
Es automático cuando una columna está ordenada y lFastEdit es .F.
nRowDividerStyle
Me temo que esto no se va a hacer. Entendemos que es un diseño que ya se usa muy poco y además lo puede hacer usted mismo fácilmente.

Código: Seleccionar todo

METHOD BrowseMod1DrawCell( oSender, oCol, nIndex, xValue, cValue, nImage, nClrText, nClrPane, nState, hDC, aRect ) CLASS TForm1

   LOCAL hPen

   hPen := CreatePen( PS_SOLID, 1, clRed )
   MoveTo( hDC, aRect[ rtLEFT ], aRect[ rtBOTTOM ] -1)
   LineTo( hDC, aRect[ rtRIGHT ], aRect[ rtBOTTOM] -1, hPen)
   DeleteObject( hPen )

RETURN NIL
y que en las columnas de TDbBrowseMod están las propiedades pero no hay ningún evento.
Ahora todos los eventos se rutan UNICAMENTE sobre el Browse. Las ventajas son evidentes, como puede observar de su pregunta anterior.

Un saludo
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
mcastabaron
Mensajes: 154
Registrado: Vie Mar 14, 2008 7:25 am
Ubicación: Almería

Re: Cambio de TDbBrowse a TDbBrowseMod

Mensaje por mcastabaron »

Gracias Ignacio por las aclaraciones.
Al poner lAllowSort:=.t. en mi proyecto, que utiliza dbfs, no hace la ordenación si aparece la flecha en el header.
En el ejemplo que incorpora Xailer, que utiliza sql, funciona correctamente.

Miguel.
Responder