hi
du musst ne neue komponente von einer anderen ableiten.
tutorials gibts dazu überall schau mal bei google
Beispiel(von TEdit abgeleitet)
Delphi-Quellcode:
unit Edit1;
interface
uses
Windows, Messages, SysUtils, Classes, Controls, StdCtrls;
type
TEdit1 =
class(TEdit)
private
{ Private declarations }
FTest : boolean;
procedure SetTest(Value : boolean);
protected
{ Protected declarations }
public
{ Public declarations }
published
{ Published declarations }
property test : boolean
Read FTest
Write SetNumber;
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('
Samples', [TEdit1]);
end;
end.