GUI — класс, содержащий графические функции r_keeper 7.

Методы:

НазваниеПараметрыОписание
procedure ShowMessage(const MsgTxt: string);
  • @param MsgTxt — текст сообщения
  • @see RKMessageDlg — диалоговое окно
Создает и отображает окно с сообщением
function RKMessageDlg(const Msg: string; DlgType: BYTE; Buttons: WORD; Delay: integer): integer;
  • @param Msg — текст сообщения
  • @param DlgType — тип диалога
  • @param Buttons — набор кнопок
  • @param Delay — задержка, в течении которой нельзя будет закрыть сообщение
  • @see ShowMessage — показать сообщение
Позволяет озадачить пользователя каким-то выбором 
function MessageDlgEx(const Msg: string; DlgType: TMsgDlgType; Buttons: word; ButtonCaptions: string): integer;
  • @param Msg — текст сообщения
  • @param DlgType — тип диалога
  • @param Buttons — набор кнопок. Сумма констант mbYes+mbNo и т. д.
  • @param ButtonCaptions — заголовки кнопок, через ";"
  • @return — выбранная кнопка
Диалоговое окно с определенными заголовками кнопок
function InputBox(const ACaption, APrompt, ADefault: string; UseNumericKeyboard: boolean): string;
  • @param ACaption — заголовок формы
  • @param APrompt — текст подсказки
  • @param ADefault — начальный текст
  • @param UseNumericKeyboard — какую клавиатуру использовать:
    • числовую — true
    • для ввода текста — false
  • @return — введенный текст
Открыть форму для ввода текста
function FindComponentByName(const CompName: string): Tcomponent;

@param CompName — имя компонента

@return — Компонент в случае удачи, nil — в другом случае

Ищет компонент на активной в данной момент форме, в случае неудачи возвращает nil
procedure CmdExec(const CmdLine: string);@param CmdLine — командная строкаЗапустить стороннюю программу
function CmdExecWithFlags(const CmdLine: string; CmdWindowState: integer; HideCashWindow: boolean): boolean;
  • @param CmdLine — командная строка
  • @param CmdWindowState — параметры окна для запускаемой программы
  • @param HideCashWindow — нужно ли скрывать окно с кассой
  • @return — результат выполнения программы
Запустить стороннюю программу с возможностью указать параметры открываемого окна
function SwitchToProgram(const aCaption, aClassName: string): boolean;
  • @param aCaption — заголовок программы
  • @param aClassName — имя класса окна
  • @return — результат выполнения команды. True — если переключение произошло
Переключиться на стороннюю программу

Для просмотра остатков в aCaption передать заголовок, который отображается в клиенте Store House 5, aClassName — оставить пустым.

Пример скрипта:

gui.CmdExec('C:\UCS\StoreHouse_5\Client\sh.exe');
GUI.CmdExecWithFlags('.\runxml.bat', SW_HIDE, false);
GUI.SwitchToProgram('StoreHouse', '');
CODE
procedure Minimize();
Минимизировать окно с программой
procedure Hide();
Скрыть окно с программой

 Свойства:

НазваниеТипОписание
property ActiveForm: TCustomForm read getActiveForm;RЭкземпляр активной в данный момент на кассовой станции формы или nil, в случае отсутствия таковой
property ActiveControl: TVisualComponent read getActiveControl;RКомпонент, на котором в данный момент находится фокус
property CheckFormInPayMode: boolean read getCheckFormInPayMode;RФлаг Касса находится в режиме расчета
property CheckFormInCouponMode: boolean read getCheckFormInCouponMode;RФлаг Касса находится в режиме выбора купонов
property CanAddNextDish: boolean read getCanAddNextDish;RФлаг Контекст позволяет добавление блюд
property Tag: integer read FTag write Ftag;RWЧисловое поле для использования в скриптах 
property StrTag: string read FStrTag write FStrTag;RWБуквенное поле для использования в скриптах