Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Разное > Флейм
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #16  
Старый 11.09.2014, 16:00
АНЯ17 АНЯ17 вне форума
Прохожий
 
Регистрация: 16.08.2014
Сообщения: 22
Версия Delphi: delphi 7
Репутация: 10
Смущение не хочет работать

не хочет работать

Код:
while not adq.Eof do //Ложь- когда цикл будет на последней строчке таблицы,если запрос ничего не вернет в цикл не зайдет
begin//С таким циклом не надо никаких First и last
adq.fields[0].asstring //- тут ваш район
adq.fields[1].asstring //- тут пол для конкретного района
adq.fields[2].asstring //- тут количество по конкретному полу и району
adq.next;//Я надеюсь что в ваших районах всегда хотя бы по 1 мужчине и женщине есть..поэтому
//строки в таблице всегда будут парными =)
end;
 

вот мая проектчик
Вложения
Тип файла: rar DB_test.rar (582.8 Кбайт, 8 просмотров)
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 13:08.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter