[Demonuka]

Такая проблема...Время можно перевести в значение (типа дроби) с помощью STime:=StrToTime(FormatDateTime('hh:nn',now)); А как в подобное значение перевести не время, а некий интервал? Ну например 25 минут...

[Assistant]

если я Вас правильно понял, то:

Код:

var
  STime: TTime;
  minutes: integer;
begin
  minutes := 25;
  STime := StrToTime(minutes * 60);
end;

нужно просто перевести в секунды, а дробное значение, это когда TDateTime - тут время, это значение в секундах после точки в дроби.

[Demonuka]

Нет...При использовании

Код:

STime:=StrToTime(FormatDateTime('hh:nn',now))

Экспериментальным путем было выяснено, что в 12.00 значение STime=0,5.

[NumLock]

а в справке про это написано!!!

TDateTime represents a date-and-time value in the Delphi language.
The integral part of a Delphi TDateTime value is the number of days that have passed since 12/30/1899. The fractional part of the TDateTime value is fraction of a 24 hour day that has elapsed.

т.е. 1/24 = 1 час, 1/(24*60) = 1 мин, соотв. (1/(24*60))*25 = 25 мин.

[Assistant]

видать я туплю )) работаю много, всю ночЪ

[Demonuka]

NumLock, Я тоже это в справке вычитал...проверил-не так это...но сейчас понял, что пропустил один ноль после запятой! Спасибо! )) Если кому понадобится, 1 минута=0,0006944444444444