哪里有这样的控件？类似于Delphi中的Object Inspector.(30分)

哪里有这样的控件？类似于Delphi中的Object Inspector.

Dev Express

我也来看看！

to locka,
DevExpress中的哪一个,具体说一下

devExpress 的Inspector. 你可以到www.51delphi.com去下載。
還有可以邊接table的。 Field | Value
good luck ^_^

用DELPHI6吧，additional里面有个valuelisteditor控件就行

同意 powersite

该控件的下载URL：
http://www.neweasier.com/vcl.html?class=27
控件名称：
ZPROPLST.ZIP

就用d自带的就行ValueListEditor给你我的程序
unit Unit1;

interface

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

type
TForm1 = class(TForm)
VE: TValueListEditor;
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure VEEditButtonClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
VE.TitleCaptions.Strings[0]:='名称';
VE.TitleCaptions.Strings[1]:='属性';
VE.InsertRow('姓名','无名氏',true);
VE.ItemProps['姓名'].EditStyle:=esSimple;
//第一行代码让我们加入一个新行，第一个参数是Key值，第二个参数是Value的默认值。第二行代码指出这是一个具有文本框风格的输入框。
VE.InsertRow('出生年月','1982',true);
VE.ItemProps['出生年月'].EditStyle:=esPickList;
VE.ItemProps['出生年月'].PickList.Add('1982');
VE.ItemProps['出生年月'].PickList.Add('1983');
VE.ItemProps['出生年月'].PickList.Add('1984');
VE.ItemProps['出生年月'].PickList.Add('1985');
VE.ItemProps['出生年月'].ReadOnly:=true;
//这几行代码让我们得到了一个具有下拉菜单风格的输入框。第二项代码指出，这是一个具有下拦菜单风格的输入框，紧接着加入一些下拉选项，最后一项代码指出其只能从下列项中选择而不准自行输入。当然，VE->ItemProps["出生年月"]　(其实是一个ItemProp对象)它还具有一个EditMask的非常有用的属性。通过这个属性你可以定制输入。
VE.InsertRow('地址','地球上的中国',true);
VE.ItemProps['地址'].EditStyle:=esEllipsis;
end;

procedure TForm1.VEEditButtonClick(Sender: TObject);
var
strAddress:string;
begin
strAddress:=VE.Values[VE.Keys[VE.Row]];
ShowMessage('欢迎您，来自'+strAddress+'的朋友!');
end;

end.
看看就明白了