SQL zugriff in einer Unit

[jjep]

Hallo zusammen

Ich möchte in einer blanken Unit ohne grafischer Oberfläche mittels eines Query auf eine Datenbank zugreifen.
Dies heisst, dass ich die Query-Instanz manuell erzeugen muss...
Für dass brauch ich aber einen TComponent Object als Parameter. Wo kann ich denn das TComponent Object erstellen?

Delphi-Quellcode:

//Query1.create(AOwner:TComponent);
Query1.create;    //diese Zeile macht Probleme, da man Query1 einem TCompent zuweisen muss
With Query1 Do
  begin
  close;
  SQL.clear;
  SQL.Add('SELECT "Mitarbeiter.dbf" Where Personalnr = '+ PersNr);
  Open;
  end;
Query1.Fields[ArtNr+3].AsInteger := Query1.Fields[ArtNr+3].AsInteger + 1;
Query1.Free;

Danke schon im voraus

PS: Ich weiss selber nicht welche Datenbank ich benütze, ich erstelle meine Datenbanken durch SQL.