paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-31 04:42:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

lazutils: TMask.InitMaskString: use CaseSensitive

Browse Source 
git-svn-id: trunk@42274 -
This commit is contained in:
mattias 2013-08-03 11:41:21 +00:00
parent 4e125000da
commit de4ccacf56
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/lazutils/masks.pas
View File

@ -271,6 +271,7 @@ var
end;
begin
fCaseSensitive:=CaseSensitive;
SetLength(FMask.Chars, 0);
FMask.MinLength := 0;
FMask.MaxLength := 0;