我看是这样写吧
var s:TstringList;
i:integer;
begin
s:=TstringList.Create;
s.add('abc');
s.add('123');
s.Sort;
if s.Find('123', i) then
edit1.text:=s.Strings;
s.free;
end;
－－－－－－－－－－－－－－－－－
Represents the value part of a string associated with a given Name,
on strings with the form Name=Value.
property Values[const Name: string]: string;
Description
When the list of strings for the TStrings object includes strings of the form Name=Value,
use Values to get or set the value part of a string associated with
a specific name part. If the list does not contain any strings of the proper Name=Value form,
or if none of those strings matches the Name index,
Values returns an empty string.
Note:
The Name index is case-insensitive.
That is, Values is the value part for the first occurrence of Name
or an equivalent string that differs only in case.
The Name that identifies the string is to the left of the
equal sign (=), and the current Value of the Name identifier is on the right side.
There should be no spaces present before or after the equal sign.
