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

@Клод · Регистрация: 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

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

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

Новые блоги и статьи Все статьи Все блоги /
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .	Использование значений реквизитов справочника в документе, с определенными условиями и правами Maks 07.04.2026 1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .	Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .

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

	Как программно узнать дату на своём компе? 17.02.2012, 18:14. Показов 10445. Ответов 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