Авторизация

Логин: Пароль:
Регистрация Забыли свой пароль?

Получение даты

Страницы: 1
Получение даты
#1
12.12.2009 18:14:38
Здравствуйте. Возникла небольшая проблема в Turdbo Pascal есть функция GetData возвращающаю дату. Так вот в PascalABC.Net её нет. Кто знает как можно получить дату ивывести её на экран? Заранее большое спасибо.
 
 
#2
12.12.2009 18:25:06
Можно подключить модуль System и использовать DateTime, делается все это так
Код
uses System;
begin
  var nowDateTime : DateTime := DateTime.Now;
  writeln(nowDateTime.ToString());
end.
 
 
#3
12.12.2009 18:29:04
Можно даже ее проще
Код
uses System;
begin
  writeln(DateTime.Now);
end.
 
 
#4
12.12.2009 18:48:42
Еще можно использовать функцию CurrentDateTime из модуля units.
 
 
#5
03.06.2010 17:11:35
DateTime.Now вернет текущие дату и время, их можно присвоить переменной типа DateTime, а потом вычленить из нее день, месяц, год, часы, минуты и секунды с помощью свойств Day, Month, Year, Hour, Minute, Second:

Код
uses System;
begin
  var d: DateTime := DateTime.Now;
  writeln(d.Day,'.',d.Month,'.',d.Year);
  writeln(d.Hour,':',d.Minute,':',d.Second);
end.
пока ты не доволен жизнью - она проходит...
 
 
#6
16.10.2010 21:21:55
Цитата
uses System;
begin


  var nowDateTime : DateTime := DateTime.Now;

  writeln(nowDateTime.ToString());

end.


Цитата
uses System;

begin

  var d: DateTime := DateTime.Now;

  writeln(d.Day,'.',d.Month,'.',d.Year);

  writeln(d.Hour,':',d.Minute,':',d.Second);
end.


Все два эти кода будут правильны . Первый написан с хитростью а второй подробно
Изменено: Евгений Ульяров - 16.10.2010 21:22:24
c:\linux\bin
c:\linux\etc\X11\xorg.conf
d:\home\user
Страшный сон линуксоида.
 
 
#7
25.12.2010 20:56:47
Первый проще запомнить и понятней.
 
 
 
Страницы: 1
Читают тему (гостей: 1, пользователей: 0, из них скрытых: 0)