StringGrid in einem Frame suchen

[Ykcim]

Hallo schon wieder,

ich habe ein Formular, auf dem befindet sich ein PageControl. Auf jeder Seite des PageControls befinden sich Frames.
Ich möchte jetzt vom Formular aus ein StringGrid finden, welches sich in einem Frame befindet.

Dazu dachte ich, dass ich erst einmal prüfe, welche Seite von dem PageControl activ ist, und dort das Frame finde. Danach wollte ich in diesem Frame nach dem StringGrid suchen.

Delphi-Quellcode:

var   Frame: TFrame;
      SG: TAdvStringGrid;
      I: integer;
begin
   for I := 0 to FrameControl.ActivePage.ComponentCount -1 do begin
      if Components[I] is TFrame then begin
         Frame:= Components[I] as TFrame;
      end;
   end;
   for I := 0 to Frame.ComponentCount -1 do begin
      if Components[I] is TAdvStringGrid then begin
         SG:= Components[I] as TAdvStringGrid;
      end;
   end;

Das klappt so aber nicht, denn FrameControl.ActivePage.ComponentCount -1 ergibt eine Anzahlt von Componenten von -1.

Hat jemand eine Idee, wie ich das realisieren kann?

Vielen Dank
Patrick