mit Komponente Form ansprechen?

[Andreas L.]

Oder so (wenn die Komponente von TComponent abgeleitet ist):

Delphi-Quellcode:

function TMyComp.GetForm: TForm;
begin
  Result := nil;
  if Owner is TForm then
    Result := TForm(Owner);
end;

Das geht aber nur wenn die Komponente aufs Formular gelegt wird oder bei Create als AOwner ein Formular übergeben wird.