Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Пожалуйста помогите

Scholl © (2002-10-23 11:13:00)
Как организовать поиск в *.txt файле

Yegor Derevenets (2002-10-27 11:43:00) [1]
while not SeekEOF (F)
do begin
Readln (F, S);
NChar:=Pos (Sample, S);
if NChar<>0
then Writeln ("String "", S, "" contains SubStr!!! At ", NChar);
end;

В двоичном файле все несколько сложнее. Там уже надо самому писать эффективные алгоритмы.

Song (2002-10-27 08:35:00) [2]
Прочитай в TStringList дальше можно по IndexOf() или по Pos()

2semion © (27.10.02 08:20)
Надо ReadLn()

Semion (2002-10-27 08:20:00) [3]
f,:textfile;
filename,s:string;

assignfile(f,filename);

reset(f);
while not(eof(f)) do begin
read(f,s);
{if я здесь проводи поиск символа}

end;

F1 (2002-10-24 12:10:00) [4]
Открываешь файл,

while Not Eof(Файл) do
Считываешь строчку, а в строчке-то я надеюсь найдешь!!!

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »