procedure TForm1.Button2Click(Sender: TObject); var MyList: TStringList; begin MyList := TStringList.Create; try MyList.Text := Memo1.Text; ShowMessage(MyList.Values['aaa']); ShowMessage(MyList.Values['ddd']); ShowMessage(MyList.Values['eee']);
ShowMessage(MyList.Values['']); finally MyList.Free; end; end;
结果:
===================
value里面带=号是没有问题的,如果key里面第一个字符是等号,则认为key 是空,
看来delphi 做的还是 很好的 足够用了。
本文来自博客园,作者:del88,转载请注明原文链接:https://www.cnblogs.com/del88/p/3711993.html