Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 02.06.2010, 21:35
kskb7771 kskb7771 вне форума
Прохожий
 
Регистрация: 02.06.2010
Сообщения: 5
Репутация: 10
Лампочка open dialog, Файлы

Здравствуйте! У меня в программе ввод данных происходит путём выбора из папки *.txt файла, по средствам OPEN DIALOG. Подскажите пожалуйста как организовать автоматический ввод из файла?
(т.е. в 12.00 происходило считывание из папки)
Ответить с цитированием
  #2  
Старый 02.06.2010, 22:00
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
По умолчанию

Присоеденюсь к вопросу, как выполнить действие в четко нужное время?
Ответить с цитированием
  #3  
Старый 02.06.2010, 22:07
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
По умолчанию

Придумал сам:
Ставишь таймер, интервал 1000мс и его процедурка:
Код:
if datetostr(NOW) = '22:05:30' then showmessage('Achtung!');
Время можешь любое назначить.
Ответить с цитированием
  #4  
Старый 02.06.2010, 22:40
kskb7771 kskb7771 вне форума
Прохожий
 
Регистрация: 02.06.2010
Сообщения: 5
Репутация: 10
По умолчанию

щас опробуем)
Ответить с цитированием
  #5  
Старый 02.06.2010, 22:47
kskb7771 kskb7771 вне форума
Прохожий
 
Регистрация: 02.06.2010
Сообщения: 5
Репутация: 10
По умолчанию

хм, у меня не работает!(((((((
Ответить с цитированием
  #6  
Старый 02.06.2010, 22:53
kskb7771 kskb7771 вне форума
Прохожий
 
Регистрация: 02.06.2010
Сообщения: 5
Репутация: 10
Вопрос

[delphi]procedure TForm3.Timer2Timer(Sender: TObject);
begin
if datetostr(NOW) = '22:51:45' then showmessage('Achtung!');
end;[/delphi]

так?)
Ответить с цитированием
  #7  
Старый 02.06.2010, 23:01
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
По умолчанию

прошу прощения за опечатку.
Вот так попробуй:
Код:
if timetostr(NOW) = '22:51:45' then showmessage('Achtung!');
Ответить с цитированием
  #8  
Старый 02.06.2010, 23:06
kskb7771 kskb7771 вне форума
Прохожий
 
Регистрация: 02.06.2010
Сообщения: 5
Репутация: 10
По умолчанию

Вот я балбес)
смотрел тоже на это место..
спасибо)

здесь получается что процедура выполняется только один раз? или не однократно будет выполняться в это время?
Ответить с цитированием
  #9  
Старый 02.06.2010, 23:30
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
По умолчанию

kskb7771
Ну пока программа запущена,таймер будет идти. Значит будет выполняться всегда, в заданное время.
благодарность можно в репутацию выразить)
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 18:04.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter