powered by simpleCommunicator - 2.0.36     © 2025 Programmizd 02
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Вывести прошедшее от события время красиво
6 сообщений из 31, страница 2 из 2
Вывести прошедшее от события время красиво
    #40114834
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
X11,

посмотри в отладчике что находится в ts, Now и StartTime
...
Рейтинг: 0 / 0
Вывести прошедшее от события время красиво
    #40114854
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ts
это сразу после запуска сервера
...
Рейтинг: 0 / 0
Вывести прошедшее от события время красиво
    #40114855
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
StartTime спустя 5 мин
...
Рейтинг: 0 / 0
Вывести прошедшее от события время красиво
    #40114866
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что получится?
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
function TUniServerModule.GetServerUptime: String;
Var
 ts: TTimeSpan;
begin
  ts := TTimeSpan.Subtract(Now, Now - 10);

  result := '<i class="fas fa-clock"></i> ' + constUptimeServer + ' ' + ifthen(ts.Days > 0, ts.Days.ToString + ' ' + constUptimeDays + ' ', '') +
                           ifthen(ts.Hours > 0, ts.Hours.ToString + ' ' + constUptimeHours + ' ', '') +
                           ifthen(ts.Minutes > 0, ts.Minutes.ToString + ' ' + constUptimeMinutes, constUptimeMin);
end;
...
Рейтинг: 0 / 0
Вывести прошедшее от события время красиво
    #40114872
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
написано "10 дней меньше минуты"
...
Рейтинг: 0 / 0
Вывести прошедшее от события время красиво
    #40114889
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Только что на другом ПК запустил и потом перевел время и дату на 3 дня и 1 час вперед и проверил - нормально и правильно отобразилось.

Я так думаю, может это связано с тем, что серверное приложение uniGUI запущено и работает из-под hyper-server? В том смысле, что hyper-server запускает несколько копий моего серверного приложения.

Понаблюдаю еще...
...
Рейтинг: 0 / 0
6 сообщений из 31, страница 2 из 2
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Вывести прошедшее от события время красиво
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]