如何使listview的某一列的内容可以修改,其他的列的内容不可修改?(down给分)

Question

down

Answer 1

一种不好的方法：
  procedure TMainFrm.ListView1Edited(Sender: TObject; Item: TListItem;
  var S: String);
begin
  if item.Caption='dfg' then
   abort;
end;

Answer 2

procedure TMainFrm.ListView1Editing(Sender: TObject; Item: TListItem;
  var AllowEdit: Boolean);
begin
 if item.Caption='dfg' then
   AllowEdit:=false;
end;

Answer 3

一种不好的方法：  用TStringGrid

Answer 4

一种有效的办法。
改变第一列：
ListView->Selected->Caption = "Caption";
改变子列(subItems):
ListView->Selected->SubItems->Strings[i] = "your value";

Answer 5

好像子列都不能手动改吧。没有关于subitems的属性