Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#9

AW: Tabellenname ermitteln ?

  Alt 6. Feb 2011, 18:42
Jo, RDB$. War klar. Auch Beitrag #3 hat da nichts genützt. Einfachste Möglichkeit, die ich bisher sehe ist das :

Delphi-Quellcode:
function TabellenName (DS : TpFIBDataSet) : string;
var st : string;
begin
  st := DS.SQLFieldName('ID');
  st := Copy (st,1,Length (st) - 3);
  TabellenName := st;
end;
Im Beispiel würde das "TESTTABELLE.ID" liefern. Letzt 3 Buchstaben weg => "TESTTABELLE".
Gruß
Hansa

Geändert von Hansa ( 6. Feb 2011 um 18:53 Uhr)
  Mit Zitat antworten Zitat