Parameterübergabe mit Datenmodul

[needatip]

Hallo zusammen.
Hab folgendes Problem.
Wie kann ich einer Prozedur die Parameter (in diesem Fall AdoQuery) übergeben,
wenn die Query in einem Datenmodul liegt?

Wenn die ADOQuery direkt auf dem Formular liegt, funktionierts.

procedure DuplicateRecord(DataModule1.MyQuery: TADOQuery); funktioniert ja nicht !

Meine Deklaration sieht so aus.

Delphi-Quellcode:

type
  TDataWindow = class(TForm)
    Label11: TLabel;
    Label12: TLabel;
    Label13: TLabel;
 procedure BitBtn1Click(Sender: TObject);
  private
    Felder: TStrings;
    procedure DuplicateRecord(DataModule1.MyQuery: TADOQuery);
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

procedure TForm1.DuplicateRecord(MyQuery: TADOQuery);
var i,max: integer;
begin
  max := MyQuery.fields.count - 1;
....
end;

Kann mir hier jemand weiterhelfen ?