Проблема 2002

← →
d-coder (2002-09-24 19:58) [0]

Такая мессага появляется непонятно почему. Текст процедуры вроде как правильный, но при попытке нажатия на кнопку theme_but компилятор ругается.
Этот код берет значение из ComboBox"a theme(заполнен из текстового файла) и при нажатии кнопки должен прошерстить StringGrid booklist(тоже заполнен из текстового файла) и при совпадении текста из theme и из одного из столбцов booklist должен выписать всю найденную в booklist строку в строку filtlist.
Короче говоря, это фильтр. И все кажется вполне правильным, но у Delphi свой взгляд на вещи.
ПОЖАЛУЙСТА помогите, мастера. Заранее спасибо тем, кто откликнется.
Вот код:

r:=1; filtlist.Row:=1;
if themest.Text<>"" then
begin
for row:=1 to 3823 do
begin
if booklist.Cells[2, row]=themest.Text then
begin
for c:=0 to 4 do
begin
filtlist.Cells[c, r]:=histlist.Cells[c, row];
end;
r:=r+1;
filtlist.Row:=filtlist.Row+1;
end;
end;
end;
filtlist.RowCount:=filtlist.Row;
end;

Просто подскажите в чем ошибка...

← →
d-coder (2002-09-24 20:16) [1]

Все, всем спасибо - проблема разрешилась: я недоглядел и вместо filtlist.RowCount:=filtlist.RowCount+1 написал filtlist.Row:=filtlist.Row+1;
Как обычно, ошибка от невнимательности. :)

Проблема 2002 Найти похожие ветки