Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
Запуск процедуры по дате[DELPHI] |

22.05.2009, 18:21
|
|
Познающий
Регистрация: 21.11.2008
Сообщений: 36
Провел на форуме: 117394
Репутация:
6
|
|
Запуск процедуры по дате[DELPHI]
помогите сделать проверку на дату.
цель такова: запускаем приложение, и если дата на компе например 01.06.2009 или выше, то выполняется процедура если нет то ни чего не происходит.
|
|
|

22.05.2009, 18:52
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
прописаться в планировщик.
самый простой вариант, это AT.
C:\Documents and Settings\W!z@rD>at /?
Команда AT предназначена для запуска команд и программ в указанное время
по определенным дням. Для использования команды AT необходимо, чтобы была
запущена служба расписаний.
AT [\\имя_компьютера] [ [код] [/DELETE] | /DELETE [/YES]]
AT [\\имя_компьютера] время [/INTERACTIVE]
[ /EVERY:день[,...] | /NEXT:день[,...]] "команда"
\\имя_компьютера Имя удаленного компьютера. Если этот параметр опущен,
используется локальный компьютер.
код Порядковый номер запланированной задачи.
/delete Отмена запланированной задачи. Если код задачи опущен,
отменяются все задачи, запланированные для указанного
компьютера.
/yes Отмена запроса на подтверждение при отмене всех
запланированных задач.
время Время запуска команды.
/interactive Разрешение взаимодействия задачи с пользователем,
работающим на компьютере во время запуска задачи.
/every:день[,...] Запуск задачи осуществляется по указанным дням недели или
месяца. Если дата опущена, используется текущий день
месяца.
/next:день[,...] Задача будет запущена в следующий указанный день недели
(например в следующий четверг). Если дата опущена,
используется текущий день месяца.
"команда" Команда Windows NT или имя пакетного файла.
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|

22.05.2009, 19:00
|
|
Познающий
Регистрация: 21.11.2008
Сообщений: 36
Провел на форуме: 117394
Репутация:
6
|
|
нет, вы не понели.
НУжно не в планировщик поставить программу, а с приложения зделать процедуру по дате...
тоесть запускаеш программу если дата 01.06.2009 и выши то выполняется процедура к примеру showmesage в этом роде надо..
|
|
|

22.05.2009, 19:12
|
|
Участник форума
Регистрация: 25.05.2007
Сообщений: 290
Провел на форуме: 1740746
Репутация:
435
|
|
var
s: string;
begin
s:=timetostr(time);
if .... then .... else ... ;
....
....
end;
|
|
|

22.05.2009, 19:28
|
|
Познающий
Регистрация: 21.11.2008
Сообщений: 36
Провел на форуме: 117394
Репутация:
6
|
|
А можно if .... есче написать?
|
|
|

22.05.2009, 20:22
|
|
Познающий
Регистрация: 12.05.2009
Сообщений: 45
Провел на форуме: 255342
Репутация:
28
|
|
То ли я чето недопонимаю, то ли на паскале time это дата...
мой вариант:
Код:
if date>=strtodate('01.06.2009') then
begin
showmessage('вовремя!');
end
else
begin
showmessage('еще рано');
end;
|
|
|
|
 |
Похожие темы
|
| Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
|
Запуск проги Portable-MPR на удаленой машине под Cmd
|
ira |
АнтиАдмин |
0 |
04.03.2009 20:00 |
|
Запрет на запуск процессов?как?
|
pr0_zu |
Windows |
9 |
04.12.2008 23:43 |
|
Встроенные функции и процедуры.
|
mari00 |
С/С++, C#, Delphi, .NET, Asm |
8 |
14.12.2006 16:25 |
|
Установка, настройка и запуск eggdrop'a
|
Paran0ya |
Чужие Статьи |
5 |
27.08.2006 05:10 |
|
К продолжение темы ' Про Автозагрузку?', теперь нужен запуск!
|
Варфоломей |
С/С++, C#, Delphi, .NET, Asm |
6 |
18.04.2006 22:11 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|