Сообщение об ошибке

Deprecated function: The each() function is deprecated. This message will be suppressed on further calls в функции menu_set_active_trail() (строка 2405 в файле /home/kpaco123/e-helper/includes/menu.inc).

TimeToStr ()

Функція TimeToStr (Time: TDateTime): string;
Опис

Функція перетворює значення часу,представлене в формате TDateTime, у рядок. Форматування рядка здійснюється у відповідності зі значенням глобальної змінної LongTimeFormat.

Приклад
begin
MessageDlg ('Поточний час:' + TimeToStr(Time), mtInformation, [mbOk], 0);
end;