Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Значение из таблицы в переменную? 
V
    Опции темы
Azur
Дата 23.5.2006, 14:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 19.4.2006

Репутация: нет
Всего: нет



Как получившееся значение после запроса , присвоить переменной чтобы потом дельфи могла с ней работать. smile  
PM MAIL   Вверх
skyboy
Дата 23.5.2006, 15:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


неОпытный
****


Профиль
Группа: Модератор
Сообщений: 9820
Регистрация: 18.5.2006
Где: Днепропетровск

Репутация: нет
Всего: 260



Смотря, какой компонент для доступа используешь... Например, так:
Код

MyVariable:=MySQLQuery1.fields.fields[34].AsVariant;

или так:
Код

MySuperVariable:=MySQLQuery1.fields.fieldbyname('MySuperField').AsVariant;
 
PM MAIL   Вверх
Vit
Дата 23.5.2006, 15:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 14
Всего: 207



Чем не устраивает работать с самими результатами запроса? 


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
skyboy
Дата 23.5.2006, 15:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


неОпытный
****


Профиль
Группа: Модератор
Сообщений: 9820
Регистрация: 18.5.2006
Где: Днепропетровск

Репутация: нет
Всего: 260



Vit, наверное тем, что результаты как значения функций не подлежат изменению smile 
PM MAIL   Вверх
Azur
Дата 24.5.2006, 12:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 19.4.2006

Репутация: нет
Всего: нет



Цитата

Чем не устраивает работать с самими результатами запроса?

Мне так и надо !smile
ADOQuery1.SQL.Add('SELECT TABL.'+Field1+' FROM TABL WHERE TABL.Field2= '+quotedstr(a));-Перекрестный запрос
Чтобы после етого запроса, результат можно было присвоить переменной!   
PM MAIL   Вверх
ТоляМБА
Дата 24.5.2006, 12:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Котэ
***


Профиль
Группа: Завсегдатай
Сообщений: 1607
Регистрация: 15.12.2004

Репутация: 3
Всего: 252



если значение одна строка типа integer, то:
Код

var
  i:Integer;
begin
 ......
 ADOQuery1.SQL.Add('SELECT TABL.'+Field1+' FROM TABL WHERE TABL.Field2= '+quotedstr(a));
 ADOQuery1.Open;
 i:=ADOQuery1.Fields.Fields[0].AsInteger;
 ShowMessage(IntToStr(i));
end;

если несколько строк, то создавай динамический массив и тем-же макаром через

Код

 ADOQuery1.SQL.Add('SELECT TABL.'+Field1+' FROM TABL WHERE TABL.Field2= '+quotedstr(a));
 ADOQuery1.Open;
while not ADOQuery1.eof do
begin
 .....
end;
  

Это сообщение отредактировал(а) ТоляМБА - 24.5.2006, 12:43
PM   Вверх
Azur
Дата 25.5.2006, 11:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 19.4.2006

Репутация: нет
Всего: нет



Сенкс.Все получилось! smile  
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »


 




[ Время генерации скрипта: 0.0789 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.