*****请问：如果我想在listbox的item.insert时，insert一个Tedit,即制作一个可编辑的listbox.应该如何实现？*****急！急！急！急！***

Question

好象listbox 不能做其它控件的容器
你可以另外设一个edit
在编辑时将内容写入
改完后存回listbox

Answer 1

可以的，我试过了。
我只是想把他做成小控件，以后用着方便。以下是全部代码大家可以借鉴一下：高手快来帮忙啊！！！！！！unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;type
  TForm1 = class(TForm)
    ListBox1: TListBox;
    Edit1: TEdit;
    procedure ListBox1DrawItem(Control: TWinControl; Index: Integer;
      Rect: TRect; State: TOwnerDrawState);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.DFM}procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
begin
if index=1 then
edit1.Top:=rect.Top;
edit1.Left:=rect.Left;
edit1.Width:=rect.Right-rect.Left;
edit1.Height:=rect.Bottom-rect.Top;
edit1.Parent:=ListBox1;
end;procedure TForm1.FormCreate(Sender: TObject);
begin
ListBox1.Style:=lbOwnerDrawFixed;
end;end.

Answer 2

可以的，代码：
  with TEdit.Create(ListBox1) do
  begin
    left:=0;
    top:=0;
    parent:=listbox1;
    visible:=true;
  end;

Answer 3

我如何扩展或重载listbox的items.insert方法？？？？

Answer 4

我想在设计期就看见效果！！！！！！
每加一个Item就加一个Edit..........!!!!!!!!!?????????
高手何在？？？？？？？？？？？？？