Hola Carlos.
De este modo a mi me los encolumna correctamente de acuerdo al separador decimal:
Código Delphi
[-]
with ListBox1 do
begin
Font.Name:= 'fixedsys';
Items.Add(Format('%12.3f',[3.120]));
Items.Add(Format('%12.3f',[-3.120]));
Items.Add(Format('%12.3f',[12.345]));
Items.Add(Format('%12.3f',[-12.345]));
Items.Add(Format('%12.3f',[123.214]));
Items.Add(Format('%12.3f',[-123.214]));
end;
Un saludo.