mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-03 14:47:21 +01:00
LCL: Fix compilation in ShellCtrls.
git-svn-id: trunk@62788 -
This commit is contained in:
parent
4ff199e1d7
commit
af151e9fca
@ -662,9 +662,9 @@ var
|
||||
MaskList: TMaskList;
|
||||
Files: TList;
|
||||
FileItem: TFileItem;
|
||||
MaskOptions: TMaskOptions;
|
||||
{$if defined(windows) and not defined(wince)}
|
||||
ErrMode : LongWord;
|
||||
MaskOptions: TMaskOptions;
|
||||
{$endif}
|
||||
begin
|
||||
{$if defined(windows) and not defined(wince)}
|
||||
|
||||
Loading…
Reference in New Issue
Block a user