diff options
Diffstat (limited to 'prototypes')
| -rw-r--r-- | prototypes/fpgui2/tests/edittest.dpr | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/prototypes/fpgui2/tests/edittest.dpr b/prototypes/fpgui2/tests/edittest.dpr index 29089e93..aa2c5290 100644 --- a/prototypes/fpgui2/tests/edittest.dpr +++ b/prototypes/fpgui2/tests/edittest.dpr @@ -373,9 +373,12 @@ begin w.Left := 140; edit1 := CreateEdit(self, 10, 40, 120, 22); + edit1.AutoSelect := False; + edit1.HideSelection := False; edit1.Text := 'Hello world. Hello world. Hello world.'; edit2 := CreateEdit(self, 10, 70, 200, 22); edit2.Text := 'UTF-8 text -> Òåñò'; + // writeln(UTF8Length(edit2.text)); // writeln(Length(edit2.text)); UTF8Insert('ö', edit2.Text, 15); |