Str2DateTimeFmt [Delphi, Windows]
z00100 © (2002-09-20 01:18:00)
Здравствуйте. Пытался тут с временем поработать. В результате
выполнения следующего кода
s :string;
d :double;
...
s:="18:04:44";
d:=Str2DateTimeFmt("HH:mm:ss",s);
в d остается 0 [ноль]. Что я неправильно делаю?
Gandalf (2002-09-20 09:00:00) [1]
У тебя ведь только время, а ты хочешь преобразовать в
Дату_и_Время. КОЛ смотрит:
function SystemTime2DateTime(const SystemTime : TSystemTime;
var DateTime : TDateTime ) : Boolean;
var I : Integer;
Day : Integer;
DayTable: PDayTable;
begin
Result := False;
DateTime := 0.0;
DayTable := @MonthDays[IsLeapYear(SystemTime.wYear)];
with SystemTime do
if (wYear >= 1) and // <--- Все, дата неверна выдает
"нуль"
Наверх 
ЧАТ |
Орешник |
|
