Undiclared indentifier

← →
finger22 © (2003-07-15 00:01) [0]

При обработке функции відает ERROR
function FIND_ERROR (sl:tstrings):boolean;
var i:integer;
begin
for i:=0 to sl.items.count-1 do
if pos("ERR",sl.items[i])<>0 then begin
result:=true;exit;
end;
result:=false;

← →
Silver Alex © (2003-07-15 00:08) [1]

Подробней напиши: что передаешь и где имено ERROR?

← →
finger22 © (2003-07-15 00:13) [2]

Читаю фаел, Ищу в нем ERR и на строке for i:=0 to sl.items.count-1 do, вылазит ошибка "Undiclared indentifier "item"", передаю в LoadFromFile.

← →
Silver Alex © (2003-07-15 00:17) [3]

for i:=0 to sl.count-1 do
if pos("ERR",sl[i])<>0 then begin
result:=true;exit;
end;
result:=false;

ну ты, блин, даешь

function FIND_ERROR (SL: TStrings): boolean;
begin
Result := Pos("ERR", SL.Text) > 0
end;

Правда, вряд ли есть смысл писать функцию, состоящую из одного простейшего оператора.

Undiclared indentifier Найти похожие ветки