Eliminar scroll horizontal (que no scrollbar) de dbgrid

[[coso]]

no, tengo siempre en todas las dbgrids rowselect activado, pues acostumbro a operar en otras forms...por eso no me percate . En fin, eso es. Activare y desactivare segun convenga, o a ver si puedo encontrar alguna manera que lo haga automaticamente justo antes del .paint. Gracias de nuevo y un saludo

[[Delphius]]

Disculpen que interrumpa el hilo momentaneamente. Se que no viene con el tema pero me siento un tanto intrigado por este "truco" que ya he visto en otras ocasiones:

Empezado por roman

A ver si con esto:

Código Delphi [-]
type   TDBGrid = class(DBGrids.TDBGrid);

He leído lo que comenta Ian al respecto, también he visto que otros lo han comentado en algunos hilos, pero aún así no logro entender cuando y porque es conveniente hacer dicho "truco". Les agradecería si me lo pudieran explicar para ver si de alguna vez me saco esa intriga.

Disculpame coso, si te molesta que use el hilo dime y lo trato el tema fuera. Lamento no tener alguna idea con respecto a tu duda.

Saludos,

[[coso]]

bueno...es como un override de la clase entera no?

[roman]

A ver. La propiedad LeftCol de TDBGrid está protegida, lo cual quiere decir que no podemos accederla directamente:

Código Delphi [-]
DBGrid1.LeftCol ... // error de compilación

Pero puede accederse por clases descendientes, internamente o en la unidad donde se declare la clase descendiente.

Al poner

Código Delphi [-]
type
  THackGrid = class(TDBGrid);

THackGrid es una clase descendiente de TDBGrid, aunque no agregue nada. Por ello, se puede hacer un moldeo como

Código Delphi [-]
THackGrid(DBGrid1).LeftCol ...

al estar en la misma unidad que su declaración.

Y, dando otra vuelta de tuerca más, podemos poner

Código Delphi [-]
type
  TDBGrid = class(DBGrids.TDBGrid);

Aquí, TDBGrid es otra clase, que desciende de la clase homónima de la unidad DBGrids.

// Saludos

[[Delphius]]

A ver si comprendo, entonces el "truco" consiste en acceder a métodos y/o propiedades protegidas de una clase sin estar heredando de ésta y hacerlo público?

Saludos,

[roman]

Pues algo así. Más que nada es una solución temporal, rapidita, para no tener que declarar una clase heredada, instanciar un objeto de esa clase y trabajar con él en lugar del original.

Con este truco pueden ahora dar al traste quienes declaren sus métodos y propiedades como strict protected.

// Saludos

[[Delphius]]

Empezado por roman

Pues algo así. Más que nada es una solución temporal, rapidita, para no tener que declarar una clase heredada, instanciar un objeto de esa clase y trabajar con él en lugar del original.

Con este truco pueden ahora dar al traste quienes declaren sus métodos y propiedades como strict protected.

// Saludos

Muchas gracias roman.
Ahora si me queda claro. Como te digo que leí y leí muchas veces sobre esta técnica pero nunca me sentí a gusto, no me entraba en la cabeza. Directamente pasé de largo y segui con otra cosa.

Ahora si podré dormir más tranquilo , una cosa menos de que preocuparme.

Como técnica le veo buen uso; ahora como mi mente tiende al purista me dice que es mejor heredar y tener una nueva clase. Pero en fin, son técnicas y necesidades de cada uno.

Lamento haberlos interrumpido.

Saludos,

[roman]

Empezado por Delphius

Como técnica le veo buen uso; ahora como mi mente tiende al purista me dice que es mejor heredar y tener una nueva clase.

Pues sí, el libro dicta eso. Pero imáginate para casos como los que aquí se tratan. Habría que definir e instalar un descendiente de TDBGrid sólo para eso

// Saludos