TFRame Events während der Laufzeit erzeugen

[Sir Rufo]

Wenn die Controls im Frame selber erzeugt werden, dann sollte der Code so aussehen:

Delphi-Quellcode:

procedure TFrameX.foo;
var
  currentLabel: TLabel;
begin
  currentLabel := TLabel.Create( Self ); // Self verwenden!
  currentLabel.Parent := Self; // Self verwenden!
  currentLabel.OnClick := ...
end;