RkPayQR - вывод QR-кода фискального чека на второй экран

Необходимо добавить скрипт на форму по аналогии со статьей RkPayQR - Настройки под фастфуд (Быстрый чек).

• Перейти в редактирование формы быстрого чека, один раз нажать на белую зону (CheckView) и во вкладке События нажать двойной клик на пустое поле возле OnOrderVerify:
  

  

• Вставить следующий скрипт:

procedure CheckViewOnOrderVerify(Sender: TObject; AVerifyType: TVerifyType; oper: integer; var AContinue: boolean);
var
rkqrOrder,rkqrQuery:string;
rkqrI,rkqrJ:integer;
begin
 if(AVerifyType=vtAfterReceipt) then
 begin
 rkqrOrder := RKCheck.CurrentOrder.Guidstring;
 rkqrI:=Pos('{', rkqrOrder); 
 rkqrJ:=Pos('}', rkqrOrder);
 rkqrOrder := copy(rkqrOrder,rkqrI+1,rkqrJ-rkqrI-1);
 //GUI.ShowMessage('Произошла оплата по заказу '+rkqrOrder);
 rkqrQuery:='http://127.0.0.1:6800/terminal/closeCheck/'+rkqrOrder;
 httppost(rkqrQuery,'QR Fisc',rkqrQuery);
 end;
end;

• При необходимости сменить ip-адрес в переменной rkqrQuery на ip-адрес клиента RkPayQR

Результат показан на скриншоте: