在Delphi 10.3中使用CODEPAGE创建dbase IV DBF表的正确语法是什么？

Question

var
      ADOConnDBF  : TADOConnection;
      ADOCommand : TADOCommand;
      var ConnStringDBF,file_name:string;
    begin
      ADOConnDBF := TADOConnection.Create(nil);
      ConnStringDBF:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+extractfilepath(ParamStr(0))+';'+
    'Extended Properties=dBASE IV;User ID=Admin;Password=;';

      ADOConnDBF.ConnectionString := ConnStringDBF;
      ADOCommand := TADOCommand.Create(nil);
      ADOCommand.Connection := ADOConnDBF;

      file_name:='B5SPEX'+formatdatetime('yy',Now);
      if FileExists(extractfilepath(ParamStr(0))+'\'+file_name+'.dbf') then
        DeleteFile(extractfilepath(ParamStr(0))+'\'+file_name+'.dbf');

      ADOCommand.CommandText := 'Create Table ' + file_name +
                                ' CODEPAGE=620 '+
        ' ('+
            '[SDR] Char(1),'+
            '[STV] Char(1),'+
            '[TTR] Char(1)'+
           ') ';  
      ADOCommand.Execute;

该语法不起作用。它给出了语法错误。目标是在Delphi环境中用代码页620创建DBF文件dBase IV。