Можно и так (обновленный вариант Derek) :D:D
P.S. Возможно неправльно, но за то работает) (лучше конечно DateTimerPicker использовать и обновлять не кнопкой, а скриптом, дабы лишними кнопками не засорять форму)

Большое человеческое вам спасибо!

Тогда нужно добавить поле в таблицу с параметрами системы (а если такой таблиц нет, то создать), и записывать туда дату последнего обновления.

Не могли бы Вы пример прислать?
1.Я создал в таблице БД Main поле dateupd (ДАТА/ВРЕМЯ).
2. На основной форме вынес DatePicker с привязкой к полю dateupd БД Main.
3. На форме Frm_Import на кнопке "Импортировать в базу" создал событие Frm_Import_Button3_OnAfterClick.
А на самом главном я ничего сделать не могу. В скрипте пишу "FrmMain.dupdate.DateTime := ...; (((

Если есть необходимость хранить эти данные в базе, то дальше нужно немного теории почитать:
Про БД, таблицы и поля - https://k245.ru/mvdb/relyatsionnye-bazy-dannyh.html
Про SQL - https://drive.google.com/file/d/1BK2H9q … drive_link
Чтобы дальнейшие объяснения были вам понятны.

Но могут быть и другие решения, не связанные с SQL, например, сохранять эту дату в файле настройки. Settings.ini

Тут все зависит от бизнес-задачи, для которой эта самая дата нужна. А про задачу вы ещё ничего не рассказали: для кого нужна эта дата, что он с ней будет делать и как эта дата влияет на процесс его работы?

Попробуйте составить ТЗ (https://k245.ru/bez-rubriki/proektirovanie.html), работать станет намного легче

Спасибо за все советы. Дата необходима для визуального контроля. Есть две программы: одна с интерфейсом для пользователя, другая для администратора. Администратор обновляет БД, а пользователь открывая основную форму должен видеть и понимать какой "свежести" данная БД и давно ли ее обновляли. Как-то так. Обновил администратор базу, в таблице появились новые записи или наоборот - удалены, у пользователя есть кнопочка "обновить таблицу", он жмет и видит, что данные были обновлены администратором полчаса назад, как раз в тот промежуток времени пока программа была открыта пользователем и была свернута (неактивна). Вот как-то так.

Но могут быть и другие решения, не связанные с SQL, например, сохранять эту дату в файле настройки. Settings.ini

Тут все зависит от бизнес-задачи, для которой эта самая дата нужна. А про задачу вы ещё ничего не рассказали: для кого нужна эта дата, что он с ней будет делать и как эта дата влияет на процесс его работы?

Попробуйте составить ТЗ (https://k245.ru/bez-rubriki/proektirovanie.html), работать станет намного легче

Vickus wrote:

Возможно не правильно сформулировал. Сохранять данные по дате обновления не требуется, гланое, чтобы было видно когда в последний раз она обновлялась. Если невозможно без сохранения, то значит необзодимо создать поле?

Если нужно ТОЛЬКО В МОМЕНТ ОБНОВЛЕНИЯ, тогда достаточно на форме (Form1)  метку разместить (labUpdateDate).
Чтобы на метке появилась надпись, присвойте свойству caption нужное значение:

procedure Form1_buttonabout_OnAfterClick (Sender: TObject);
begin
   Form1.labUpdateDate.Caption := 'Last Updated On:  ' + datetostr(now) + '   At:  ' + timetostr(time);
end;

Про метку и её свойства можно почитать здесь: https://k245.ru/mvdb/metka-tdblabel.html

P.S. Как только вы закроете программу, информация о дате обновления исчезнет. И при последующем запуске в метке ничего отображаться не будет. Это я так, на всякий случай озвучиваю )))

Большое спасибо! Я точно также сделал чуть раньше, все так и получилось. А чтобы дата сохранялась, необходимо в БД добавить поле типа dateupddb? И вместо лэйбла текстовое поле? А что дальше подскажете?

