Как сохранить документ если...

[AndreySt]

--компас 5.11
Помогите пожайлуста!!! Я вызываю форму:
procedure LibraryEntry( command: WORD ); pascal;
begin
  SaveFm := TSaveFm.Create(nil);
  SaveFm.Show;
end;

На форме необходимо по нажатию кнопки что бы сохранялся текущий(для компаса) документ
У меня это делается так:
  В ней для документа вызывается
  функция SaveDoc(path: string)
  begin
    iKompas := KompasObject(CreateKompasObject);
    iDoc := ksDocument2D(iKompas.ActiveDocument2D);
    SaveDocument(0,path);//но текущий документ не сохраняется т.к. idoc=nil
  end;
:?:Как можно ещё получить указатель на активный(текущий) документ.
    iDoc := ksDocument2D(iKompas.ActiveDocument2D) - не работает!!!!!!!!Почему и что можно сделать и можно ли
получить указатель на текущий документ?НЕЕELLР

[Slaviation]

Может
iDoc.ksSaveDocument(path); ?

[AndreySt]

дело в том что idoc равен nil при использовании того кода который описан в вопросе

[333]

По выходу из LibraryEntry API в Компас 5 выгружается
Выхода два или делать модальный диалог или использовать SystemControlStart