Komponenten über Variablen ansprechen

[oltrop.de]

Hallo Zusammen,

ich habe 3 Datenbankabfragen, die 3 verschiedene Connections (Mandanten) nutzen.
qryGetBestand
qryGetBestandF02
qryGetBestandF08


Im Code steht jezt z.B.

with DMServer.qryGetBestand do
begin
....
end;

Kann ich das irgendwie ersetzen, das er über eine Variable die richtige Abfrage nutzt?
Ich will den Code nicht 3x schreiben, sondern je nach Situation eine der 3 Abfragen aufrufen.

So klappt es nicht:

var
Abfrage : String;

begin
Abfage := 'DMServer.qryGetBestandF02';

with Abfrage do
begin
....
end;


Zum Hintergrund: Es handelt sich hier um ein Server-Programm, welches von mehreren Scannern angesprochen wird.
Je nach Mandant muss ich verschiedene Datenbanken ansprechen. Ich regel das jetzt über verschiedene Connections und verschiedenen Queries.
Ich will nicht jedesmal die Connection innerhalb der Abfrage umbiegen. Könnte zu Problemen bei mehreren gleichzeitigen Anfragen kommen.
Jemand eine Idee?

Ich hoffe ihr versteht was ich möchte

Gruß Christian

[Delphi.Narium]

Delphi-Quellcode:

var
Abfrage : TQuery; // bzw. der Typ, von dem qryGetBestand, ... sind.

begin
  Abfrage := DMServer.qryGetBestandF02;
  with Abfrage do
  begin
    ....
  end;

[oltrop.de]

Eigentlich ganz einfach

Vielen Dank für Deine Hilfe.
Habs schon ausprobiert. Klappt!