我写了一个从tlistview继承下来的控件，希望拖到面版的时候ViewStyle是vsReport，出错？ ( 积分: 200 )

我在create事件中是这样写的：
constructor TCJLV.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
RowSelect := True;
ReadOnly := True;
GridLines := True;
HideSelection := False;
ViewStyle := vsReport;
end;
但是，我在设计期的时候假设把ViewStyle 改成vsicon后保存项目，再次读取项目的时候ViewStyle 又变回成了vsReport。求教

我在create事件中是这样写的：
constructor TCJLV.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
RowSelect := True;
ReadOnly := True;
GridLines := True;
HideSelection := False;
ViewStyle := vsReport;
end;
但是，我在设计期的时候假设把ViewStyle 改成vsicon后保存项目，再次读取项目的时候ViewStyle 又变回成了vsReport。求教

我按照你的代码试了一下，没有发现问题。