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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 28.11.2009, 17:59   #1
Mutagena
Пользователь
 
Регистрация: 06.10.2009
Сообщений: 39
Вопрос Вопрос к специалистам

Пожалуйста, подскажите. Имеется задача. Требуется профессиональное мнение о том, как её реализовать.
Необходимо написать программу, которая будет импортировать некоторые данные из Excel документа и выводить их на форме, проводя некоторые операции над ними. (В частности будут импортироваться даты, в которые необходимо сдать документы). Также необходим некий фоновый процесс, который будет постоянно выполняться с момента загрузки системы и каким-либо образом выводить напоминание, когда приближается дата сдачи какого-либо документа.
Посоветуйте, как и с помощью чего решить вышеописанную задачу. Собственно, вся сложность в создании этого процессы, выводящего напоминания.
Mutagena вне форума
Старый 28.11.2009, 19:26   #2
Neeter
Форумчанин
 
Аватар для Neeter
 
Регистрация: 22.02.2009
Сообщений: 875
По умолчанию

С Excel'ем все ясно, используйте OLE.

Напоминание. Добавляйте программу в автозагрузку в реестр. Сверяйте текущую дату с датой сдачи документа.

Текущая дата получается так:
Код:
var 
 d: TDate;
begin
 d := TDate(now);
end;
Добавление программы в автозагрузку

"Выуживание" года, месяца и дня из даты:
Код:
var
 d: TDate;
 Year, Month, Day: integer;
begin
 d := TDate(now);
 DecodeDate(d, Year, Month, Day);
end;
Вот пример (только без автозагрузки):
Код:
program Project1;

uses
  SysUtils, Dialogs;

var
 ZDate, CDate: TDate; 
 ZYear, ZMonth, ZDay, CYear, CMonth, CDay: Word;

begin
  ZDate := StrToDate('30.11.2009'); //Присваиваем дату сдачи зачета
  DecodeDate(ZDate, ZYear, ZMonth, ZDay); //Распределяем по году, месяцу и дню

  while True do
  begin
   CDate := TDate(now); //Присваиваем текущую дату
   DecodeDate(CDate, CYear, CMonth, CDay);

   if (ZYear = CYear) and (ZMonth = CMonth) then //Сначала проверяем год и месяц
    if (CDay >= ZDay - 4) and (CDay <= ZDay) then //Если текущий день входит в диапазон 4-ех дней до сдачи зачета
     ShowMessage(Format('Сдавать зачет через %d дня!', [ZDay - CDay])); //Показываем соответствующее сообщение

   Sleep(10000); //Проверка каждые десять секунд
  end;
end.
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
Neeter вне форума
Старый 28.11.2009, 22:17   #3
Mutagena
Пользователь
 
Регистрация: 06.10.2009
Сообщений: 39
По умолчанию

Спасибо за разъяснение.
Но имеется другой вопрос. А что, если необходимо сгенерировать небольшую форму в углу экрана, где будут выводиться приближающиеся зачёты? А при закрытии форма должна будет уничтожаться.
Mutagena вне форума
Старый 28.11.2009, 22:43   #4
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Одна тема - один вопрос.
Читаем правила.
Если сможете обосновать прямую связь между первым и вторым вопросами - я открою тему.
mihali4 вне форума
Закрытая тема


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вопрос!!! tigor Общие вопросы Delphi 11 23.10.2009 09:45
специалистам по Linux (OpenSuse). Внутри... Sergey 0012 Linux (Ubuntu, Debian, Red Hat, CentOS, Mint) 5 22.06.2009 07:42
Вопрос наверное про функции, а так точно даже не знаю про что. (Вопрос начинющего #6) Albert2008 Общие вопросы Delphi 4 21.08.2008 15:33
вопрос по сокетам и общение как в ICQ.Сложный вопрос... Руслантус Общие вопросы C/C++ 2 12.08.2008 21:10