![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#11 |
Заблокирован
Регистрация: 31.03.2011
Сообщений: 976
|
![]() |
![]() |
![]() |
![]() |
#12 |
Пользователь
Регистрация: 13.05.2009
Сообщений: 26
|
![]()
procedure TGSMThread.ComPortOnRxChar(Sender: TObject; Count: Integer);
var C: Char; I: Integer; Buffer: String; begin ComPort.ReadStr(Buffer, Count); WriteToLog(Buffer, FFileName) - эта процедура в отдельном Unitе. FFileName - для каждого потока свой файл. сама процедура: AssignFile(F, sFileName); if FileExists(sFileName) then Append(F) else ReWrite(F); WriteLn(F, sBuffer); CloseFile(F); |
![]() |
![]() |
![]() |
#13 |
Старожил
Регистрация: 03.01.2014
Сообщений: 2,870
|
![]()
Возможно, автор имеет в виду его очистку при завершении процесса записи.
Если пробовать "в лоб", то: Код:
Последний раз редактировалось Streletz; 12.01.2014 в 13:15. |
![]() |
![]() |
![]() |
#14 | |
Подтвердите свой е-майл
Регистрация: 29.08.2012
Сообщений: 4,011
|
![]() Цитата:
файлы - есть неуправляемые ресурсы с ними так работать, все равно что стрелять себе в ногу, рано или поздно придет эцих с гвоздями. |
|
![]() |
![]() |
![]() |
#15 |
Пользователь
Регистрация: 13.05.2009
Сообщений: 26
|
![]()
Вот что нашел:
http://www.programmersforum.ru/showthread.php?t=131725 |
![]() |
![]() |
![]() |
#16 |
Старожил
Регистрация: 29.09.2009
Сообщений: 9,713
|
![]()
Крайне не рекомендую читать в несколько потоков из одного последовательного порта. Одного вполне достаточно.
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation |
![]() |
![]() |
![]() |
#17 | |
Старожил
Регистрация: 03.01.2014
Сообщений: 2,870
|
![]() Цитата:
Действуйте! ![]() Естественно. Последний раз редактировалось Streletz; 12.01.2014 в 13:28. |
|
![]() |
![]() |
![]() |
#18 |
Пользователь
Регистрация: 13.05.2009
Сообщений: 26
|
![]() |
![]() |
![]() |
![]() |
#19 | |
Пользователь
Регистрация: 13.01.2014
Сообщений: 21
|
![]()
Чото не понятно как в одном потоке
Цитата:
Приглашаю в мой блог http://demiware.ru о программировании в Delphi, PHP(Symfony)...
|
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
python логирование | Lemon2009 | PHP | 1 | 11.09.2012 15:59 |
Логирование EventLog | mrChester | Общие вопросы .NET | 7 | 18.04.2012 09:55 |
Логирование запуска программы | Dima DDM | Общие вопросы Delphi | 0 | 05.08.2011 15:48 |