Changeset 1679 for cprs/trunk/CPRS-Chart/mImgText.pas

Timestamp:

May 7, 2015, 12:34:29 PM (9 years ago)

Author:

healthsevak

Message:

Updating the working copy to CPRS version 28

File:

• cprs/trunk/CPRS-Chart/mImgText.pas (modified) (2 diffs)

cprs/trunk/CPRS-Chart/mImgText.pas

@@ -5 +5 @@
 uses
   Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
-  StdCtrls, ExtCtrls;
+  StdCtrls, ExtCtrls, VA2006Utils;
 
 type
-  TfraImgText = class(TFrame)
+  TfraImgText = class(TfraTabStopFalse)
     img: TImage;
     lblText: TLabel;
-  private
-    { Private declarations }
-  public
-    constructor Create(AOwner: TComponent); override;
   end;
 
@@ -25 +21 @@
 { TfraImgText }
 
-constructor TfraImgText.Create(AOwner: TComponent);
-begin
-  inherited Create(AOwner);
-  TabStop := FALSE;
-end;
-
 initialization
   SpecifyFormIsNotADialog(TfraImgText);