* Add new fallback registration Calendar component.

2 files changed, 8 insertions, 2 deletions

diff --git a/extras/tiopf/gui/tiLogToGUI.pas b/extras/tiopf/gui/tiLogToGUI.pas
index cce940d7..b43c0220 100644
--- a/extras/tiopf/gui/tiLogToGUI.pas
+++ b/extras/tiopf/gui/tiLogToGUI.pas
@@ -3,6 +3,11 @@
   the -lv parameter is passed on the command line
   
   This in normally controlled by the tiLogReg unit.
+
+  *** NOTE ***
+  If you application doesn't terminate when you activated LogToGUI, it probably
+  means a TThread.WaitFor deadlock occured. In that case, call ReleaseLog()
+  after fpgApplication.Run in you project's *.lpr file.
 }
 unit tiLogToGUI;
 
diff --git a/extras/tiopf/gui/tiMediators.pas b/extras/tiopf/gui/tiMediators.pas
index e2b11681..7a856070 100644
--- a/extras/tiopf/gui/tiMediators.pas
+++ b/extras/tiopf/gui/tiMediators.pas
@@ -206,13 +206,14 @@ const
 
 procedure RegisterFallBackMediators;
 begin
-  gMediatorManager.RegisterMediator(TMediatorEditView, TtiObject, [tkSstring,tkAstring,tkinteger,tkFloat]);
+  gMediatorManager.RegisterMediator(TMediatorEditView, TtiObject, [tkSString,tkAString,tkInteger,tkFloat]);
   gMediatorManager.RegisterMediator(TMediatorCheckBoxView, TtiObject, [tkBool]);
   gMediatorManager.RegisterMediator(TMediatorComboboxView, TtiObject, [tkSString,tkAString]);
   gMediatorManager.RegisterMediator(TMediatorStaticTextView, TtiObject);
   gMediatorManager.RegisterMediator(TMediatorTrackBarView, TtiObject, [tkInteger]);
   gMediatorManager.RegisterMediator(TMediatorDynamicComboBoxView, TtiObject, [tkClass]);
-  gMediatorManager.RegisterMediator(TMediatorMemoView, TtiObject, [tksString,tkAString]);
+  gMediatorManager.RegisterMediator(TMediatorMemoView, TtiObject, [tkSString,tkAString]);
+  gMediatorManager.RegisterMediator(TMediatorCalendarComboView, TtiObject, [tkFloat]);
 end;
 
 { TMediatorEditView }