From 0ba3f61f9cb377f527fc5752aae72b46f649269a Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Sat, 3 Oct 2009 17:58:55 +0200 Subject: Match panel items by real name when restoring selection, not display name --- UCore.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'UCore.pas') diff --git a/UCore.pas b/UCore.pas index deccbb1..cb80927 100644 --- a/UCore.pas +++ b/UCore.pas @@ -1441,12 +1441,12 @@ begin for i := 0 to DataList.Count - 1 do with PDataItem(DataList[i])^ do if Selected and (not UpDir) then Inc(SelCount); - Item1 := string(PDataItem(ListView.Selected.Data)^.FDisplayName); + Item1 := string(PDataItem(ListView.Selected.Data)^.FName); if (PDataItem(ListView.Selected.Data)^.Selected and (SelCount > 0)) or (SelCount = 0) then begin if ListView.ConvertToSorted(ListView.Selected.Index) < ListView.Items.Count then for i := ListView.ConvertToSorted(ListView.Selected.Index) + 1 to DataList.Count - 1 do if not PDataItem(DataList[ListView.ConvertFromSorted(i)])^.Selected then begin - Item2 := string(PDataItem(DataList[ListView.ConvertFromSorted(i)])^.FDisplayName); + Item2 := string(PDataItem(DataList[ListView.ConvertFromSorted(i)])^.FName); Break; end; if (Item2 = '') and (ListView.ConvertToSorted(ListView.Selected.Index) > 0) then @@ -1454,7 +1454,7 @@ begin if (not PDataItem(DataList[ListView.ConvertFromSorted(i)])^.Selected) and (not PDataItem(DataList[ListView.ConvertFromSorted(i)])^.UpDir) then begin - Item2 := string(PDataItem(DataList[ListView.ConvertFromSorted(i)])^.FDisplayName); + Item2 := string(PDataItem(DataList[ListView.ConvertFromSorted(i)])^.FName); Break; end; end; -- cgit v1.2.3