Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 14.12.2009, 19:16   #1
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию Вставить текущую дату и время в строку, не используя SysUtils.

Собственно сабж. Как? Подключать Windows не предлагать. В System есть функи по работе со временем и датой?
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 14.12.2009, 20:21   #2
BOBAH13
Android Developer
Старожил Подтвердите свой е-майл
 
Аватар для BOBAH13
 
Регистрация: 19.02.2007
Сообщений: 3,708
По умолчанию

Цитата:
Сообщение от Alex Cones Посмотреть сообщение
Собственно сабж. Как? Подключать Windows не предлагать. В System есть функи по работе со временем и датой?
Ну... интересно... вопрос на вопрос:
Как создать окно в Windows ? Windows не предлагать. думаю Вы поняли намек.
А интересно, что Вам даст не подключение Windows.pas ?
BOBAH13 вне форума Ответить с цитированием
Старый 14.12.2009, 20:29   #3
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Наверное, можно из CMOS прочитать (можно даже ассемблерную вставку сделать).
Только вот с форматированием и отображением как быть?
Тоже удивляюсь - зачем такая морока?
mihali4 вне форума Ответить с цитированием
Старый 14.12.2009, 20:41   #4
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

Цитата:
Тоже удивляюсь - зачем такая морока?
Я крайне не люблю, когда подключаю 100000 функций, которые мне 100% не понадобятся. Поэтому у меня в проекте сейчас нет ни одного подключенного модуля, кроме своих собственных. Даже Messages не придется подключать - сделаю типы HWND, WPARAM, LPARAM, RESPARAM : LongWord (Который есть в стандартном System) SendMessages экспортирую из user32.dll. Результат - 27 кб. Единственная проблема сейчас - приходится использовать TimeToStr и DateToStr для вставки времени и даты в лог. Попробовал потянуть за них и скопировать их себе - ниточка оказалась бесконечной, потратил около 2-х часов, только для того, чтобы найти все используемые типы. Поэтому пытаюсь найти метод вставки времени и даты в строку, не юзая SysUtils, а то exe "разжирел" до 57 кб.
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 14.12.2009, 20:49   #5
BOBAH13
Android Developer
Старожил Подтвердите свой е-майл
 
Аватар для BOBAH13
 
Регистрация: 19.02.2007
Сообщений: 3,708
По умолчанию

Мдя... ну я попробую внести ясность. Windows.pas это декларации функций, структур. Это как бы инструкции компилятору/транслятору то как и по каким адрессам обращатся и организовывать память (грубо говоря). Т.е... вы подключаите Windows.pas с n-кол-вом функций, а используите только одну. Ну так и используйте только ее, от этого только возможно таблица импорта выростит, и не больше. Короче выйграша ноль. Вообщем по моему мнению... это извращенство. Нет никакого смысла в этом. Всеравно ведь, kernel32 user32 и т.п.. системные либы будут связаны (адресса к ним) к вашему ехе/dll так что опять таки смысла ноль.

p.s. навеяло воспоминания сам когда-то "страдал" таким... тоже думал, ух, сделаю 10 кб ехе, это ведь "круто". Только вот, перестрадал быстро, т.к. ничего толкового не сделать таким образом (либо делать год, что можно сделать на за неделю). Ну конечно, если не идет речи о консольке или .dll какой то маленькой.
BOBAH13 вне форума Ответить с цитированием
Старый 14.12.2009, 21:18   #6
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

А, вот еще - можно из kernel32 функцию использовать - GetSystemTime...
mihali4 вне форума Ответить с цитированием
Старый 14.12.2009, 21:32   #7
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

ну, в принципе, думаю, что это можно замутить..
но надо ли?!
Хотелось бы спросить,
а что, 20 кб стоит такой головной боли?!

и ещё один БОЛЬШОЙ вопрос.
а как Вы собираетесь получать дату и время для записи в лог, если now() - описано в SysUtils:
GetLocalTime(SystemTime);
...
а это берётся из Windows:
procedure GetLocalTime; external kernel32 name 'GetLocalTime';

______________
ну вот, пока сочинял ответ, уже тему практически добили!

Михалыч, как я понял, ТС ещё требуется преобразовать дату/время в строку! то бишь аналоги TimeToStr и DateToStr

Последний раз редактировалось Serge_Bliznykov; 14.12.2009 в 21:35.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 14.12.2009, 21:36   #8
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

Цитата:
procedure GetLocalTime; external kernel32 name 'GetLocalTime';
Экспортировать её к себе - не проблема.
Цитата:
А, вот еще - можно из kernel32 функцию использовать - GetSystemTime...
Хм.. Сейчас посмотрю, в каком формате она показывает результат.
Замечательно! Скопировать только одну запись и экспортировать функцию. Спасибо Mihali4, Вы как всегда правы!
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 16.12.2009, 03:13   #9
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Стараюсь, едрить ее налево!
mihali4 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вставить текущую дату в DBGrid MargoNik БД в Delphi 4 17.09.2009 03:59
прописать текущую дату vostok Microsoft Office Excel 8 06.09.2009 19:39
Какое свойство отображает текущую дату у DateTimePicker subbota Компоненты Delphi 1 26.07.2009 16:32
как добавить в имя файла текущую дату? Markan Microsoft Office Excel 3 27.05.2009 13:19
Как получить текущую дату из SQL запроса? _ozzy_ SQL, базы данных 2 09.09.2008 21:15