Вниз
Скачать: CL | DM;

Length function   Найти похожие ветки 

 
WCM   (2003-01-12 13:27) [0]

Господа! Есть такая проблемка:
При компиляции такого кода
j := Length(k_cel);
возникает ошибка Missing operation or semicolon
При создании абсолютно нового модуля компиляция проходит нормально...
k_cel - заранее определеный динамический массив.

В чем проблема?


 
Anatoly Podgoretsky ©   (2003-01-12 13:31) [1]

Проблема в старом модуле, возможно недопустимые символы, при том не обязательно в этой строке.


 
WCM   (2003-01-12 14:43) [2]

function GetLength(k_cel: array of integer) : integer;
begin
Result := Length(k_cel);
end;

Вот тут ошибка. А что значит старый модуль?


 
Anatoly Podgoretsky ©   (2003-01-12 14:55) [3]

Ты же пишешь, что при переносе дтого кода в другой модуль у тебя все работает, значит в этом коде могут быть недопустимые символы.
Правда весьма сомнительна ценность этого кода, чем отличается N := GetLength(arr) от N := Length(arr), кроме любви к искуству и потери производительности.
Соотри полность все эти строки и повторно набей.


 
WCM   (2003-01-12 15:38) [4]

Дык ничем не отличается, а не работает и так и так.

В другом модуле работает такая простенькая процедура:
procedure test;
var i: integer;
d: array of integer;
begin
i := 10;
SetLength(d,i);
i := Length(d); <-- никакакой ошибки!!! Ничем не отличается.
end;

end.


 
Yuri-7 ©   (2003-01-12 17:42) [5]

function GetLength(k_cel: array of integer) : integer;
begin
Result := High(k_cel) - Low(k_cel) + 1;
end;


 
Думкин   (2003-01-13 06:30) [6]


> WCM (12.01.03 15:38)
> Дык ничем не отличается, а не работает и так и так.
> i := Length(d); <-- никакакой ошибки!!! Ничем не отличается.

По-русски же сказали - в первоначальном тексте недопустимые символы - ты их не видишь, но они есть.
Может концовка строк не та, может еще чего.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
14-72458
Pat
2003-01-04 23:34
2003.01.23
Странные вещи...


14-72490
Kair
2003-01-06 05:04
2003.01.23
Спокойной ночи программисты!


14-72466
Fantasist.
2003-01-05 07:00
2003.01.23
Хочу программировать на VCL без Delphi


1-72302
BorisUK
2003-01-15 11:04
2003.01.23
Про стандарты разработок?


3-72071
Ruf
2003-01-06 12:42
2003.01.23
Паролить на mdb




   Наверх