Question

delphi7里面ReadLn后的识别问题

比如一个test.txt文件的内容是

Username := Test
UserID := 123
我怎么将它ReadLn并只读取123呢？
或者是我怎么来识别Edit2里面的内容是不是test.txt里面UserID :=123里面的123呢？

Answer 1

有种做法是将UserID :=替换成空字符串，即''；然后直接转成数字就可以；还有一种是“UserID := 123"这个字符串的前面部分‘UserID :=’的长度是固定，所以你只要提取后面部分的内容到一个新字符串，然后再转成数字就可以了。相关的命令去查和string有关的内容，里面都有的。总之方法很多。

Answer 2

记得在uses加StrUtils单元

var
StrTemp:string;
iPos:Integer;
begin
StrTemp:='UserID := 123';
iPos := Pos('=',StrTemp);
if iPos >0 then
begin
StrTemp := Trim(RightStr(StrTemp,Length(StrTemp)-iPos)) ;
ShowMessage(StrTemp); //这里返回的就是你要的 123了，
end;

Answer 3

这个真不知道，我也正在学，希望可以一起