选择TListView控件,右键->Column Editor,选中需要右对齐的列,设置Alignment属性为taRightJustify

解决方案 »

  1.   

    //如上方法//注意第一列不能设置procedure TListColumn.SetAlignment(Value: TAlignment);
    begin
      if (Alignment <> Value) and (Index <> 0) then
      begin
        FAlignment := Value;
        Changed(False);
        TListColumns(Collection).Owner.Repaint;
      end;
    end;
      

  2.   

    //如上方法//注意第一列不能设置procedure TListColumn.SetAlignment(Value: TAlignment);
    begin
      if (Alignment <> Value) and (Index <> 0) then
      begin
        FAlignment := Value;
        Changed(False);
        TListColumns(Collection).Owner.Repaint;
      end;
    end;
      

  3.   

    双击,选 中要对齐的列!然后设置Alignment属性为taRightJustify
      

  4.   

    同意:zswang(伴水)(* 嘻嘻 *)