Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.62/13: Рейтинг темы: голосов - 13, средняя оценка - 4.62
Martovsky_zaets
0 / 0 / 0
Регистрация: 19.09.2007
Сообщений: 10
#1

Как показать доли секунды в FormatDateTime?

27.09.2007, 11:57. Просмотров 2429. Ответов 7
Метки нет (Все метки)

Как показать доли секунды в FormatDateTime?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.09.2007, 11:57
Ответы с готовыми решениями:

Как показать окно поверх всех других?
У меня такая проблемка. В конце работы программа выводит окно с сообщением о...

Отчет, как показать не АйДи,а наименование
Такая ситуация. Delphi связан с БД access.Вообщем бд склада. В Accesse...

Функция FormatDateTime
Сделал прогу , по задумке нужно чтобы при нажатии на 'дата и время' переходило...

Обратный отсчет в FormatDateTime
Доброго времени суток, CF! Я бы хотел узнать ответ на вопрос, можно ли в...

Formatdatetime вырезать функцию
Приветствую. Мне нужна одна лишь функция formatdatetime но если подключать...

7
skaa
02.10.2007, 00:18 #2
Delphi
1
FormatDateTime('yyyy-mm-dd-hh-nn-ss-zzz',Now());
zzz - это доли секунды
Martovsky_zaets
0 / 0 / 0
Регистрация: 19.09.2007
Сообщений: 10
02.10.2007, 11:57  [ТС] #3
Твой способ не работает. Я получил следующую строку:

25.07.2001 13:49:23.zzz

Может версия дельфи не та, или есть еще какие варианты?
0
Bear
02.10.2007, 21:47 #4
Фрагмент из программы:
Label1.Caption := FormatDateTime('hh:mm:ss:z',Time)

Результат: 18:10:43:753
Martovsky_zaets
0 / 0 / 0
Регистрация: 19.09.2007
Сообщений: 10
03.10.2007, 09:24  [ТС] #5
И одинарный z тоже не работает! Вот фрагмент программы:
Delphi
1
Label1.Caption:=FormatDateTime('hh:mm:ss:z',Time)
Результат:

08:49:01:z
0
skaa
03.10.2007, 18:25 #6
Я попробовал в старой версии, zzz действительно не работает. Скорее всего, можно только подобным путём:
Delphi
1
2
3
4
5
6
7
procedure TForm1.Button1Click(Sender: TObject);
var
  Hour,Min,Sec,MSec:Word;
begin
  DecodeTime(Now(),Hour,Min,Sec,MSec);
  Label1.Caption:=FormatDateTime('hh:mm:ss',Now())+':'+IntToStr(MSec);
end;
Martovsky_zaets
0 / 0 / 0
Регистрация: 19.09.2007
Сообщений: 10
04.10.2007, 09:23  [ТС] #7
Спасибо, skaa.

Честно, мне это мало помогло... Дело было в записе БД, в которой время пишется с точностью до долей секунды. Если не указывать полностью все цифры, работать не будет. Очень трудоемко делать каждый раз проверку на тип поля в таблице (там и так 4 вложенных if). Я решил просто все округлять...

Если знаешь другой способ, как читатьзаписывать в БД данные именно в формате hh:nn:ss.zzz, ответь. Скажи в какой версии дельфи это работает? У меня 4.
0
skaa
04.10.2007, 17:42 #8
Это работает в Delphi 5 и, наверное, в более поздних версиях. В C++ Builder 3 это не работает.
04.10.2007, 17:42
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.10.2007, 17:42

Почему FormatDateTime не хочет преобразовываться во Float
Подскажите, почему FormatDateTime не хочет преобразовываться во Float. Задача...

Почему FormatDateTime('mm', Now); выводит всегда именно 06?
Мне нужно записать в отдельные переменные часы, минуты и секунды. Я ввожу этот...

FormatDateTime выдаёт ошибку "is not a valid date and time"
var fs: TFormatSettings; begin Application.UpdateFormatSettings :=...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru