Dynamische Frames - Probleme

[junale]

Ich habe die Prozedur abgeändert:

Delphi-Quellcode:

procedure TAboutFrame.InitPlugIn (Sender: TObject; Sheet: TTabSheet);
begin
  if (Sender <> nil) then begin
    if (Sender is TTAbSheet) then begin
      ShowMessage (Sender.ClassName);
      (Sender as tTabSheet).Caption := 'About Dialog';
    end;
  end;
end;

Nun funktioniert das Ganze so wie ich wollte, aber......

Warum ist der Sender mein TTabSheet?!? Müsste das nicht die Form sein - Aufrufeder Code steht in der Form.OnCreate

Delphi-Quellcode:

      p := aFrame.MethodAddress ('InitPlugIn');
      if Assigned (p) then
        p (self, aSheet);

Ich verstehs nimmer... Ich dachte bisher das ich wüsste was SELF bedeutet, aber dies ist der Gegenbeweis....

mfg,
Alex