delphi listbox数据对齐显示

由于数据长度不同，所以需要数据对齐显示，可我已经用stringofchar了啊，可还是不能对齐，为什么呢？
我是delphi连access。 listbox1.Items.Add(id+' '+stringofchar(' ',10-length(trim(id)))+chezhong+' '+stringofchar(' ',10-length(trim(chezhong)))+chehao+stringofchar(' ',15-length(trim(chehao)))+fazhan+stringofchar(' ',10-length(trim(fazhan)))+xiepinming1+stringofchar(' ',10-length(trim(xiepinming1)))+xiepinming2+' '+stringofchar(' ',10-length(trim(xiepinming2)))+xiepinming3+stringofchar(' ',20-length(trim(xiepinming3)))+ddcheci+stringofchar(' ',10-length(trim(ddcheci)))+xiezl+stringofchar(' ',10-length(trim(xiezl)))+xiepengbu+stringofchar(' ',10-length(trim(xiepengbu)))+xiedidian+stringofchar(' ',10-length(trim(xiedidian)))）；不知道为什么，不能对齐。日期时间格式的也不能对齐，比如4-1的和4-14的，就不对齐，我把access的字段都设置成yyyy-mm-dd hh:nn:ss了，可在数据表里都变成这么显示的了，可在listbox里却还是2010-4-4这样的，为什么呢？