|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Всплывающее сообщение по прошествии определённого времени
Добрый день. Подскажите как осуществить в Delphi 7 всплывающее сообщение. По конкретнее: Мне нужно чтобы Delphi выводил сообщение о том что лицензия проги закончится через месяц. Форма сообщения: Название проги, срок окончания прог. Помогите нужно срочно. Надо чтобы он сверял дату всех прог в БД и выводил сообщение если у какой то проги через месяц кончится лицензия.
Последний раз редактировалось Dissonance, 19.05.2008 в 13:01. |
#2
|
||||
|
||||
А че сделать то?
Сверять дату? Или всплывающее сообщение создать? Или все вместе? Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#3
|
|||
|
|||
Надо чтобы он сверял дату всех прог в БД и выводил сообщение если у какой то проги через месяц кончится лицензия.
|
#4
|
||||
|
||||
А какая БД?
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#5
|
|||
|
|||
Аксес если правильно тебя понял
|
#6
|
|||
|
|||
А тема Каталог компьютерных программ
|
#7
|
||||
|
||||
Ну я с БД не очень хорошо знаком, но думаю что так:
Код:
ADOConnection1.ConnectionString:='Provider = Microsoft.Jet.OLEDB.4.0;Data Source = ' + ExtractFilePath(Application.ExeName) + '\Programms.mdb'; ADOConnection1.Connected:=True; ADOQuery1.SQL.Text:='select * from Table'; ADOQuery1.Open; while not ADOQuery1.Eof do begin if ADOQuery1ProgrammName.AsString = Application.Title then //Если это наша программа begin LicenseDate:=ADOQuery1LicenseDate.AsDate; if MonthBetween(Date, LicenseDate) < 1 then //Показываешь диалог Break; end; ADOQuery1.Next; end; ADOQuery1.Close; Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#8
|
|||
|
|||
А можно поконкретнее. Я просто не очень силён в этом. Какие компоненты надо ставить на форму???
//Если это наша программа Что это значит?? //Показываешь диалог. Какой диалог?? Можеш пример кинуть. |
#9
|
|||
|
|||
Мне сказали что можно через MessageBox сделать что думаеш?
|
#10
|
|||
|
|||
ShowMessage(Format('У программы %s через месяц закончится триал-период.',[ProgramName]));
Так? |
#11
|
||||
|
||||
Ты же сказал, что это типа сборника, в БД значит информация о нескольких программах. Ищем нужную и получаем дату лицензии. Если осталось меньше месяца, то показываешь сообщение.
Какое? Какое захочется. Можно ShowMessage, Application.MessageBox или даже отдельную форму создать. Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#12
|
|||
|
|||
Типо того. не триал. Например есть установленный антивирусник касперского. Всё работает им пользуются. Заходят в программу а она высвечивает сообщение что у этого касперского срок действия лицензионного ключа кончится через 1месяц. Так должно быть у всех прог в базе данных. Суть в этом чтобы прога сверяла дату окончания лицензии и сама выводила сообщение о том что лицензионный ключ заканчивается. И должна начать предупреждать за 1 месяц
|
#13
|
|||
|
|||
прога должна автоматом выводить это сообщение без всяких запросов. Тока остался 1мес. или ещё меньше всё она сразу без всяких действий говорит об этом
|
#14
|
|||
|
|||
Мужик, строку ты сам напиши ту, которая тебе нужна.
Если у тебя лежит в БД инфа, то список таких программ можно получиь запросом и уже по его результатам формировать сообщение. Твое дело при старте проги сделать запрос в БД и вывести результат. Дл пользака это будет выглядеть, как будто это сделано автоматом. Можно проге "сесть" в авторан и периодически делать такой запросик и из трея выбразывать сообщение. Все в твоих руках - как придумаешь и напишешь - так и будет. А у тебя получается примарно "хочу так, не заню как и при этом ничего не хочу делать, а что бы само все сделалось". Последний раз редактировалось lmikle, 19.05.2008 в 18:18. |
#15
|
|||
|
|||
ДАк я и прошу помочь. Не знаю как написать помогите. Мысль твою понел
|