Проблема 2002 [D6, WinXP]
d-coder © (2002-09-24 19:58:00)
Такая мессага появляется непонятно почему. Текст процедуры
вроде как правильный, но при попытке нажатия на кнопку 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:00) [1]
Все, всем спасибо - проблема разрешилась: я недоглядел и
вместо filtlist.RowCount:=filtlist.RowCount+1 написал
filtlist.Row:=filtlist.Row+1;
Как обычно, ошибка от невнимательности. :)
Наверх 
ЧАТ |
Орешник |
|
