fix #120 - "select all" in the messages can hang dexed for a while

This commit is contained in:
Basile Burg 2023-07-06 20:48:00 +02:00
parent c2c987cdda
commit 985b8b073d
1 changed files with 1 additions and 0 deletions

View File

@ -811,6 +811,7 @@ var
i: integer;
n: TTreeNode;
begin
List.ClearSelection();
List.BeginUpdate;
for i := 0 to List.Items.Count-1 do
begin