diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2013-03-12 17:38:23 +0000 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2013-03-12 17:38:23 +0000 |
| commit | fe60890366adf8ecc6ee90a587a62d354597a071 (patch) | |
| tree | 88ece0e5bef07b7517b5f7729bcb5544ffa6e350 /examples | |
| parent | b343cd9300b1dc6ae621a496fa6d94528cbf6bf4 (diff) | |
| download | fpGUI-fe60890366adf8ecc6ee90a587a62d354597a071.tar.xz | |
textedit: enabled Cut and Paste built-in keyboard shortcuts.
Now it makes Maximus IDE and Nanoedit a bit more useful. ;-)
Diffstat (limited to 'examples')
| -rw-r--r-- | examples/apps/ide/src/fpg_textedit.pas | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/examples/apps/ide/src/fpg_textedit.pas b/examples/apps/ide/src/fpg_textedit.pas index 00808d7d..b71da9be 100644 --- a/examples/apps/ide/src/fpg_textedit.pas +++ b/examples/apps/ide/src/fpg_textedit.pas @@ -1543,7 +1543,6 @@ var Y: Integer; X: Integer; CaretScroll: Boolean; - HasChanged: boolean; begin {$IFDEF gDEBUG} SendMethodEnter('TfpgBaseTextEdit.HandleKeyPress') @@ -1558,15 +1557,13 @@ begin ckPaste: begin -// DoPaste(fpgClipboard.Text); // if not ReadOnly then -// HasChanged := True; + PasteFromClipboard; end; ckCut: begin -// DoCopy; -// DeleteSection; + CutToClipboard; end; end; |