Скрипт, вызывающий диалоговое окно при прокатывании ПДС-карты

Скрипт выводит сообщение (допустим "Нет анкетных данных") при условии, что параметр «ПДС показывать инфо о карте» отключен.

Скрипт в событии OnProcessCard основной формы редактирования заказа:

procedure DesignFormOnProcessCard(IntfID, EntranceCardType: integer; CardCode: string; RKCardInfo: TRKCardInfo; var res: integer);
begin
if trim(RKCardInfo.CardAddInfo)<>'' then
begin
gui.showmessage('CardAddInfo = '+RKCardInfo.CardAddInfo);
res := 0;
// dbg.dbgprint('CardAddInfo = '+RKCardInfo.CardAddInfo);
end;
end;
DELPHI