mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-16 04:40:40 +01:00
* Fix wrong typecast in GetSelectedItems, patch by Sébastien JeanJean
This commit is contained in:
parent
e7df9b4cf0
commit
3f4a41fbd9
@ -93,7 +93,7 @@ begin
|
||||
For I:=0 to LBFiles.Count-1 do
|
||||
if LBFiles.Selected[I] then
|
||||
begin
|
||||
Result[Idx]:=TFileEntry(LBFiles.Items.Objects[i]);
|
||||
Result[Idx]:=TFileSearchMatch(LBFiles.Items.Objects[i]).Entry;
|
||||
Inc(Idx);
|
||||
end;
|
||||
end;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user