MyChat Scripts Engine: mDBStorageSetData

MyChat Scripts Engine: mDBStorageSetData

Сохранить строку во встроенную базу данных по указанному ключу.

 

Синтаксис

function mDBStorageGetData(sKey, sData: string): integer;

 

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

Параметр

Тип

Значение

sKey

string

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

sData

string

содержимое ключа, текстовая строка. Может быть пустой.

 

Результат функции

0

функция выполнена успешно;

-1

значение ключа не может состоять из пробелов или быть пустым.

 

Пример

const
  TOTAL = 12;
var
  i: integer;
  sKey, sData: string;
  dt: double;
begin
  mLogScript('Start saving month names to database...', '');

    for i := 1 to TOTAL do begin
      dt := EncodeDate(2018, i, 1); 
      sData := FormatDateTime('mmmm', dt); // name of month
      mDBStorageSetData('month_name_' + IntToStr(i), sData);
    end;
    
  mLogScript('Ready. Start reading:', '');  

    for i := 1 to TOTAL do begin
      sKey := 'month_name_' + IntToStr(i);
      mLogScript('Key: ' + sKey + ', value: "' + mDBStorageGetData(sKey) + '"', '');  
    end;  
end.

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

[19:36:15] (Log "DBStorage"): Start saving month names to database...

[19:36:15] (Log "DBStorage"): Ready. Start reading:

[19:36:15] (Log "DBStorage"): Key: month_name_1, value: "Январь"

[19:36:15] (Log "DBStorage"): Key: month_name_2, value: "Февраль"

[19:36:15] (Log "DBStorage"): Key: month_name_3, value: "Март"

[19:36:15] (Log "DBStorage"): Key: month_name_4, value: "Апрель"

[19:36:15] (Log "DBStorage"): Key: month_name_5, value: "Май"

[19:36:15] (Log "DBStorage"): Key: month_name_6, value: "Июнь"

[19:36:15] (Log "DBStorage"): Key: month_name_7, value: "Июль"

[19:36:15] (Log "DBStorage"): Key: month_name_8, value: "Август"

[19:36:15] (Log "DBStorage"): Key: month_name_9, value: "Сентябрь"

[19:36:15] (Log "DBStorage"): Key: month_name_10, value: "Октябрь"

[19:36:15] (Log "DBStorage"): Key: month_name_11, value: "Ноябрь"

[19:36:15] (Log "DBStorage"): Key: month_name_12, value: "Декабрь"

[19:36:15] (Run "DBStorage"): Время выполнения скрипта: 199 мс

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

 

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

EncodeDate

IntToStr

FormatDateTime

mDBStorageGetData

mLogScript