ZloiDed писал(а):
Что то не разобрался как его добавить в проект
Закинуть в папки conf и code соответствующие файлы. Но с недавних пор компонента DataToFile нет в палитре - можно либо добавить самому, либо copy-paste из схемы примера поиска (там есть пример).

ZloiDed писал(а):
Вроде в компоненте FileStream есть возможность открывать только чтение
Да, но нету компонента, который в этом стриме будет искать - модифицированный DataToFile и призван решить эту проблему.
При открытии файла играет роль режим открытия и режим совместного доступа - в первом приложении, которое открыло и работает с файлом и в твоём приложении, в которм ты тоже хочешь с ним работать. Так вот, в существующем FileStream режим открытия "Read" включает в себя режим совместного доступа "запрет записи в файл". То-есть, одна программа открыла файл для записи, а потом приходишь ты и хочешь открыть тот же файл, отрубив первой программе запись. Система такого не позволяет.
Поэтому в модифицированном FileStream есть свойство ShareMode, благодаря которому можно открыть чужой файл для чтения (если первая программа это позволяет).

Add(DataToFile,5947293,469,378)
{
 Type=6
 Data=String(error)
 Point(doSearch)
 Point(onFound)
 Point(onNotFound)
 Point(Position)
 link(Stream,286078:Stream,[(475,369)(377,369)(377,438)(335,438)])
 link(onFound,15145097:doMessage,[])
}
Add(Message,15145097,546,385)
{
 Caption="Найдено!"
 Icon=4
}
Add(Button,1793484,238,392)
{
 Left=100
 Top=125
 Width=140
 Height=30
 Caption="Найти"
 link(onClick,286078:doOpen,[])
}
Add(FileStream,286078,329,392)
{
 FileName="C:\\1\\log.txt"
 Point(doPosition)
 link(onLoad,3945605:doEvent1,[])
}
Add(Hub,3945605,392,392)
{
 link(onEvent1,5947293:doSearch,[])
 link(onEvent2,286078:doClose,[(432,405)(432,450)(319,450)(319,405)])
}