Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как получить результат запроса через TSQLQuery? / 6 сообщений из 6, страница 1 из 1
17.12.2003, 13:13
    #32355185
StreLock
StreLock
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить результат запроса через TSQLQuery?
Запрос такой, выполянется нормлаьно, но вот как получить результат?!

SQLQuery1.Close;
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add('SELECT COUNT(*) FROM BUGS.KINDVENDOR');
SQLQuery1.Open;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2003, 13:16
    #32355194
pkarklin
pkarklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить результат запроса через TSQLQuery?
Код: plaintext
ShowMessage(SQLQuery1.Fields[ 0 ].AsString);
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2003, 13:21
    #32355204
StreLock
StreLock
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить результат запроса через TSQLQuery?
Спасибо огромное )))
Уже пол дня бьюсь над этим (((
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.12.2003, 12:45
    #32356556
StreLock
StreLock
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить результат запроса через TSQLQuery?
pkarklin
А как выдрать из него результат запроса который передаёт несколько строк?
SQLQuery2.SQL.Add('SELECT namevendor FROM BUGS.KINDVENDOR');
У меня после этого запроса получается обратиться только к полю с номером 0.
Хотя елси выполнить этот запрос в консоли, то выводится весь столбец.
Делаю я так:
ComboBOX4.Items.Clear;
i:=0;
While not SQLQuery2.Eof do
Begin
Edit23.Text:=SQLQuery2.Fields[0].AsString;
ComboBOX4.Items.ADD(SQLQuery2.Fields .AsString);
SQLQuery2.Next;
i:=i2+1;
End;

ComboBOX4.ItemIndex:=0;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.12.2003, 13:09
    #32356608
nomorenames
nomorenames
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить результат запроса через TSQLQuery?
Код: plaintext
1.
2.
3.
4.
5.
6.
  ADOStoredProc.Open;
  ADOStoredProc.First;
  For I :=  0  to ADOStoredProc.RecordCount - 1  do begin
    CommentText.Add(ADOStoredProc.FieldValues['memo']);
    ADOStoredProc.Next;
  end;

Тут для ADOStoredProc. Для ADOQuery точно так же.
В данном случае запрос прописан в сохраненной процедуре на сервере.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.12.2003, 13:31
    #32356661
StreLock
StreLock
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить результат запроса через TSQLQuery?
nomorenames
Спасибо помогло.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как получить результат запроса через TSQLQuery? / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]