Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

TQuery [D6, MSSQL]

Alibaba © (2003-08-15 11:37:00)

Всем привет!
Такой вопрос:
Написал SQL запрос, который в цикле чего то делает.

While <условие>
begin
<чего то делаю>
print <сообщение>
end

В SQL Advantage запускаю этот запрос - все работает.
В цикле выводятся сообщения, которые показывают,
что завершен 1 этап, 2 этап и т.д.
(в зависимости от количества шагов в цикле)

Так вот, теперь я хочу считать это в Delphi.
Вставляю этот запрос в TQuery.

Вопрос
Можно ли получать от TQuery сообщения о завершении цикла,
что бы отображать их на форме в моей программе.

SergSuper (2003-08-15 17:18:00) [1]

Если TADOQuery или TADODataSet то там есть метод NextResultSet(или как-то так)
Но не всё так просто, надо повнимательней почитать

sniknik (2003-08-15 16:04:00) [2]

чего не в Query Analyzer-е от самого MSSQL-я?

Alibaba (2003-08-15 15:58:00) [3]

>[3]
это если как я понял цикл в самом запросе описан и запрос под MSSQL. только при чем тут тогда Advantage?

Ты все правильно понял.

А Advantage тут при том, что в нем я тестирую запросы.

sniknik (2003-08-15 13:12:00) [4]

ты можеш получать сообщения от print
в ADOConnection (коллекция Errors, и событие onInfoMessage) правда с настройками придется помучится, работает только при серверном курсоре и т.д. (асинхронное выполнение).
естественно TQuery придется на TADOQuery или TADODataSet поменять.

это если как я понял цикл в самом запросе описан и запрос под MSSQL. только при чем тут тогда Advantage?

Alibaba (2003-08-15 12:48:00) [5]

Это не то.
Согласно Help:

TQuery.Eof
Indicates whether a dataset is positioned at the last record.

Reindeer Moss Eater (2003-08-15 11:42:00) [6]

if TQuery.Eof then Циклу_пришел_кирдык

Наверх

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