Как программно узнать дату на своём компе?

@Клод · Регистрация: 13.02.2012

Студворк — интернет-сервис помощи студентам

начал работу над регистрацией для своей проги. Требуется помощь: подскажите как мне считывать сегодняшнюю дату с моего компьютера.

@Клод · 18.02.2012, 21:43 **[ТС]**

Сообщение от Samrisbe

Label2->Caption = (FloatToStr(DaysBetween(date1, date2)));

DaysBetween() откуда?

@Samrisbe · 18.02.2012, 21:47

Сообщение от Клод

DaysBetween() откуда?

Отсюда
Не мне вас учить, более того я сам в учениках хожу, темнемение по ссылке которую я вам даю второй раз расписанна работа с датами и временем на очень доступном уровне!

А про советы месных гуру я вобще молчу...

@Клод · 18.02.2012, 22:04 **[ТС]**

Функция самое то! Но почему компилятор выдаёт ошибку:

C++
1
[C++ Error] Unit1.cpp(177): E2268 Call to undefined function 'DaysBetween'

глупый опрос но как её "определить", ведь она служебная?

@Samrisbe · 18.02.2012, 22:27

C++
1
#include "DateUtils.hpp"

попробуй может поможет.
у меня билдер 6 заглючил не могу проверить...

@Клод · 18.02.2012, 22:27 **[ТС]**

Надо было вставить

C++
1
#include "DateUtils.hpp"

Но всё равно я это первее нашёл!

@Samrisbe · 18.02.2012, 22:33

Вот еще один пример:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
#include <vcl.h>
#pragma hdrstop
   #include "DateUtils.hpp"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
  Label1->Caption=(FormatDateTime("dd.mm.yyyy.  hh:nn", Now()));
  Label2->Caption=(FormatDateTime("dd.mm.yyyy.  hh:nn", Now()+31));
}
//---------------------------------------------------------------------------
 int TForm1::CntDay(TDateTime RanD, TDateTime EndD)
{
if (RanD==EndD) return 0;
if (RanD>EndD) return (RanD-EndD).operator int();
else return (EndD-RanD).operator int();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  TDateTime RanD, EndD;
  RanD = StrToDateTime(Label1->Caption);
  EndD = StrToDateTime(Label2->Caption);
  Label3->Caption = IntToStr(CntDay(RanD, EndD));
}
//---------------------------------------------------------------------------

@Клод · 18.02.2012, 22:34 **[ТС]**

у меня от DataUtils заглючил Билдер ошибку выдаёт с валидом 0!

@Samrisbe · 18.02.2012, 22:39

Сообщение от Клод

у меня от DataUtils заглючил Билдер ошибку выдаёт с валидом 0!

Поставь Rad Studio.

@Клод · 18.02.2012, 22:40 **[ТС]**

Сообщение от Samrisbe

Поставь Rad Studio.

Неее я приверженец билдера))

@Samrisbe · 18.02.2012, 22:43

И его не надо выбрасывать, одно другому не мешает...

cpp_developer · 18.02.2012, 22:44

Сообщение от Клод

DaysBetween() откуда?

если вы сами не читаете свою же тему:

Сообщение от Samrisbe

информация к размышлению

, то помогать вам - занятие бесмысленное, имхо

.

@Клод · 18.02.2012, 22:51 **[ТС]**

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

Добавлено через 5 минут

если вы сами не читаете свою же тему

я читал свою тему, просто в первый раз когда посещал сайт там автоматически всё было переведено на русский и я просто вырубил его
а во второй раз я вчитался
плииз ну помогите мне чутьь-чуть осталось дописать

@Samrisbe · 18.02.2012, 22:52

Сообщение от Клод

плииз ну помогите мне чутьь-чуть осталось дописать

Что именно? покажи что не получается как можно подробней!

@Клод · 19.02.2012, 11:24 **[ТС]**

Сообщение от Samrisbe

Что именно? покажи что не получается как можно подробней!

Да вот осталось тока сравнить две даты функция

C++
1
DaysBetween()

