Здравствуйте 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;