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

Проблема 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;
Как обычно, ошибка от невнимательности. :)



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

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



Память: 0.45 MB
Время: 0.011 c
1-21533
Whippi
2002-10-29 11:32
2002.11.07
Вставить текст в Edit


14-21809
Прафисианал
2002-10-19 17:02
2002.11.07
Восстановление поврежденной базы


1-21618
Balu
2002-10-23 15:33
2002.11.07
---|Ветка была без названия|---


4-21848
raiks
2002-09-24 15:59
2002.11.07
Сообщение EM_LINESCROLL прокручивает текст в TMemo только вниз


4-21890
cypher
2002-09-24 22:24
2002.11.07
Такое хитрое окно




   Наверх