Komponente erstellt --> Name der Komponente ermitteln wie?

[Schuster]

Hallo Leute

bin am erstellen div. Komponente für Delphi 2005 PE und MySql.

Habe folgende Componenten: TMaxMySqlCon, TMaxMySqlQuery und TMaxMySqlGrid.

Nun hab ich folgendes Problem:
Damit das Grid befüllt wird möchte ich anhand der Query-Componente feststellen welches Grid mit dem
Query verbunden ist, damit ich nachher bei Abfragen über dieses Query die Daten an das Grid übertragen kann.

Nur wie bekomme ich den Namen des Grid heraus??
Hab mir das in etwa so vorgestellt das es funktionieren könnte:

Delphi-Quellcode:

function TMaxMySqlQuery.FsucheGridKomponente():String;
var x : Integer;
begin
    for x:=0 to Self.Owner.ComponentCount-1 do      //Anzahl der Komponenten feststellen
      if Self.Owner.Components[x] is TMaxMySqlGrid then   //Prüfen welche v. meinen Grid sind
         if  string((Self.Owner.Components[x] as TMaxMySqlGrid).Datasource) = Self.name then  //irgenwas falsch
           result:= Self.Owner.Components[x].Name
         else
           result:= 'NULL';
end;

Leider funktioniert es so nicht mir wird immer NULL zurückgeliefert.
Habe es auch schon in Einzelschritten durchgemacht nur bekomm ich aus irgeneinen Grund nicht vom
Grid die Datasource heraus.