Pegar nome da tabela em uma Query

Delphi

31/01/2008

Tenho o seguinte caso:

Estou passando para uma query o codigo por variável

SQL: ´select * from cliente´

query.sql.text := SQL;

Como faço para pegar o nome da tabela depois que abrir a query?

Obs: o nome da tabela no caso cliente, não vai ser sempre a mesma

Se não der da query pode ser do AdoConnection

vlw


Luiz_aquino

Luiz_aquino

Curtidas 0

Respostas

Aroldo Zanela

Aroldo Zanela

31/01/2008

Colega,

Creio que uma solução seria criar uma rotina para procurar (pos) uma substring (from) dentro da string sql. Mesmo assim, normalmente as queries podem possuir associações (joins) e o resultado pode não ser exatamente uma única tabela. Qual seria a utilidade dessa rotina?


GOSTEI 0
Luiz_aquino

Luiz_aquino

31/01/2008

Desculpa pela demora, estou criando um assistente, e tem um momento que o ~usuário passa um codigo sql (select codigo from cliente) para um query; mais p frente eu preciso fazer uma nova consulta usando essa tabela, mas tenho q saber qual tabela usar, no código e o usuário não tem onde passar essa informçaõ


GOSTEI 0
Luiz_aquino

Luiz_aquino

31/01/2008

Dei uma pesquisada a mais pelo Google e encontrei isso e me ajudo bastante!!!

Use uma função ´GetTableNameFromSQL´ do próprio Delphi que está na
unit DBCommon

Flw!!!


GOSTEI 0
POSTAR