Программно "Показать все"

[HaHa]

В SDK нашел ZoomEntireDocument, но прикрутить к библиотеке не могу, не подскажете как вызывается?

[Sabahs]

Это не для библиотеки, а для приложения, подробнее см. пример ksActiveX и компонент KGAX.

[HaHa]

ну да, а для библиотеки тогда есть "Показать все"?

[Sabahs]

Один из вариантов - ExecuteKompasCommand(ksCMZoomEntireDocument,True);

[HaHa]

Спасибо

[Mihonius]

Для библиотеки проще всего так:
if ikompas = nil then exit;
iDoc    := ksDocument2D( iKompas.ActiveDocument2D );
iDoc.ksZoomPrevNextOrAll(2);

[Sabahs]

Можно, но в коде есть ошибка.
if (ikompas = nil) and (idoc = nil) then exit; - проверяете idoc раньше, нежели получаете в следующей строке.
iDoc    := ksDocument2D( iKompas.ActiveDocument2D );