想做个简单表格,第一列不变,第二列可以输入或由程序填数,类似delphi的object inspector的"属性修改",该如何做呢? (50分)

如何设置表格的行列数量呢?谢谢.

d6自带ValueListEditor控件。

对不起,我学DELPHI没两天,下载的书讲得都不细...刚刚找到,先看看怎么用再说,谢谢.

看了半天,不得要领.手工输入会了,可程序修改,变量如何赋值? 每个表格内容的变量叫什么?

给你我的程序
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.
看看就明白了