Возможно не правильно сформулировал. Сохранять данные по дате обновления не требуется, гланое, чтобы было видно когда в последний раз она обновлялась. Если невозможно без сохранения, то значит необзодимо создать поле?

Если нужно ТОЛЬКО В МОМЕНТ ОБНОВЛЕНИЯ, тогда достаточно на форме (Form1)  метку разместить (labUpdateDate).
Чтобы на метке появилась надпись, присвойте свойству caption нужное значение:

procedure Form1_buttonabout_OnAfterClick (Sender: TObject);
begin
   Form1.labUpdateDate.Caption := 'Last Updated On:  ' + datetostr(now) + '   At:  ' + timetostr(time);
end;

Про метку и её свойства можно почитать здесь: https://k245.ru/mvdb/metka-tdblabel.html

P.S. Как только вы закроете программу, информация о дате обновления исчезнет. И при последующем запуске в метке ничего отображаться не будет. Это я так, на всякий случай озвучиваю )))

Vickus wrote:

k245 wrote:

Не, ну народ обленился.... Одну строчку в коде заменить не могут.
https://myvisualdatabase.com/forum/view … hp?id=6262

Я не программист, а самоучка. Пытаюсь разобраться. Сам пытался поменять, как Вы выразились, строчку, но ничего не вышло, поэтому и прошу помощи. А Вам вместо того, чтобы хейтить лучше бы проявить доброжелательность по примеру Дерека, который постоянно не отказывает и идет на помощь!

Не проблема: если вы продемонстрируете свои попытки в виде вашего проекта, в котором какая-то часть не работает, я вам лично всё подправлю.

И где вы тут увидели хейтерство? А вот культуру общения на форуме - да, насаждаю ))

P.S. Что касается вашей задачи, то нужно правильно формулировать запрос. Вам не просто нужно, чтобы где-то на форме отображалась дата обновления после загрузки. Скорей всего вам необходимо, чтобы эта дата запоминалась в базе и отображалась всё время. А вот обновлялась после того, как загрузили данные из Excel, верно?

Возможно не правильно сформулировал. Сохранять данные по дате обновления не требуется, гланое, чтобы было видно когда в последний раз она обновлялась. Если невозможно без сохранения, то значит необзодимо создать поле?

k245 wrote:

Не, ну народ обленился.... Одну строчку в коде заменить не могут.
https://myvisualdatabase.com/forum/view … hp?id=6262

Я не программист, а самоучка. Пытаюсь разобраться. Сам пытался поменять, как Вы выразились, строчку, но ничего не вышло, поэтому и прошу помощи. А Вам вместо того, чтобы хейтить лучше бы проявить доброжелательность по примеру Дерека, который постоянно не отказывает и идет на помощь!

Не проблема: если вы продемонстрируете свои попытки в виде вашего проекта, в котором какая-то часть не работает, я вам лично всё подправлю.

И где вы тут увидели хейтерство? А вот культуру общения на форуме - да, насаждаю ))

P.S. Что касается вашей задачи, то нужно правильно формулировать запрос. Вам не просто нужно, чтобы где-то на форме отображалась дата обновления после загрузки. Скорей всего вам необходимо, чтобы эта дата запоминалась в базе и отображалась всё время. А вот обновлялась после того, как загрузили данные из Excel, верно?

Не, ну народ обленился.... Одну строчку в коде заменить не могут.
https://myvisualdatabase.com/forum/view … hp?id=6262

Я не программист, а самоучка. Пытаюсь разобраться. Сам пытался поменять, как Вы выразились, строчку, но ничего не вышло, поэтому и прошу помощи. А Вам вместо того, чтобы хейтить лучше бы проявить доброжелательность по примеру Дерека, который постоянно не отказывает и идет на помощь!

Привет
Это помогает?
Derek.

Дерек, большое спасибо за Вашу помощь! А возможно тоже самое, но чтобы не всплывало окно сообщения, а именно на форме в лэйбле или текстовом поле такое же отображалось? Еще раз благодарю!