Delphi中有类似java集合类的东西吗

dead_lee 2002-09-12 01:46:59
或者就是TList?
最好类似java hash map那样,有key---value对应关系的...
...全文
95 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
dead_lee 2002-09-13
  • 打赏
  • 举报
回复
我现在程序用的就是TStringList,不过在学了java后,怕自己对Delphi了解不够,不知道Delphi里面有没有像java那样各司其职的容器类....
好了,结贴...
roger 2002-09-12
  • 打赏
  • 举报
回复
同意太阳风
shanxia 2002-09-12
  • 打赏
  • 举报
回复
up!
windofsun 2002-09-12
  • 打赏
  • 举报
回复
其实TStrings类就可以实现(但要注意TStrings是一个抽象类,一般用TStringList)

你可以运行下面的例子看看

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
ComboBox1: TComboBox;
Edit1: TEdit;
Edit2: TEdit;
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure ComboBox1Change(Sender: TObject);
private
{ Private declarations }
StrList: TStringList;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
StrList := TStringList.Create;
StrList.Add('aaa=111');
StrList.Add('bbb=222');
StrList.Add('ccc=333');
ComboBox1.Items := StrList;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
FreeAndNil(StrList);
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
var
sName: string;
begin
sName := ComboBox1.Items.Names[ComboBox1.ItemIndex];
Edit1.Text := sName;
Edit2.Text := ComboBox1.Items.Values[sName];
end;

end.
windofsun 2002-09-12
  • 打赏
  • 举报
回复
Delphi 6&7有一个控件TValueListEditor

5,927

社区成员

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

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