Alinear Texto del ComboBox

[MaMu]

Existe alguna forma de alinear los items de un ComboBox??
Siempre estan alineados a la izquierda, habra forma de centrarlos?

Saludos

[[Caral]]

Hola
Buena pregunta.
Como cargas los items?
Tienes en cuenta que depende del tamaño de cada item asi se desplazara, siempre a la derecha?
Saludos

[[cHackAll]]

Código Delphi [-]
procedure TForm1.ComboBox1DrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);
begin
 with (Control as TComboBox) do
  begin
   Canvas.FillRect(Rect);
   SetTextAlign(Canvas.Handle, TA_RIGHT);
   Canvas.TextOut(Rect.Right - 4, Rect.Top, Items[Index]);
  end;
end;

0j0: Style = csOwnerDrawFixed

[MaMu]

Empezado por cHackAll

Código Delphi [-]procedure TForm1.ComboBox1DrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);
begin
with (Control as TComboBox) do
begin
Canvas.FillRect(Rect);
SetTextAlign(Canvas.Handle, TA_RIGHT);
Canvas.TextOut(Rect.Right - 4, Rect.Top, Items[Index]);
end;
end;




0j0: Style = csOwnerDrawFixed

Esto esta perfecto, para Izquierda o derecha, pero como puedo centrarlos?

Saludos

[[egostar]]

Empezado por mamu

Esto esta perfecto, para Izquierda o derecha, pero como puedo centrarlos?

Saludos

A ver, sentido común.....

1. TA_RIGHT
2. TA_LEFT
3. TA_TOP
4. TA......

Salud OS

[MaMu]

Empezado por egostar

A ver, sentido común.....

1. TA_RIGHT
2. TA_LEFT
3. TA_TOP
4. TA......

Salud OS

Je. Se supone que si vuelvo a preguntar es porque al probar el procedimiento y usar el sentido común intentando con:

1. TA_CENTER
2. TA_MIDDLE
3. TA_CLIENT

en ninguno de los casos me funciona, me lo toma como TA_RIGHT o TA_LEFT

Saludos

[[Caral]]

Hola
Para mi, como soy novato, me parece que tiene que ver con la numeración que se le de a la posición.
Siempre tomara la posición aportada por cuan separado de los bordes este.
He probado el codigo y efectivamente centra, pero dependiendo de la posicion que se le de, ya que toma en cuenta el tamaño del texto.
Saludos
PD: Fenomenal el codigo, cHackAll, tipico de ti.