Imagen en TColumn

[Pedro-Juan]

Hola a tod@s.

¿Alguien sabe cómo conseguir esos triangulitos que aparecen en las cabeceras de los TColumn en un Grid para indicar la ordenación?

He conseguido algunas imágenes, pero me sale un churro (BMP). Las he convertido a PNG, pero sale un churro.

También lo he intentado con imágenes de flecha arriba/abajo de 16x16, pero queda muy grande (llegan hasta el borde superior e inferior de la cabecera).
Las he reducido con una herramienta de gráficos, pero sale otro churro.

Cuando no sale un churro, no son transparentes...

Utilizo componentes externos a Delphi (AlphaControls). D7.

Muchas gracias y un saludo.

[Casimiro Notevi]

Es un tema que se ha tratado varias veces, a ver si lo encuentro...

[Pedro-Juan]

Hola.

He buscado, pero de las imágenes no he encontrado nada.

Un saludo.

[Casimiro Notevi]

Sé que se ha tratado en algunos hilos, aunque no lo encuentro, también sé que lo he hecho en varias ocasiones, aunque últimamente con el dbgrid de las RX que lo hace sólo con una propiedad... es más fácil

[Neftali [Germán.Estévez]]

Aquí tienes la explicación y el código:
Dibujar una flecha (ordenación) en el título de un DBGrid



El funcionamiento es similar si en lugar de dibujar copias una imagen sobre el canvas.

[Pedro-Juan]

Empezado por Casimiro Notevi

Sé que se ha tratado en algunos hilos, aunque no lo encuentro, también sé que lo he hecho en varias ocasiones, aunque últimamente con el dbgrid de las RX que lo hace sólo con una propiedad... es más fácil

¿Las rusas? Hace por lo menos 10 años que no sé nada de ellas.

Pero las miraré... ¡Sólo con una propiedad! Gracias.

[Pedro-Juan]

Empezado por Neftali

Aquí tienes la explicación y el código:
Dibujar una flecha (ordenación) en el título de un DBGrid



El funcionamiento es similar si en lugar de dibujar copias una imagen sobre el canvas.

La cuestión es que ya tengo todo el código implementado para esto, sólo necesitaría las imágenes "correctas". Una muestra:






Como ves, lo que necesitaría son las imágenes, ya que las que he conseguido (triángulos) se ven muy mal o no transparentes y las de la muestra son muy grandes (queda feo). Y si las hago más pequeñas quedan desdibujadas, también se ve muy feo (Peor).

Muchas gracias y un saludo.

[Casimiro Notevi]

Con las RX, por ejemplo, sólo has de asignar a SortMarker si quieres el triángulo para arriba, abajo o nada:

Código Delphi [-]
procedure TFplantillaTablas.grDatosGetBtnParams(Sender: TObject; Field: TField;
  AFont: TFont; var Background: TColor; var SortMarker: TSortMarker;
  IsDown: Boolean);
begin
  inherited;
  if (Field <> nil) then
    if cCampoSorted=Field.FieldName then
      case iTipoOrden of
        _ordensin_ : SortMarker := smNone;
        _ordenasc_ : SortMarker := smUp;
        _ordendes_ : SortMarker := smDown;
      end;
end;

[Neftali [Germán.Estévez]]

Empezado por Pedro-Juan

...Como ves, lo que necesitaría son las imágenes, ya que las que he conseguido (triángulos) se ven muy mal o no transparentes y las de la muestra son muy grandes (queda feo). Y si las hago más pequeñas quedan desdibujadas, también se ve muy feo (Peor).

Será por imágenes...

También puedes revisar estos enlaces...
A la búsqueda de imágenes/iconos