Функция StreamReadFromDatabase() считывает данные только хорошего качества для указанного канала из базы данных во внутренний поток.
StreamReadFromDatabase(Begin, End, ChannelName, OutputStream): Integer | |
Begin: Extended | Начальная дата |
End: Extended | Конечная дата |
ChannelName: String | Имя канала |
OutputStream: TStream | Поток-приемник |
Функция возвращает: 0 - успешное считывание 1 - ошибка считывания 2 - переполнение памяти 3 - указанный канал не найден 4 - выходной поток не определен |
{Pascal Script} Var res: Integer; beginData, endData: TDate; stream: TMemoryStream; nameChannel: String = 'Температура 1'; Begin beginData := now-1; endData := now; stream := TMemoryStream.Create; try res := StreamReadFromDatabase(beginData, endData, nameChannel, stream); if res = 0 then AddToDebugLog('Считывание прошло успешно') else AddToDebugLog('Ошибка считывания = ' + intToStr(res)); finally stream.Free; end; end. |
Подробную информацию об "Окне отладочной информации" можно почитать здесь.