Определение типа документа

[Frost]

Подскажите пожалуйста, как определить тип текущего (открытого) документа, чтобы в зависимости от того чертеж это или спецификация выполнялись нужные процедуры. (p.s пишу на Delphi). Заранее спасибо!

[yarikv]

iKompas.ksGetDocumentType(0)