diff options
-rw-r--r-- | src/gui/fpg_listview.pas | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/gui/fpg_listview.pas b/src/gui/fpg_listview.pas index f93c1950..12ed4364 100644 --- a/src/gui/fpg_listview.pas +++ b/src/gui/fpg_listview.pas @@ -247,6 +247,7 @@ type procedure MakeItemVisible(AIndex: Integer; PartialOK: Boolean = False); function ItemAdd: TfpgLVItem; deprecated; function AddItem: TfpgLVItem; + function NewItem: TfpgLVItem; published property Columns: TfpgLVColumns read FColumns; property HScrollBar: TfpgScrollBar read FHScrollBar; @@ -1623,6 +1624,11 @@ begin FItems.Add(Result); end; +function TfpgListView.NewItem: TfpgLVItem; +begin + Result := TfpgLVItem.Create(FItems); +end; + { TfpgLVColumns } function TfpgLVColumns.GetColumn(AIndex: Integer): TfpgLVColumn; |