Ivan Sorokin 1 周之前
父节点
当前提交
66942ac20e
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      packages/fv/src/dialogs.inc

+ 2 - 2
packages/fv/src/dialogs.inc

@@ -1698,10 +1698,10 @@ END;
 {---------------------------------------------------------------------------}
 PROCEDURE TInputLine.HandleEvent (Var Event: TEvent);
 CONST PadKeys = [$47, $4B, $4D, $4F, $73, $74];
-VAR WasAppending: Boolean; ExtendBlock: Boolean; OldData: String;
+VAR WasAppending: Boolean; ExtendBlock: Boolean; OldData: Sw_String;
 Delta, Anchor, OldCurPos, OldFirstPos, OldSelStart, OldSelEnd: Sw_Integer;
 SelectedTextAnsi: AnsiString; // For SetGlobalClipboardData
-S: AnsiString;
+S: Sw_String;
 Len, I: Integer;
 
    FUNCTION MouseDelta: Sw_Integer;