forum.boolean.name - Показать сообщение отдельно

IgorOK · 30.01.2012, 21:46

Local File=ReadFile("твой файл.txt")

Local what_need$="Джигурда"

While Not Eof(File)
	Local l$=ReadLine(File)
	If Instr(l, what_need$, 1)>0 Then RuntimeError what_need+" was found!"
Wend

Если надо - могу скинуть свой парсер файла.

30.01.2012, 21:46	#4
IgorOK Мастер Регистрация: 26.10.2009 Сообщений: 1,194 Написано 615 полезных сообщений (для 2,209 пользователей)	Ответ: Файловые операции Local File=ReadFile("твой файл.txt") Local what_need$="Джигурда" While Not Eof(File) Local l$=ReadLine(File) If Instr(l, what_need$, 1)>0 Then RuntimeError what_need+" was found!" Wend Если надо - могу скинуть свой парсер файла.
(Offline)