qual campo � a primary Key da tabela

Question

Bom estou usando:Delphi7 - MYSQL4.1 - Zeos6.6.1como saber qual campo � a primary key de uma tabela ?...

Fabiano G�es · Answer

galera consegui uma solu��o se alguem precisar est� ai:

no Mysql existe um comando: �describe TableName� que lista a estrutura da tabela inclusive qual campo � primaru key ent�o criei um metodo que retorna uma string com o nome do campo chave.

function GetFielKey(var ACon: TZConnection; const ATableName: string): string;
var
   qry: TZQuery;
begin
   qry := TZQuery.Create(nil);
   try

      qry.Connection := ACon;
      qry.SQL.Text   := �describe � + ATableName;
      ACon.Connect;
      qry.Open;

      while not qry.Eof do
      begin
         if qry.FieldByName(�Key�).AsString = �PRI� then
         begin
            Result := Trim(qry.FieldByName(�Field�).AsString);
            Break;
         end;

         qry.Next;

      end;
   finally
      qry.Free;
   end;
end;

abra�o !!!!

Martins · Answer

Valew por ter compartilhado a informa��o com a turma aqui do f�rum.Bons c�digos....

Fabiano G�es · Answer

Martins,estive eu tambem acho que todos deveriam finalizar os posts,as vezes n�o sabemos se houve uma solu��o ou n�o.agora sobre compartilhar a informa��o, j� me sinto parte da familia aqui,aprendi tanto com voc�s que o minimo que posso fazer � compartilhar as imforma��es que eu tiver e tentar ajudar.abra�o !!!!...

F�rum qual campo � a primary Key da tabela #345569