Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.03.10;
Скачать: [xml.tar.bz2];

Вниз

Как найти разницу времени?   Найти похожие ветки 

 
Павел   (2003-02-24 18:30) [0]

Как найти разницу времени? Пробую:
TDate:=Tdate-Tdate
Не подходит, может кто знает?


 
Павел   (2003-02-24 20:16) [1]

Ну подскажите кто-нибудь!


var
z,x:TDate;
begin
z:=z+x;//Не подходит
end;


 
Anatoly Podgoretsky   (2003-02-24 20:21) [2]

Что именно так и пишешь?


 
Павел   (2003-02-24 20:24) [3]

To Anatoly Podgoretsky ©
Почти. Я незнаю как работать с TDate.


 
jack128   (2003-02-24 20:24) [4]

если написать так
var d : double; d1,d2 : TDateTime;
begin
....
d := d1-d2; // разница, в днях
end;


 
Павел   (2003-02-24 20:26) [5]

To jack128 © (24.02.03 20:24)
Спасибо, будем разбирать.


 
Anatoly Podgoretsky   (2003-02-24 20:30) [6]

Павел © (24.02.03 20:24)
Ответ почти так не подходит, приведи определение переменных Tdate


 
Егорычев Михаил   (2003-02-26 09:34) [7]

Дельфи ведет отсчет вовсе не от РХ, плюс в месяцах и годах pазное число дней,
поэтомy такой метод не пpойдет,

Из TDateTime можно вычесть целое число дней:

DateToStr(StrToDate("1.1.1998")-2) выдаст "30.12.1997"

Чтобы вычесть годы и месяцы, если ты не хочешь вычислять сколько в них дней -
сделай DecodeDate, вычти что надо и веpни pезyльтат обpатно.


 
OlegMsc   (2003-02-26 10:06) [8]

DateUtils;

DaysBetween, HoursBetween , ... etc


 
Silver_   (2003-02-26 11:18) [9]


> OlegMsc © (26.02.03 10:06)
> DateUtils;
>
> DaysBetween, HoursBetween , ... etc


+ HoursSpan, MinutesSpan, SecondsSpan + F1 + Good Lack = :))



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.03.10;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.57 MB
Время: 0.042 c
14-30058
Supreme
2003-02-18 14:36
2003.03.10
Как усовершенствовать приобретённые навыки?


1-29883
OlegKrt
2003-02-26 13:51
2003.03.10
Окно Excel в MDI приложении


1-29857
ЮРИЙ_К
2003-02-28 12:37
2003.03.10
Почему Memo не правильно показывает ДОС-овский файл ??


3-29757
alex_bredin
2003-02-19 15:05
2003.03.10
Экспорт .RPT в .DOC


4-30175
Velocity
2003-01-14 12:30
2003.03.10
2 окна - отлов событий на втором окне





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский