diff options
| author | Ian C <ianc@noddybox.co.uk> | 2005-09-25 23:53:43 +0000 |
|---|---|---|
| committer | Ian C <ianc@noddybox.co.uk> | 2005-09-25 23:53:43 +0000 |
| commit | ffe3de3fb96721b10e7cb77ac8108a3e145cc1bc (patch) | |
| tree | f1063f9e6b5ae2302aeaf77c09872736f71c89a0 | |
| parent | 1e7d24fea8ab09a893c7f62e1d88c1c9feca9125 (diff) | |
Allow ESC to clear text boxes
| -rw-r--r-- | simplegui.mod/simplegui.bmx | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/simplegui.mod/simplegui.bmx b/simplegui.mod/simplegui.bmx index 72d79f8..90eb595 100644 --- a/simplegui.mod/simplegui.bmx +++ b/simplegui.mod/simplegui.bmx @@ -270,7 +270,9 @@ Type TText Extends TWidget End Method Method HandleKey(k:Int) - If k=8 + If k=27 + text="" + Else If k=8 If text.length>0 text=text[0..text.length-1] EndIf |