В паскальABC работает, а в делфи 7 выходит ошибка. Как исправить?

тогда получается вот так
[Error] Project2.dpr(19): Identifier expected but 'CONST' found
[Error] Project2.dpr(20): '=' expected but ';' found
[Error] Project2.dpr(23): For loop control variable must be simple local variable
[Error] Project2.dpr(23): Left side cannot be assigned to

temirlan_official, скиньте ваш код в этом случае

Stockholm Syndrome, function IsVowel(var ch:char):boolean;

const len = 10;
//const integer len = 10;
var

//arr: array[1..10] of string = ('À', 'Ó', 'Î', 'Û', 'È', 'Å', '¨', 'ß', 'Þ', 'Ý');
//arr: array[1..10] of char = ('À', 'Ó', 'Î', 'Û', 'È', 'Å', '¨', 'ß', 'Þ', 'Ý');
const arr: array[1..10] of string = ('À', 'Ó', 'Î', 'Û', 'È', 'Å', '¨', 'ß', 'Þ', 'Ý');
i: integer;
begin
IsVowel := false;
for i := 1 to len do
if arr[i] = ch THEN
IsVowel := true
end;

temirlan_official, у вас синтаксическая ошибка, const идёт сразу после var, а в разделе var нет ни одного объявления
попробуйте так

const 
  len = 10;
  arr: array[1..10] of string = ('À', 'Ó', 'Î', 'Û', 'È', 'Å', '¨', 'ß', 'Þ', 'Ý');
var
  i: integer;
begin
  // ...
end;

@StockholmSyndrome, вот это выходит

Stockholm Syndrome, и еще так становится

temirlan_official, это вообще кусок другого кода, не связанный с этим вопросом, у вас функция IsVowel-то работает?
если да, то можно закрывать вопрос и отмечать ответ решением, и далее уже задавать новый вопрос, связанный с другим куском кода

Stockholm Syndrome, я не знаю. программа не работает и панель, в которую выписывались ошибки, исчезла.

temirlan_official, вы сами этот код писали или взяли откуда-то? если сами, то вы должны уметь отлаживать программу, например, с помощью breakpoint'ов

Stockholm Syndrome, я писал её часть. но не в делфи7. проверил функцию. работает.

temirlan_official, тогда стоит отметить ответ решением, чтобы закрыть вопрос