procedure TfrmServerTopLogisticsCompany.FormShow(Sender: TObject); var I: Integer; begin for I := 0 to ListView1.Columns.Count-1 do begin ListView1.Column[I].Alignment := taCenter; end; end;
===
设置好像设置不了,不知道是不是IDE的问题,暂时这样动态设置就可
本文来自博客园,作者:del88,转载请注明原文链接:https://www.cnblogs.com/del88/archive/2012/12/24/2831151.html