Komponenten finden auch in Datenmodul wie??

[Schuster]

Hallo

habe folgenden Code:

Delphi-Quellcode:

function TMaxMySqlQuery.FsucheGridKomponente():TComponent;
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
      begin
         if (Self.Owner.Components[x] as TMaxMySqlGrid).Datasource.Name = Self.name then
         begin
           result:= Self.Owner.Components[x];
           exit;
         end
         else
           result:= nil;
      end;
end;

Dieser Stammt von meiner Query Komponente und sucht nach einem zugehörigen Grid.(Auch Komponente von mir)

Nun hab ich das Problem, das alle abfragen nur funzen wenn das Query auf dem hauptform ist aber nicht wenn
es in einem Datenmodul ist weil dann wird kein Grid gefunden.

Denke ich muß irgendwas mit dem Owner ändern aber was???