В соответствии с документацией «Описание COM-сервера АвтоГРАФ.doc» а так же веткой «
http://board.tk-chel.ru/index.php?t=1103&o=0&st=10», дополнительно изучили пример для MS Excel.
Разрабатываем ПО для получения данных из системы AutoGRAPH.
Для разработки используем Embarcadero® Delphi® 2010 Version 14.0.3593.25826, ОС Win7x64, АвтоГРАФ 4.0.6
Стоит задача в получении израсходованного за период топлива и пробег.
Пишем:
var
Autograph : IAutoGRAPHAutomation;
Begin
Autograph := CoAutoGRAPHAutomation.Create ;
Autograph.StartComputing(SysAllocString(PChar('Car sList.ini')), 3001539, WideString(PChar('01.07.2016 00:00:00')), WideString(PChar('07.07.2016 00:00:00')), WideString(PChar('GSM')), 1);
//ждем пока Autograph.ComputingPercents
//тут же видем в АвтоГРАФе что указатель позиционируется на нужном нам транспорте и считает данные
//Пробуем получить данные
ListCars.Items.Add(FloatToStr(Autograph.TripsNum)) ; // возвращает количество рейсов, вопросов нет.
ListCars.Items.Add(Autograph.TripRealCont) ;
ListCars.Items.Add(FloatToStr(Autograph.TripTank1S tartLevel)) ;
ListCars.Items.Add(FloatToStr(Autograph.TripDistan ce)) ;
// ничего не возвращает
End ;
Подскажите пожалуйста что мы делаем не так?