Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Поиск ячейки и аналогичныйх ей [D4, Paradox, ]


Ghost! ©   (2002-01-10 11:40:00) 

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


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

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


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

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

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;

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо