mirror of https://gitlab.com/basile.b/dexed.git
clean up
This commit is contained in:
parent
667e8648c9
commit
61122dffed
|
@ -419,7 +419,6 @@ end;
|
||||||
procedure TCESynMemo.EditorIdle(sender: TObject);
|
procedure TCESynMemo.EditorIdle(sender: TObject);
|
||||||
var
|
var
|
||||||
str: string;
|
str: string;
|
||||||
rc: TRect;
|
|
||||||
begin
|
begin
|
||||||
if not Visible then exit;
|
if not Visible then exit;
|
||||||
if not isDSource then exit;
|
if not isDSource then exit;
|
||||||
|
@ -579,7 +578,6 @@ end;
|
||||||
procedure TCESynMemo.KeyUp(var Key: Word; Shift: TShiftState);
|
procedure TCESynMemo.KeyUp(var Key: Word; Shift: TShiftState);
|
||||||
var
|
var
|
||||||
str: string;
|
str: string;
|
||||||
rc: TRect;
|
|
||||||
begin
|
begin
|
||||||
if Key in [VK_PRIOR, VK_NEXT, Vk_UP] then
|
if Key in [VK_PRIOR, VK_NEXT, Vk_UP] then
|
||||||
fPositions.store;
|
fPositions.store;
|
||||||
|
|
Loading…
Reference in New Issue