Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];




Вниз

Поиск ячейки и аналогичныйх ей 


Ghost!   (2002-01-10 11:40) [0]

Здравствуйте, господа!
Вопрос возможно ламерский, но всё же очень нужный. Не затруднит ли Вас набрать часть кода, который ищет ячейку с текстом "x" в колонке "y" и выводит её на экран в Label. А потом аналогично поступает с тругими такими же ячейками, находящимися ниже (если таковые присутствуют). Используется Table, DataSourse, DBGrid. Буду очень благодарен за код. Спасибо за Ваше внимание.



Romkin   (2002-01-10 12:22) [1]

Еще и код сразу...

Table.Locate("y","x",[]); //позиционирование
while (Table.FieldByName("y").asString = "x") and (not Table.EOF) do
begin
Label1.Caption := label1.caption := Table.FieldByName("y").DisplayText;
Table.Next;
end;

что-то вроде этого



Ghost!   (2002-01-10 16:44) [2]

Большое спасибо, господин Romkin! Вы очень помогли мне.




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.031 c
1-18910           Dtr                   2002-01-24 10:01  2002.02.07  
PopUpMenu


3-18783           Val                   2002-01-14 11:17  2002.02.07  
Коннект к базе


3-18705           kd                    2002-01-09 17:04  2002.02.07  
Midas


4-19020           ikar                  2001-12-08 13:51  2002.02.07  
Системные ловушки и VCL


1-18898           Valentin2             2002-01-10 12:49  2002.02.07  
Здравствуйте ещё раз!