Wenn ich dich richtig verstehe, möchtest du dem Event einer Komponente per Quelltext eine Behandlung zukommen lassen, oder?
Kein Problem - du musst dir eine Prozedur erstellen, die die gleichen Parameter hat, wie das Event sie erwartet, und nach dem Erstellen der Komponente diese Prozedur dem entsprechenden Event zuweisen:
Delphi-Quellcode:
interface
type TMyForm = class(TForm)
button1: TButton;
procedure FormCreate(Sender: TObject);
procedure MyClickHandler(Sender: TObject);
end;
implementation
procedure TMyForm.MyClickHandler(Sender: TObject);
begin
DoSomething;
bzw.
"und dann halt der Quellcode, mit dem der Button belegt werden soll" ;-)
end;
procedure TMyForm.FormCreate(Sender: TObject);
begin
button1 := TButton.Create(Self);
button1.Parent := Self;
button1.OnClick := MyClickHandler;
end;