Changeset 1699 for cprs/branches/HealthSevak-CPRS/CPRS-Chart/Templates/fTemplateEditor.pas

Timestamp:

May 9, 2015, 7:26:48 AM (10 years ago)

Author:

healthsevak

Message:

Implemented the OpenSource based spell check feature

File:

• cprs/branches/HealthSevak-CPRS/CPRS-Chart/Templates/fTemplateEditor.pas (modified) (3 diffs)

cprs/branches/HealthSevak-CPRS/CPRS-Chart/Templates/fTemplateEditor.pas

@@ -212 +212 @@
     lblNotes: TLabel;
     reNotes: TRichEdit;
+    popNoteMemoSpellOpenSource: TMenuItem; //WordVisTA@SK_Arora@HealthSevak to implement OpenSource SpellCheck Engine
     procedure btnNewClick(Sender: TObject);
     procedure btnApplyClick(Sender: TObject);
@@ -2612 +2613 @@
   mnuBPTry.Enabled := tryOK;
   mnuBPSpellCheck.Enabled := ok and SpellCheckAvailable;
+  popNoteMemoSpellOpenSource.Enabled   := ok and SpellCheckAvailable;  //WordVisTA@SK_Arora@HealthSevak to implement OpenSource SpellCheck Engine
   mnuBPCheckGrammar.Enabled := ok and SpellCheckAvailable;
 
@@ -2709 +2711 @@
 procedure TfrmTemplateEditor.mnuBPSpellCheckClick(Sender: TObject);
 begin
-  SpellCheckForControl(reBoil);
+  SpellCheckForControl(reBoil, Sender = popNoteMemoSpellOpenSource);  //WordVisTA@SK_Arora@HealthSevak to implement OpenSource SpellCheck Engine
 end;