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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 17.09.2010, 12:28   #1
-=Virus=-
Форумчанин
 
Аватар для -=Virus=-
 
Регистрация: 03.07.2009
Сообщений: 246
По умолчанию Вывод сообщение с логом за последние 10 мин

Ребят помогите вывести лог за последние 10 минут.
Суть такова:
Цитата:
В RichEdit отправляеться лог таким образом:
Цитата:
[канал] main [Время] 12:21:05 [пользователь] anonim:123
Нужно проверить сообщение какие за последние 10 минут были добавлены в мемо и отправить пользователю.
код использую следуйщий:
Цитата:
form1.RichEdit1.Lines.Add('[канал] '+uChannel+' [время] '+TimeToStr(Now)+' [пользователь] '+uSenderLogin+':'+uText);
//Проверяю на команду
If uText=Form1.Edit1.Text then

//Отправляю сообщение пользователю
aDataToSend := fTextToAnsiString(uSenderLogin)+ //имя виртуального пользователя
fIntegerToAnsiString(0)+ //тип сообщения
fTextToAnsiString(Form1.RichEdit1.L ines.text); //Текст сообщения каторый получен из канала
CommFortProcess(dwPluginID, 63, PAnsiChar(aDataToSend), Length(aDataToSend)) //отправляем сообщение
Дело в том что таким образом отправляю всё содержимое RichEdit отпрвляется но нужно за последние 10 минут.Чистить каждые 10 минут то же не вариант.
-=Virus=- вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
дле последние новости sergeiqwe PHP 0 11.09.2010 13:29
Вывод сообщение на заданную клавишу Jonikru Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 10 13.03.2009 12:32
Последние значение цикла MAKEDON Общие вопросы C/C++ 1 02.03.2009 13:46
последНИЕ 3 символа... PAVEL315 Общие вопросы Delphi 6 23.02.2007 11:20