Форум: "Базы";
Поиск по всему сайту: 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.72 MB
Время: 0.022 c