Changeset 172 for trunk/Packages/Common/ListViewSort.pas

Timestamp:

Jun 14, 2024, 9:41:40 PM (5 months ago)

Author:

chronos

Message:

• Fixed: Avoid error in case of invalid import data.
• Modified: Updated Common package.

File:

• trunk/Packages/Common/ListViewSort.pas (modified) (2 diffs)

trunk/Packages/Common/ListViewSort.pas

@@ -136 +136 @@
 constructor TListViewEx.Create(TheOwner: TComponent);
 begin
-  inherited Create(TheOwner);
+  inherited;
   Filter := TListViewFilter.Create(Self);
   Filter.Parent := Self;
@@ -172 +172 @@
 constructor TListViewFilter.Create(AOwner: TComponent);
 begin
-  inherited Create(AOwner);
+  inherited;
   FStringGrid1 := TStringGrid.Create(Self);
   FStringGrid1.Align := alClient;