TStringList 善用 value['names'] 即使value 是带=号的值都没有关系呵呵 ，我靠 强，以后就用这个了，key=value首选...

 

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 做的还是 很好的 足够用了。

转载于:https://www.cnblogs.com/del88/p/3711993.html