выдаёт ошибку
теперь оcталось 2 способа

C++
1
DaySpan()

или

C++
1
2
3
TDateTime date1 = ..;
TDateTime date2 = ..;
double date3 = (double)( date2 - date1 );

@Samrisbe · 19.02.2012, 11:42

Вот исходник рабочий где сравнивается дата.
и не надо дублировать темы это черевато...правила форума

@Клод · 19.02.2012, 11:47 **[ТС]**

Вот код

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
{
  //ShortDateFormat = "dd.mm.yyyy";
 // DateSeparator = '.';
  Label1->Caption=(FormatDateTime("dd.mm.yyyy.  hh:nn", Now()));
  Label2->Caption=(FormatDateTime("dd.mm.yyyy.  hh:nn", Now()+31));
}
//---------------------------------------------------------------------------
 int TForm1::CntDay(TDateTime RanD, TDateTime EndD)
{
if (RanD==EndD) return 0;
if (RanD>EndD) return (RanD-EndD).operator int();
else return (EndD-RanD).operator int();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  TDateTime RanD, EndD;
  RanD = StrToDateTime(Label1->Caption);
  EndD = StrToDateTime(Label2->Caption);
  Label3->Caption = IntToStr(CntDay(RanD, EndD));
 
 
//Edit3->Text=TimeToStr(StrToTime(Edit1->Text)-StrToTime(Edit2->Text));
//Label3->Caption =  DateToStr(StrToDate(Label2->Caption) -  StrToDate(Label1->Caption));
}

В Билдере

C++
1
#include "DateUtils.hpp"

Выдаёт ошибку(((

@Samrisbe · 19.02.2012, 11:51

Значит у тебя Builder 6 глючный! Советую переустановить! Я тебе дал рабочий исходник с самым доступным примером именно для Builder 6, причем не требующий дополнительных телодвижений!

и заведи привычку писать текст ошибки тоже дабы было легче понять что и как...

@Клод · 19.02.2012, 11:52 **[ТС]**

Сообщение от Samrisbe

и не надо дублировать темы это черевато

чревато пишется без е))

Добавлено через 59 секунд

Сообщение от Samrisbe

Значит у тебя Builder 6 глючный!

Возможно, но у тебя на Date.Utils он тоже глючил?)

@Samrisbe · 19.02.2012, 11:56

Сообщение от Клод

чревато пишется без е))

Точто вы отличный филолог это хорошо! буду обрасчатса за помосчью...

У меня вчера Builder глючил на все, даже на пустую форму.
Сегодняшний исходник у меня компилируется ровно!

@Клод · 19.02.2012, 11:57 **[ТС]**

Сообщение от Samrisbe

Сегодняшний исходник компилируется ровно!

Наверное, дело в том, что я этот исходник пытался в свой код пристроить)))
Щас попробую отдельно запустить

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@Клод 3 / 3 / 2 Регистрация: 13.02.2012 Сообщений: 161

	Как программно узнать дату на своём компе? 17.02.2012, 18:14. Показов 10864. Ответов 66 Метки нет (Все метки) начал работу над регистрацией для своей проги. Требуется помощь: подскажите как мне считывать сегодняшнюю дату с моего компьютера. 0

@Клод 3 / 3 / 2 Регистрация: 13.02.2012 Сообщений: 161
	18.02.2012, 22:34 [ТС]
	у меня от DataUtils заглючил Билдер ошибку выдаёт с валидом 0! 0

@Samrisbe 1365 / 732 / 67 Регистрация: 28.01.2011 Сообщений: 2,069
	18.02.2012, 22:43
	И его не надо выбрасывать, одно другому не мешает... 0

@Samrisbe 1365 / 732 / 67 Регистрация: 28.01.2011 Сообщений: 2,069
	19.02.2012, 11:51
	Значит у тебя Builder 6 глючный! Советую переустановить! Я тебе дал рабочий исходник с самым доступным примером именно для Builder 6, причем не требующий дополнительных телодвижений! и заведи привычку писать текст ошибки тоже дабы было легче понять что и как... 0