本文整理自网络,侵删。
procedure TForm1.btn1Click(Sender:TObject);var m: Integer; s: string; strlst :TStrings;begin strlst:= TStringList.Create; strlst.Add('张三=80'); strlst.Add('张四=90'); strlst.Add('张五=100'); strlst.NameValueSeparator := '='; //设置Name、Value分隔符! m:= strlst.IndexOfName('张四'); //根据Name获取Index s:= strlst.ValueFromIndex[m]; //获取Name的值 strlst.Values['张五'] := '101';//根据Name设置Value s:= strlst.Values['张五'];//根据Name获取Value strlst.Free;end;
相关阅读 >>
android实例-拍摄和分享照片、分享文本(xe8+小米2)
pchar和array [0..255] of char的区别
Delphi 通过memorystream 传递image1数据
更多相关阅读请进入《Delphi》频道 >>