TQuery

← →
Alibaba © (2003-08-15 11:37) [0]

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

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

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

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

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

← →
Reindeer Moss Eater © (2003-08-15 11:42) [1]

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

← →
Alibaba © (2003-08-15 12:48) [2]

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

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

← →
sniknik © (2003-08-15 13:12) [3]

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

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

← →
Alibaba © (2003-08-15 15:58) [4]

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

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

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

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

← →
SergSuper (2003-08-15 17:18) [6]

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

TQuery Найти похожие ветки