Dein Problem verstehe ich nicht so ganz. Du willst von einen gegebenen Control auf das Frame schießen, auf das sich das Control befindet?
Vlt. hilft dir das?!
Delphi-Quellcode:
function GetParentFrame(AControl: TControl): TFrame; // Ungetestet
begin
While not (Control is TFrame) and (AControl.Parent <> nil) do
Control := Control.Parent;
If Control is TFrame then Result := TFrame(Control)
else Result := nil;
end;
