如何使用Vim将字符x填充到y列

这里有一个函数来实现你所要求的,还有更多。

• 它从当前行尾填充行,而不是光标位置
• 它允许您指定任何字符串来填充行的其余部分
• textwidth 设置以决定线的长度

函数定义如下:

" fill rest of line with characters
function! FillLine( str )
    " set tw to the desired total length
    let tw = &textwidth
    if tw==0 | let tw = 80 | endif
    " strip trailing spaces first
    .s/[[:space:]]*$//
    " calculate total number of 'str's to insert
    let reps = (tw - col("$")) / len(a:str)
    " insert them, if there's room, removing trailing spaces (though forcing
    " there to be one)
    if reps > 0
        .s/$/\=(' '.repeat(a:str, reps))/
    endif
endfunction

把它插入你的 .vimrc ,并对其进行映射,例如。

map <F12> :call FillLine( '-' )

然后你可以按 F12

注:

你能做到的 80Ax<Esc>d80| 更简单的解决方案。

如果我正确理解了这个问题,可以这样完成:在正常模式下,从所需的结束列中减去光标的当前列位置,然后键入结果,后跟“I”以进入插入模式,然后输入要填充空格的字符。返回正常模式结束。例如,在正常模式下,光标位于第四列时,如果要用虚线填充行的其余部分,直到第80列,请键入76i-然后键入Esc或Ctrl-[以返回正常模式。这将导致从第4列开始到第79列结束的76个破折号。

virtualedit 选项设置为 block all
v80| (如果 virtualedit=all )或者
<c-v>80| (如果 virtualedit=block

然后用破折号替换所选区域: r-

这可能有助于启动视觉模式后,行中的最后一个字符通过点击 l 以避免覆盖行中的最后一个字符。如果你不使用 ,则需要设置 virtualedit+=onemore 因此,您可以在正常模式下将一个字符移动到行尾之外。

其中一个 other answers 80Ax<Esc>d80| . 我最初开始使用它作为键映射,如下所示:

nnoremap <leader>- 80A-<Esc>d80<bar>

…但我不喜欢它把光标留在行的末尾。此外,对于窄窗口(例如,仅比80个单元格宽一点),它会导致整个窗口水平滚动,因为光标在修剪回80个单元格之前会短暂跳到长行的末尾。返回到行的开头可以部分解决此问题:

nnoremap <leader>- 80A-<Esc>d80<bar>0

:h revins :h ri )在附加时保持光标在屏幕上。以下是作为键映射的完整命令:

nnoremap <leader>- :set ri<cr>80A-<esc>81<bar>d$0:set nori<cr>

This answer 回答你的问题。只需将len计算替换为所需的列号(+/-1可能是,我不记得了),并删除由替换添加的括起来的双引号。

使用 textwidth (检查 :h 'tw' ). 下面是我现在使用的内容,它在现有行内容(如果存在)之后追加一个空格,并将提示输入用于模式的字符串:

function! FillLine() abort
    if &textwidth
        let l:str = input('FillLine>')
        .s/\m\(\S\+\)$/\1 /e  " Add space after content (if present).

        " Calculate how many repetitions will fit.
        let l:lastcol = col('$')-1  " See :h col().
        if l:lastcol > 1
            let l:numstr = float2nr(floor((&textwidth-l:lastcol)/len(l:str)))
        else
            let l:numstr = float2nr(floor(&textwidth/len(l:str)))
        endif

        if l:numstr > 0
            .s/\m$/\=(repeat(l:str, l:numstr))/  " Append repeated pattern.
        endif
    else
        echohl WarningMsg
        echom "FillLine requires nonzero textwidth setting"
        echohl None
    endif
endfunction

当然,你可以通过地图快速进入。我喜欢:

nnoremap <Leader>' :call FillLine()<Cr>

请注意,该计算假定正在插入简单的ASCII字符。对于更复杂的字符串, len(l:str) 可能不行。从 :h strlen() :

If you want to count the number of multi-byte characters use strchars().
Also see len(), strdisplaywidth() and strwidth().

电子稳定控制系统 0或

电子稳定控制系统 插入破折号和0R CTRL键 r

实际上,我无意中发现了一个用于对齐列的方法。为了防止其他人也这样做,此线程可能很有用: How to insert spaces up to column X to line up things in columns?