MetaModule.PkI: Integer
Номер первичного ключа в списке полей

Метод PkI возвращает номер поля первичного ключе в списке полей.

Если такого поле нет, возвращается -1.

Procedure OnCreate;
Var
  i : Integer;
  m : MetaModule;
Begin
  For i:=0 to Meta.ModulesCount - 1 Do
  Begin
    m := Meta.Module(i);
    Warning(ToStr(i) + '. ' + m.Name + ' ' + ToStr(m.PkI));
  End;
End;

© RTIT