cedit: add Enter key support to trigger search/replace
This commit is contained in:
@@ -1755,6 +1755,10 @@ BEGIN
|
|||||||
ELSE
|
ELSE
|
||||||
SetFocus(ReplaceEdit, TRUE)
|
SetFocus(ReplaceEdit, TRUE)
|
||||||
END
|
END
|
||||||
|
ELSIF keyCode = 28 THEN (* Enter *)
|
||||||
|
IF searchOpened & (searchText # "") THEN
|
||||||
|
notFound := ~T.findNext(text, BKW.value)
|
||||||
|
END
|
||||||
ELSE
|
ELSE
|
||||||
EB.key(FindEdit, key);
|
EB.key(FindEdit, key);
|
||||||
EditBox_Get(FindEdit, new_searchText);
|
EditBox_Get(FindEdit, new_searchText);
|
||||||
@@ -1770,6 +1774,10 @@ BEGIN
|
|||||||
ELSE
|
ELSE
|
||||||
SetFocus(GotoEdit, TRUE)
|
SetFocus(GotoEdit, TRUE)
|
||||||
END
|
END
|
||||||
|
ELSIF keyCode = 28 THEN (* Enter *)
|
||||||
|
IF searchOpened & (searchText # "") THEN
|
||||||
|
notFound := ~T.findNext(text, BKW.value)
|
||||||
|
END
|
||||||
ELSE
|
ELSE
|
||||||
EB.key(ReplaceEdit, key);
|
EB.key(ReplaceEdit, key);
|
||||||
EditBox_Get(ReplaceEdit, replaceText)
|
EditBox_Get(ReplaceEdit, replaceText)
|
||||||
|
|||||||
Reference in New Issue
Block a user