diff options
author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-07-08 15:52:15 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-07-08 15:52:15 +0200 |
commit | e6a2a6ff7553ff718d851125a181eeb2eceba7f8 (patch) | |
tree | 27775cb48a9625d280f54cc61725a58cbc43cac1 | |
parent | c442e9abe68adffecac7f6960c0d6eba3efe8f53 (diff) | |
download | fpGUI-e6a2a6ff7553ff718d851125a181eeb2eceba7f8.tar.xz |
Memo Mediator: Remove trailing whitespace.
Sometimes we had NewLine character or whitespace. We don't need
those, so trim it off.
-rw-r--r-- | extras/tiopf/gui/tiMediators.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/extras/tiopf/gui/tiMediators.pas b/extras/tiopf/gui/tiMediators.pas index b2dacea9..889f6540 100644 --- a/extras/tiopf/gui/tiMediators.pas +++ b/extras/tiopf/gui/tiMediators.pas @@ -581,7 +581,7 @@ end; procedure TtiMemoMediatorView.DoGuiToObject; begin - Subject.PropValue[FieldName] := View.Lines.Text; + Subject.PropValue[FieldName] := Trim(View.Lines.Text); end; procedure TtiMemoMediatorView.SetObjectUpdateMoment(const AValue: TtiObjectUpdateMoment); |