var
  Year, Month: word;
  RegEx: TRegEx;
  M: TMatchCollection;
[...]
  M := RegEx.Matches(AString, '(\d{4})-(\d{2})');
  if M.Count > 0 then begin
    Year := M.Item[0].Groups.Item[0].Value.ToInteger;
    Month := M.Item[0].Groups.Item[1].Value.ToInteger;
  end;

  
var
  Year, Month: word;
  s: string;
  RegEx: TRegEx;
  M: TMatch;
[...]
  M := RegEx.Match('fdsfsdfd2020-01racts_csvSGR-1_NFU.csv', '(\d{4})-(\d{2})');
  if M.Groups.Count > 0 then begin
    s := M.Groups.Item[0].Value; // = '2020-01' (чтобы посмотреть значение, т.к. Expression illegal in evaluator)
    s := M.Groups.Item[1].Value; // = '2020' 
    Year := s.ToInteger;
    s := M.Groups.Item[2].Value; // = '01' 
    Month := s.ToInteger;
  end;