Галактика в вопросах и ответах

Проблема в следующем:
Нужно напечатать "карточку организации" (типа там название, адрес, всякие ИНН-ы и т.п.). Из интерфейса "редактирование организации" печати нет, из списка организаций печатается полный список... Стало быть, надо писать свой интерфейс просмотра с реакцией на Ctrl+P (чтобы пользователю привычно было).
С самим интерфейсом проблемы нет, только вот не знаю - какую константу статуса надо подцепить и как событие называется (cm???).

Событие называется cmprintdoc,
кажется, вызывается во всех стандартных контекстах, с контекстом sci178inspm точно работает

http://www.tyumbit.ru/gal_forum/viewtop ... en&start=0

вот тут Maverick выложил статусы

Можно и без Ctrl+P, если в фейсе нарисовать кнопочку "напечатать" и повесить на нее свое событие с любым именем.

Спасибо всем!
to oiko
Про кнопочку нарисовать я знаю, но не хотелось... Стандартное все же симпатичнее и пользователям привычнее:)

У меня голова кругом

Пишу:

Код: Выделить всё

Interface Client_Kart_Choice ('Выберите организацию',, sci13EnEsc) DoAccept, EscClose, Cyan;
...
browse b1;
...
HandleEvent
  cmInit:...
  cmPrintDoc: message('Печать');
  ...
end;
end.

Нажимаю Cnrl+P, и тишина...
Помогите!!!

Код: Выделить всё

browse b1 (,,sci178inspm);

в смыле надо контекст указать где ctrl-P есть.
признаком наличия его в контексте окажется наличие символа принтера в панеле инструментов

Символ принтера на панели инструментов есть... Но реакции на Ctrl+P нет

Может быть, значение константы изменилось?
В имеющемся у меня cmconst.inc прописано cmPrintDoc = 3011;

cmPrintDoc = 3440;

Спасибо!!!!

Галактика в вопросах и ответах

Активизация Ctrl+P в своем интерфейсе

Активизация Ctrl+P в своем интерфейсе