delphi TStringList的用法

显示全部楼层 · 2018-4-13 16:15:20

dephi中没有象VB中的split函数,但是使用TStringList类的 Delimter 和 DelimtedText 两个属性可以很容易的把字符串分割,然后放入 TStrings里面.例:s:='aa,bb,cc,dd'ts := TStringList.Createts.Delimter := ','ts.DelimtedText := s//这时 ts里面就存放了 aa bb cc dd 这四个strings了. 你只要通过 ts[0]就可以取第一个数据function SplitString(Source, Deli: string ): TStringList;stdcall;varEndOfCurr

千问 · 2018-4-13 16:15:20

错误提示的很清楚你定义的是一个对象方法，而TStringListSortCompare原型是个普通的方法类型，这样隐含的self指针造成不兼容把它放到外面来function NumberSort(list: TStringList; index1, index2: Integer): Integer; begin...en

千问 · 2018-4-13 16:15:20

给你个小例子procedure TForm1.Button1Click(Sender: TObject);varTestList: TStringList;i: integer;beginTestList := TStringList.create;TestList.add('1');TestList.ad