Rainbow-Editor/forms/ec/ec_label.pas

unit ec_label;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ec_labelbase;

type

  { TECLabelFrame }

  TECLabelFrame = class(TECLabelBaseFrame)
  private

  public
    function GetCommandCode: Integer; override;
  end;

var
  ECLabelFrame: TECLabelFrame;

implementation

uses constants;

{$R *.lfm}

{ TECLabelFrame }

function TECLabelFrame.GetCommandCode: Integer;
begin
  Result := LABEL_EC_CODE;
end;

end.