Ereigniss in DLL auslagern

[Christian18]

Hallo,

kann man ein Ereigniss in einer DLL auslagern? Ich meine Zum Beispiel:

Delphi-Quellcode:

procedure Edit(Sender: TObject);
begin
  if TEdit(Sender).Color = clBlack then
    begin
      TEdit(Sender).Color:=clGreen;
    end
  else
    begin
      TEdit(Sender).Color:=clBlack;
    end;
end;

Aufruf:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Edit1.OnEnter:=Edit;
  Edit1.OnExit:=Edit;
end;