在文本文件中查找某一个字符，应该怎么操作呢？

Question

var
  MyList: TStringList;
  Index: Integer;
begin
  MyList := TStringList.Create;
  try
    MyList.LoadFromFile('Myfile.txt');
    MyList.Sort;   
    if MyList.Find('MyStr', Index) then
       ...
    end;
  finally
  MyList.Free;
  end;

Answer 1

请察看这篇文章,希望对你有帮助(原码很长,不便粘贴):
http://renzhm.home.sohu.com/programme/delphi/d0019.htm

Answer 2

你可以用TRichEdit控件的FindText方法，并且可以指定起始位置和终止位置，还有整词匹配和部分匹配选项。

Answer 3

stringlist.loadfromfile('YourFile');
result:=pos('YourSubString',stringlist.text);