tstrings如何用?

borlandsoftware 2002-03-17 01:53:17
var
u_list:tstrings;
begin
u_list:=tstrings.Create;

adoconnection1.GetFieldNames('FTT_jcqbhsjds',u_list);
...全文
70 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
INeedCa 2002-03-17
  • 打赏
  • 举报
回复
var
u_list:tstrings;
begin
u_list:=tstrings.Create;

adoconnection1.GetFieldNames('FTT_jcqbhsjds',u_list);

这样用是不对的,编译器应该会给出一个warning,因为TStrings是抽象类,你应该用一个它的派生类生成实例,如TStringList。
andylife 2002-03-17
  • 打赏
  • 举报
回复
TComboBox.Items,
TMemo.Lines
TListBox.Items

等的属性都是TStrings类型 的
我们通常不可以直接使用TString,而是使用他的派生类的
如:TStringList


var
MyStringList:TStringList;
begin
MyStringList:=TStringList.Create(Application);

MyStringList.Add('I');
MyStringList.Add('love');
MyStringList.Add('you');


Memo1.Lines.Assign(MyStringList);
ListBox1.Items.Assign(MyStringList);

xyzguan 2002-03-17
  • 打赏
  • 举报
回复
就象comboxbox的list一样
brallow 2002-03-17
  • 打赏
  • 举报
回复
tstrings是一个字符串的队列,相当于一个数组。
joyhero 2002-03-17
  • 打赏
  • 举报
回复
同意andylife(猫王)的做法,但变量是可以申明为TStrings抽象类的,不一定非要申明为TStringList。

var
u_list:TStrings;
begin
u_list:=TStringList.Create;

adoconnection1.GetFieldNames('FTT_jcqbhsjds',u_list);


liuziran 2002-03-17
  • 打赏
  • 举报
回复
var sl:TStrings;
sl :=TStringList.Create;
...
shadowno 2002-03-17
  • 打赏
  • 举报
回复
http://www.csdn.net/expert/topic/566/566647.xml?temp=.5136072
stiwin 2002-03-17
  • 打赏
  • 举报
回复
TStrings是抽象类要用子类来实例化

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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