consultar se existe chave primaria em dataset

Tenho esta rotina abaixo:

IF DATASET.FindField(´PRIMARYKEY´) <> nil then
begin
oGrid.DefaultFields:= False;
oGrid.CreateDefaultColumns(dsSelect.Dataset, Self);
oGrid.KeyField := [b:b68c25d3a8](COLOCAR NOME DO CAMPO ENCONTRADO)[/b:b68c25d3a8]
oGrid.Filter.Active:= True;
END;

**********
Estou testando se um determinado dataset possui chave primaria, e se existir preciso passar o campo (resultado) que esta no campo chave primaria para o KeyField.
Como faço isso? Para testar se um dataset tem chave primaria é desta forma mesmo?

Obrigado.