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.