Получить настройки рекламного 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"): Скрипт выполнен успешно.