Case-sensitive MatchesMask alternative in Delphi

Question

I use the code below for detecting desired files:

uses Masks;
 
begin
  if MatchesMask(MyFilename, '*.Exe') then
  begin
    // Do Something
  end;
end;

However, as stated in the official documentation, MatchesMask is case-insensitive.

Is there any case-sensitive way to detect filenames using wildcards? (I'm using Delphi 10.3.3 VCL)

By all means: if you only check against a specific suffix then you can use `if Copy( MyFilename, Length( MyFilename )- 3, 4 )= '.Exe'` right away. — AmigoJack, Aug 25 '21 at 14:22
@AmigoJack or `if ExtractFileExt(MyFilename) = '.Exe' then` https://docwiki.embarcadero.com/Libraries/en/System.SysUtils.ExtractFileExt — Remy Lebeau, Aug 25 '21 at 15:15
I'm curious what all those do under the hood (and how robust they are)... — AmigoJack, Aug 25 '21 at 22:44

score 0 · Answer 1 · answered Nov 12 '21 at 16:57

0

that's fine ?

Maybe you can do This. Convert all to Uppercase.

uses Masks;
 
begin
  if MatchesMask(Upper(MyFilename)), Upper('*.Exe')) then
  begin
    // Do Something
  end;
end;

answered Nov 12 '21 at 16:57

It is already case insensitive. I want case sensitive. – Xel Naga Nov 13 '21 at 17:03

1 Answers1