乱码文件里查找指定字符串的大难题。求大神~

發文回覆瀏覽次數：522

推到 Plurk!

推到 Facebook!

乱码文件里查找指定字符串的大难题。求大神~

尚未結案

psstudio
一般會員

發表：4
回覆：1
積分：1
註冊：2006-07-31

發送簡訊給我

#1 引用回覆回覆

發表時間：2018-11-11 14:25:45

IP:171.92.xxx.xxx 未訂閱

[code delphi]
var f: TextFile; s: string; sPos, ePos: Integer; sL: TStringList;
sL := TStringList.Create;
reset(f);
Readln(f, s); // 赋值给S。
sPos := Pos('=', s); // 查找"="的位置
sL.Add(Copy(s, sPos 1, ePos - sPos - 1)); // 含有"；"就获取"："到"；"的字符串
sL.Clear;
end;
sPos := Pos('=', s); // 查找"="的位置
sL.Add(Copy(s, sPos 1, ePos - sPos - 1)); // 含有"；"就获取"："到"；"的字符串
sL.Clear;
end;
showmessage('找到了');
end;
closefile(f);
用该按键事件对无乱码的文件查找是正常的，如果文件中包含有乱码就不正常了，求大神指点，附上带乱码文件。。

附加檔案：5be7cb693af3a_乱码A.log.txt

pcplayer99
尊榮會員

發表：146
回覆：790
積分：632
註冊：2003-01-21

發送簡訊給我

#2 引用回覆回覆

發表時間：2019-02-04 02:21:17

IP:61.145.xxx.xxx 未訂閱

乱码的原因？

是'f字符串编码不对？比如，UTF8或者其它。

如果实在搞不定乱码，直接对字符串做一个 for 循环的搜索，逐个字符搜索，也是可以的。

系統時間：2024-11-21 19:19:54

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！