|
@@ -1378,13 +1378,11 @@ begin
|
|
end;
|
|
end;
|
|
eaDeleteLine :
|
|
eaDeleteLine :
|
|
begin
|
|
begin
|
|
- SetCurPtr(EndPos.X,EndPos.Y);
|
|
|
|
- SetMinMax(EndPos.Y);
|
|
|
|
HadefNoIndent:=(GetFlags and efNoIndent)<>0;
|
|
HadefNoIndent:=(GetFlags and efNoIndent)<>0;
|
|
WasInserting:=GetInsertMode;
|
|
WasInserting:=GetInsertMode;
|
|
SetInsertMode(true);
|
|
SetInsertMode(true);
|
|
SetFlags(GetFlags or efNoIndent);
|
|
SetFlags(GetFlags or efNoIndent);
|
|
- InsertNewLine;
|
|
|
|
|
|
+ InsertLine(StartPos.Y,'');
|
|
SetInsertMode(WasInserting);
|
|
SetInsertMode(WasInserting);
|
|
if not HadefNoIndent then
|
|
if not HadefNoIndent then
|
|
SetFlags(GetFlags and not efNoIndent);
|
|
SetFlags(GetFlags and not efNoIndent);
|
|
@@ -2062,5 +2060,4 @@ begin
|
|
{$endif}
|
|
{$endif}
|
|
end;
|
|
end;
|
|
|
|
|
|
-
|
|
|
|
-END.
|
|
|
|
|
|
+end.
|