Валентин, как насчет того что бы реализовать одометр через ини файл настройки??
т.е." трим А" пробег за поездку и рядом одометр общий...программно не очень тяжело
dist:= dist(InI) + deltadist и есть Трим А
или так
d :=StrToInt(Form3.Edit1.Text);
TimeReal := GetTickCount;
deltaTime := timeReal-TimeOld;
dist := dist + a *((deltaTime)/3600000);
dist2 :=d+dist; // рассчет пробега одометра
TimeOld := TimeReal;
Label2.Caption:=Format('%0.1f km',[dist2]);
код может и не правильно написан но при тесте на компе у меня отчитывает , только я применил Edit пока, не разобрался с ини файлами ;-)
правда еще пока не допетрил как сохранять новое значение, не постоянно же его переписывать(((
|