wie kann man Table.TableName mit TQuery realisieren?

[eddy]

Hallo Leute,

bei der näheren Betrachtung von TQuery komme ich nicht weiter.

Mit welchem Befehl bzw. welcher Befehlsfolge kann ich

Code:

var 
  pn, fn : string;

//....
  pn := Table.DatabaseName;
  fn := Table.TableName;

realisieren?

Oder muß ich mir den Dateinamen aus den SQL-Anweisungen herausfiltern?

mfg
eddy

[Schuster]

Warum willst du denn das machen

Datenbankname und Tablename wirst du doch wissen oder hast ja auch die DB erstellt.

Aber wenn es dir um Abfragen geht dann funkt das so:

Delphi-Quellcode:

with QueryX do
begin
    sql.clear;
    sql.add('Select * from Datenbankname.TableName where FeldName = ' + Quotedstring('WirdGesuchtText'));
    open;
end;

[Albi]

Hallo,

die TQuery Kompo kennt ebenfalls die DatabaseName Eigenschaft. Aber da du in der Query mehrere Table/DB ansprechenden kann, wird es wohl schwer werden die einzelne - wie bei der Table Kompo - festzustellen.

[eddy]

Hallo Schuster,

weil es Unterprogramme und Funktionen gibt, die eben genau das nicht wissen.
Hier ein Beispiel:

mit Datei öffnen wird einer TableX (TTable) ein Verzeichnis und Name zugewiesen.
Über eine DataSourceX (TDataSource) wird diese Tabelle an ein DBGridX (TDBGrid) gebunden.
Es kann jede beliebige Datei des entsprechend zulässigen Typs geöffnet werden, also ist der Dateinamen variabel. Mit nachfolgendem UP soll die Anzahl der Datensätze auf ein Panel gebracht werden und im Hint Verzeichnis und Name der tatsächlich geöffneten Datei angezeigt werden.

Code:

procedure UP_WrAnz(tab : TTable; pan : TPanel);
begin
  if tab.Active then begin
    pan.Caption := format('Anz=%d',[tab.RecordCount]);
    pan.Hint := tab.DatabaseName + tab.TableName;
  end
  else pan.Caption := '';
end;

Beim Ersatz von TTable durch TQuery ist diese Funktion also so nicht mehr verwendbar, weil es kein Query.TableName gibt.

mfg
eddy

[Jasocul]

Außerdem kannst du in einem SQL-Statement mehrere Tabellen einer Datenbank einbinden. Da gibt es dann keinen eindeutigen Tabellennamen, den man irgendwo eintragen könnte.