Changeset 698 for cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/TMGHTML2.pas

Timestamp:

Feb 1, 2010, 7:07:59 PM (14 years ago)

Author:

Kevin Toppenberg

Message:

Fixed New Note-Template Tab Key issue

File:

• cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/TMGHTML2.pas (modified) (2 diffs)

cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/TMGHTML2.pas

@@ -60 +60 @@
       FEditable:               boolean;       
       ColorDialog:             TColorDialog;       
-      AllowNextBlur :          boolean;      
-      procedure SetMsgActive (Active : boolean);
+      AllowNextBlur :          boolean;
       function  GetHTMLText:string;
       procedure SetHTMLText(HTML:String);
@@ -91 +90 @@
     public
       {end public}
-      PopupMenu:     TPopupMenu;      
+      PopupMenu:     TPopupMenu;
       KeyStruck : boolean; // A VERY crude determiner as to if Modified.
       NextControl : TWinControl;
       PrevControl : TWinControl;
-      constructor Create(Owner:TControl; Application : TApplication); 
+      procedure SetMsgActive (Active : boolean);
+      constructor Create(Owner:TControl; Application : TApplication);
       destructor Destroy; override;
-      procedure Clear;       
+      procedure Clear;
       procedure ToggleBullet;
       procedure ToggleItalic;