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

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

Как узнать что это последняя запись? [D6, IB6.x, FireBird]


Тип ©   (2003-04-18 14:14:00) 

Мастаки, помогите!
Как при переборе записей:
...
while not Eof do
begin
...
//проверить - не последняя ли это запись?
Next;
end;
...


Anatoly Podgoretsky   (2003-04-18 16:25:00) [1]

Понял неправ


Johnmen   (2003-04-18 16:15:00) [2]

>Anatoly Podgoretsky © (18.04.03 16:06)
>но все равно неправильно, надо убрать первый Q.Prev;,

Почему же ?


Anatoly Podgoretsky   (2003-04-18 16:06:00) [3]

Я не посмотрел, что у него цикл до BOF, но все равно неправильно, надо убрать первый Q.Prev;, но все равно и это лишнее достаточно встать на последнюю запись, запомнить нужное, потом на первую и дальше все по существующему алгоритму, только с проверкоей на последнею запись, по крайней мере он так объяснил.


Johnmen   (2003-04-18 15:57:00) [4]

>Жук © (18.04.03 15:29)

Вообще-то, Val © (18.04.03 15:14) все правильно.
У тебя - не совсем...:)


Жук   (2003-04-18 15:29:00) [5]

>Val © (18.04.03 15:14)
Q.Last;
repeat
Q.Prev;
//делаем себе ссылки или что угодно
until Q.Bof


Anatoly Podgoretsky   (2003-04-18 15:15:00) [6]

Зачем ему две последнии записи?


Val   (2003-04-18 15:14:00) [7]

может быть так?
Q.Last;
Q.Prev;
while not Q.Bof do
begin
//делаем себе ссылки или что угодно
Q.Prev;
end;


Verg   (2003-04-18 14:56:00) [8]

last;
id := fieldbyname("id").Value;
first;
while not Eof do
begin
...
if FieldByName("id").Value = id then //последняя запись
Next;
end;


Anatoly Podgoretsky   (2003-04-18 14:35:00) [9]

Если тебя не волнует, как знать, что находясь на данной записи, что это последнея, то сходи они раз не нее и запомни ее характеристики.


Тип   (2003-04-18 14:31:00) [10]


> Никак пока не уйдешь с нее

понятно... значит алгоритм надо менять....Сенкс.


Anatoly Podgoretsky   (2003-04-18 14:26:00) [11]

Никак пока не уйдешь с нее


Тип   (2003-04-18 14:25:00) [12]

я в цикле формирую структуру в виде html ссылок, надо чтобы последнюю не делало ссылкой.


Mike Kouzmine   (2003-04-18 14:22:00) [13]

while not Eof do
begin
...
//проверить - не последняя ли это запись?
Next;
end;
Последняя запись


Наверх

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