Delphi7 Cannot complete a class with incomplete methods implementations

1、Ctrl+Shift+上下箭头键，pas文件中只有部分方法可以在声明与定义来回切换，有的不行

2、使用Ctrl+Shift+C，自动完成类，会自动定位到下面代码处

{$IFDEF APPSWITCH}
function TForm1.Detail(ModuleType, ItemType: Integer; ACheckType: Integer = 0): Integer;
{$ELSE}
function TForm1.Detail(ModuleType, ItemType: Integer;): Integer;
{$ENDIF}

3、把定义和声明移动到最后，除Detail外，其余均可切换