MSL: функция mGetAdvOptions, получить настройки рекламного HTML-баннера для пользователей

MSL: функция mGetAdvOptions, получить настройки рекламного HTML-баннера для пользователей

Получить настройки рекламного HTML-баннера, встроенного в MyChat Client. Баннер может быть любой HTTP(s) ссылкой или html-файлом, расположенным в папке "C:\ProgramData\All Users\MyChat Server\node\userdata\".

 

Синтаксис

procedure mGetAdvOptions(var bEnable: boolean; var sAdvLink: string; var iAdvHeight, iAdvQuantity: integer);

 

Параметры и возвращаемые значения

Параметр

Тип

Значение

var bEnable

boolean

включен или выключен баннер в данный момент;

var sAdvLink

string

имя файла или http(s) ссылка для баннера;

var iAdvHeight

integer

размер баннера в точках по вертикали;

var iAdvQuantity

integer

частота, с которой приложение пользователя должно обновлять баннер с сервера, в минутах.

 

Пример

var
  bEnable: boolean;
  sAdvLink: string;
  iAdvHeight, iAdvQuantity: integer;
begin
  mGetAdvOptions(bEnable, sAdvLink, iAdvHeight, iAdvQuantity);
  
    if bEnable then begin
      mLogScript('MyChat adverts engine enabled', '');
      mLogScript('Link or filename: "' + sAdvLink + '"', '');
      mLogScript('Banner height in pixels: ' + IntToStr(iAdvHeight), '');
      mLogScript('Updates quantity, every ' + IntToStr(iAdvQuantity) + ' minutes', '');
    end else mLogScript('MyChat adverts engine disabled', '');
end.

Результат работы скрипта

[15:48:08] (Log "mGetAdvOptions"): MyChat adverts engine enabled

[15:48:08] (Log "mGetAdvOptions"): Link or filename: "example.html"

[15:48:08] (Log "mGetAdvOptions"): Banner height in pixels: 60

[15:48:08] (Log "mGetAdvOptions"): Updates quantity, every 90 minutes

[15:48:08] (Run "mGetAdvOptions"): Время выполнения скрипта: 8 мс

[15:48:08] (Run "mGetAdvOptions"): Скрипт выполнен успешно.

 

Ещё посмотреть

IntToStr

mLogScript