Delphi 5 - Eigene Edit-Komponente mit meiner Prozedur

[DeMoehn]

Guten Abend liebe User.

Ich habe ein kleines Schulprojekt vor mir und möchte nun eine eigene Edit-Komponente erstellen.
Dazu hatte ich bereits eine Funktion gefertigt welche bei Verlassen der Edit-Box die Zahelen von 1-9 eine 0 vorordnet und Zahlen größer 15 erkennt.

Dies sah so aus:

Delphi-Quellcode:

  
procedure _SetupEdit(aEdit : TEdit);
Begin
  aEdit.onExit := AnyEditExit;
End;

--> Als Prozedur welche in eier Schleife so angewandt wurde

_SetupEdit (TEdit(FindComponent('Edit'+IntToStr(i)))); Die Prozedur AnyEditExit sieht so aus:

Delphi-Quellcode:

procedure TForm1.AnyEditExit(Sender: TObject); // Prozedur für die Editfelder
var
  field: TEdit;
  eingabe: integer;
begin
  field := Sender as TEdit;
  if(field.Text <> '') then begin
    if(TryStrToInt(field.Text)) then begin
      eingabe := StrToInt(field.Text);
      if(eingabe > 15) then begin
        ShowMessage('Zahl zu groß');
        field.Text := IntToStr(15);
      end;
      if((StrToInt(field.Text[1]) = 0) and (field.Text[2] = '')) then
        field.Text := '0'+field.Text
      else if(((eingabe < 10) and (eingabe <> 0)) and (Length(field.Text) < 2)) then
        field.Text := '0'+field.Text;
    end
    else
      ShowMessage('kein gültiger Integerwert');
  end;
end;

Nun möchte ich das ganze in eine Komponente packen die das ganze regelt aber ich hab keine wirklich Ahnung wie das möglich ist.

Ich möchte keine direkten Lösungsvorschläge.
Tipps, Hinweise und Links wären mir auch schon sehr recht.

EDIT: Kann man diesem Edit-Feld auch einfach noch einen Boolean-Wert mitgeben?
z.B. Edit32.note und da steht dann true oder false?

Mit freundlichen Grüßen