在哪里、如何设置DELPHI原代码的对齐方式。

先中你要调整的代码，按住CTRL+K+I(U)，I向后退两格，U向前!

解决方案 »

  1.   

    Editor Properties
    Block indent
      

  2.   

    Editor Properties->General
    ->Block Indent = N
    ->Tab stops = M
    CTRL+shift+U——选中的代码向后退N格
    CTRL+shift+I——选中的代码向前进N格
    按一下TAB键进M格
      

  3.   

    to:baddy
    谢谢！
    to:zswang
    谢谢，但是你的办法没有用呀。
    请详细点好拉。
      

  4.   

    谢谢诸位的热心：   我想知道的是：比如在如下代码中，当我敲then回车之后另起一行时，下一行会自动缩进N格。如何设置之。谢谢！
    procedure TForm1.Underline1Click(Sender: TObject);
    begin
         form1.Underline1.Checked:=not form1.Underline1.Checked;
         if form1.Underline1.Checked=true then
             form1.RichEdit1.Font.Style:=form1.RichEdit1.Font.Style+[fsUnderline]
         else
             form1.RichEdit1.Font.Style:=form1.RichEdit1.Font.Style-[fsUnderline];end;
      

  5.   

    先中你要调整的代码，按住CTRL+SHIFT+I(U)，I向后退两格，U向前!