Olá amigos Delphianos,

Preciso enviar para minha tela de pesquisa os campos chaves e o nome da
tabela de Datasource.

Tentei o seguinte:

procedure chamarLog(DS : Dataset);
var Tabela : TTable;
     Campo: String;
begin
  if (DS.State in [dsInsert, dsEdit)  then
  begin
   Campo := DS.Fields[0].FieldName; //retornar o campo chave
   Tabela :=  (DS as TTable).TableName); //retornar o nome da tabela
 end;
end;

Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em
qq posição da tabela.

 Alguém poderia ajudar-me nesse problema ?


Agradeço,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF


[As partes desta mensagem que não continham texto foram removidas]

Responder a