Screen.ActiveForm.Componentsをループさせて画面上の項目を自動的にクリアする関数を作成して
使っていますが、Frameを使っているフォームは上手く機能しません、ループの中を追って見てもFream自体は
取得できるのですが、その中身までは出てきません。

　ソースから部分的に抜き出すとこんな感じです
　　　↓
　var
　　　i:integer;
　　　wCompo:TComponent;
　begin
　　　for i:=0 to Screen.ActiveForm.ComponentCount -1 do
　　　begin
　　　　　wCompo:=Screen.ActiveForm.Components[i];
　　　　　if (wCompo is TEdit) then
　　　　　　　(wCompo as TEdit).Text:='';
　　　end;
　end;

この方法だとFream上のコンポーネントを取得する事はできないのでしょうか？
それとも、他に方法があるのでしょうか？教えて下さい。