{ ***************************************************************************** This file is part of the Lazarus Component Library (LCL) See the file COPYING.modifiedLGPL.txt, included in this distribution, for details about the license. ***************************************************************************** Author: Mattias Gaertner Important: Before you open the designer of this unit, you must install the package DesignBaseClassDemoPkg, because it registers the TMyComponentClass. Read the README.txt. Abstract: When you open the designer, you can see the property 'DemoProperty' in the Object Inspector. This property ws inherited from TMyComponentClass. } unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, CustomComponentClass; type { TMyComponent1 } TMyComponent1 = class(TMyComponentClass) OpenDialog1: TOpenDialog; private { private declarations } public { public declarations } end; var MyComponent1: TMyComponent1; implementation {$R unit1.lfm} end.