diff options
-rw-r--r-- | examples/apps/uidesigner/vfdwidgets.pas | 12 | ||||
-rw-r--r-- | src/gui/gui_listview.pas | 2 |
2 files changed, 7 insertions, 7 deletions
diff --git a/examples/apps/uidesigner/vfdwidgets.pas b/examples/apps/uidesigner/vfdwidgets.pas index 854532d6..61a405a1 100644 --- a/examples/apps/uidesigner/vfdwidgets.pas +++ b/examples/apps/uidesigner/vfdwidgets.pas @@ -335,19 +335,19 @@ begin wc.WidgetIconName := 'vfd.trackbar'; RegisterVFDWidget(wc); -(* + // ListView // Currently causes a Access Violation when resized! wc := TVFDWidgetClass.Create(TfpgListView); wc.NameBase := 'lvName'; -// wc.AddProperty('Columns',TPropertyDBColumns, ''); -// wc.AddProperty('Items', TPropertyStringList, ''); -// wc.AddProperty('FontDesc',TPropertyString,''); -// wc.AddProperty('HeaderFontDesc',TPropertyString,''); + //wc.AddProperty('Columns',TPropertyDBColumns, ''); + //wc.AddProperty('Items', TPropertyStringList, ''); + //wc.AddProperty('FontDesc',TPropertyString,''); + //wc.AddProperty('HeaderFontDesc',TPropertyString,''); wc.WidgetIconName := 'vfd.listview'; RegisterVFDWidget(wc); -*) + // Treeview wc := TVFDWidgetClass.Create(TfpgTreeView); diff --git a/src/gui/gui_listview.pas b/src/gui/gui_listview.pas index 62c3cbd1..47506413 100644 --- a/src/gui/gui_listview.pas +++ b/src/gui/gui_listview.pas @@ -1515,7 +1515,7 @@ constructor TfpgListView.Create(AOwner: TComponent); begin inherited Create(AOwner); Focusable := True; - ShowHeaders := True; + FShowHeaders := True; FVScrollBar := TfpgScrollBar.Create(Self); FVScrollBar.Orientation := orVertical; |