List Box
 

No he podido poner el scrollbar horizontal a un list box!!!! si se puede? yo creo que si, entonces... alguien sabe como? gracias

Usa la propiedad ScrollWidth del list box. ScrollWidth es algo así como el ancho virtual del control de manera que si, por ejemplo, pones

ListBox.ScrollWidth := 1000;

aparecerá la barra y te permitirá desplazarte como si el contenido del control ocupase 1000 pixeles de ancho.

Fíjate que esto tiene entonces un problema: si el ítem de mayor longitud en el list box mide más de 1000 pixeles de ancho, seguirás sin poder ver todo. Y si mide menos, digamos 500 pixeles, te estarás desplazando por una franja vacía de 500 pixeles.

Por esto, lo ideal sería ajustar ScrollWidth a la mayor longitud (ni más ni menos) de los ítemes en el list box. Desafortunadamente, si tu list box contiene muchos elementos, esto puede ser un poco lento de calcular, aunque, por otro lado, un list box con muchos ítemes es de cualquier forma lento.

Para calcular el máximo ancho podrías usar esta función:

Código Delphi [-]
function MaxItemWidth(ListBox: TListBox): Integer;
var
  W, I: Integer;

begin
  Result := 0;
  for I := 0 to Pred(ListBox.Count) do
  begin
    W := ListBox.Canvas.TextWidth(ListBox.Items[i]);
    if W > Result then Result := W;
  end;

  Inc(Result, 6);
end;

// Saludos