TStrings

yuanrong 2003-08-23 05:54:58

请问TStrings类型如何定义？
是不是这样：
var TempStr:TStrings;
TempStr:=('1','2','3');

...全文

25 3 打赏收藏转发到动态举报

写回复

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

leonkim 2003-08-23

打赏
举报

回复

TStrings是抽象类型
TStringList是它的子类，并且实现了它的方法。
就象楼上的所说：
TempStr := TStringList.Create;
TempStr.Add('1');
TempStr.clear;
......

yuanrong 2003-08-23

打赏
举报

回复

原来是这样，谢谢。

DWGZ 2003-08-23

打赏
举报

回复

TStrings是抽象类型
TempStr := TStringList.Create;
TempStr.Text := '1' or
TempStr.Add('1');
....

vs2005自定义控件，实现了delphi中TStrings(TStringList)一样的效果

json4delphi JSON for Delphi，支持较早版本的Delphi（6或更高版本）对象-pascal本机代码，仅使用TList，TStrings和TStringList类例子： var Json: TJson; Str: Stringbegin Json := TJson.Create(); // put Json....

Memo: Tstrings); begin { if frVersion >= 23 then} frReadMemo(Stream, Memo){ else frReadMemo22(Stream, Memo);} end; FR_Utils: procedure frReadMemo(Stream: Tstream; l: Tstrings); var s: String; b: ...

procedure SetAlias(const Value: TStrings); public { discard_other_code} //下面是肖杨的商场管理源码中的代码 //返加人民币的中文数值 class function other_RMB(NN:real):string; //其它的两个方法 class ...

aTempPathFileNameStrings: TStrings=nil); procedure Load; procedure Save; procedure FreeOldEVent; constructor Create(AOwner: TComponent); override; destructor Destroy; override; procedure ...

5,388

社区成员

262,730

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章