Показать сообщение отдельно
  #12  
Старый 03.02.2013, 03:40
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Цитата:
Сообщение от alexusankov
...Как мне сделать, чтобы не ко-во минут показывалось, а кол - во часов / минут.
Т.е. не 190 а 3,10
...
Можно и так:
Код:
function LenPlay(ds: integer): string;
var
 hour, min, sec: integer;
begin
 min := ds div 60;
 hour:= min div 60;
 if min > 60 then min:= min mod 60;
 sec := ds mod 60;
 Result:= FormatDateTime('h:mm:ss', EncodeTime(hour, min, sec, 0));
end;
А лучше всего в хелпе про функции для работы со временем прочесть.
Ответить с цитированием