CHARTIMETODOUBLE — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
Строка 1: Строка 1:
 
[[CHARTIMETODOUBLE]] - это программа из справочника [[R266]]  
 
[[CHARTIMETODOUBLE]] - это программа из справочника [[R266]]  
 
  Преобразование чарного времени в double формат "сек.мсек"
 
  Преобразование чарного времени в double формат "сек.мсек"
 +
= Текст =
 +
parameters charTime
 +
local a
 +
 +
try
 +
  a:=val(substr(charTime,1,2))*3600+val(substr(charTime,4,2))*60+val(substr(charTime,7,2))
 +
  result:=val(str(a)+'.'+substr(charTime,10,3))
 +
except
 +
  result:=0
 +
end
 
= Смотрите также =
 
= Смотрите также =
 
[[Полезные функции]]
 
[[Полезные функции]]
  
 
[[Функции Delphi]]
 
[[Функции Delphi]]

Версия 12:19, 27 марта 2018

CHARTIMETODOUBLE - это программа из справочника R266

Преобразование чарного времени в double формат "сек.мсек"

Текст

parameters charTime
local a

try
  a:=val(substr(charTime,1,2))*3600+val(substr(charTime,4,2))*60+val(substr(charTime,7,2))
  result:=val(str(a)+'.'+substr(charTime,10,3))
except
  result:=0
end

Смотрите также

Полезные функции

Функции Delphi