Вопрос по DateTime
От: serjhp  
Дата: 15.10.02 11:38
Оценка:
Подскажите с помощью какой функцией можно преобразовать DateTime в переменную типа float где год,месяц,день были целым числом т.е. до запятойв (днях) а время после запятой с секунда.
Re: Вопрос по DateTime
От: ToShA_2K Россия  
Дата: 15.10.02 11:42
Оценка:
Здравствуйте serjhp, Вы писали:

S> Подскажите с помощью какой функцией можно преобразовать DateTime в переменную типа float где год,месяц,день были целым числом т.е. до запятойв (днях) а время после запятой с секунда.


RTFM !!!!
type TDateTime = type Double;
Re[2]: Вопрос по DateTime
От: serjhp  
Дата: 15.10.02 11:54
Оценка:
Здравствуйте ToShA_2K, Вы писали:

T2>Здравствуйте serjhp, Вы писали:


S>> Подскажите с помощью какой функцией можно преобразовать DateTime в переменную типа float где год,месяц,день были целым числом т.е. до запятойв (днях) а время после запятой с секунда.


T2>RTFM !!!!

T2>type TDateTime = type Double;
Он не преобразует этой функцией в нужный мне тип (3512.76494)
procedure TForm1.DateTimePicker1Change(Sender: TObject);
type TDateTime = type Double;
begin
Label9.Caption:=DateToStr(Date);
end;
Re: Вопрос по DateTime
От: Hacker_Delphi Россия  
Дата: 15.10.02 12:07
Оценка:
Здравствуйте serjhp, Вы писали:

S> Подскажите с помощью какой функцией можно преобразовать DateTime в переменную типа float где год,месяц,день были целым числом т.е. до запятойв (днях) а время после запятой с секунда.

var
  DT: TDateTime;
  DTF: Real; //Float :)
begin
//...
  DTF := DT; // Вуаля! все готово... Delphi хранит дату/время именно в таком формате... :)
end;
Если при компиляции и исполнении вашей программы не происходит ни одной ошибки — это ошибка компилятора :)))
Re[3]: Вопрос по DateTime
От: &reY Украина http://www.livejournal.com/~1000turov/
Дата: 15.10.02 13:40
Оценка:
Здравствуйте serjhp, Вы писали:

S> Label9.Caption:=DateToStr(Date);


используй
FloatToStr(Date);
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.