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

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

Как проитись по всем полям TDataSet


Страницы:   1 2

Kolan ©   (2006-11-16 15:55:00) 

Здравствуйте,
 Надюсь правильно вопрос задал. Мне нужно узнать максимальную длинну строки в колонке, но я незнаю как организовать цикл...


Плохиш   (2006-11-16 15:59:00) [21]


> Игорь Шевченко ©   (16.11.06 15:57) [3]

Ой, а я знаю какой у него будет следующий вопрос :-))


Игорь Шевченко   (2006-11-16 15:57:00) [22]

maxlength := 0;
with dataset do begin
 Open
 while not Eof do
   currentlength := FieldByName('FOO').AsString;
   if currentlength > maxlength then
      maxlength := currentlength;
   Next;  
 end;
end;

Оно ?


Kolan   (2006-11-16 15:57:00) [23]

> [1] Плохиш ©   (16.11.06 15:56)
> Ты уж определись по полям или по записям?
>
> while not query.eof do
> ...

А как считывать саму строчку?


Плохиш   (2006-11-16 15:56:00) [24]

Ты уж определись по полям или по записям?

while not query.eof do
...


Страницы:   1 2

Наверх

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