Ibdataset и Lookupcombobox

@Divers · Регистрация: 17.04.2010

Студворк — интернет-сервис помощи студентам

Требуется по выбору значения в Lookupcombobox, что бы выполнялся запрос
Select *from Prisoners where Chamber_Id= "ТО ЧТО ВЫБРАЛИ В Lookupcombobox".
Не знаю как взять выбранное значение из Lookupcombobox.

Как я себе представляю, в событии Onclick Lookupcombobox'а должно быть написано что то типа
Ibdataset.ParambyName('chamber_id').asin teger:= выбранное значение Lookupcombobox,
а в поле Dataset'а SelectSql(или RefreshSQL?) должен быть написан запрос
Select *from Prisoners where Chamber_Id= :chamber_id.

Как на самом деле?)

@harmless · 12.05.2010, 20:17

DBLookuoComboBox после выбора значения позиционирует указатель на соответствующую запись источника данных. Т.е. можно напрямую использовать значение поля набора DBComboBox.ListSource.DataSet.

@Divers · 12.05.2010, 20:22 **[ТС]**

Можно пожалуйста прям строчкой кода?
dataset.Parambyname('chamber_id').asinte ger:= lcbox.Listsource.Dataset.FieldValues['chamber_id'];
это имелось в виду?

@harmless · 12.05.2010, 20:26

К компу с Delphi далеко идти, а по памяти не скажу точно.
У тебя вприципе всё правильно, только я бы в OnChange скорее всего реализовывал бы и соответственно параметру передавать значение конкретного поля набора данных, источника для DBComboBox.

@Divers · 12.05.2010, 21:45 **[ТС]**

ну если это, то вот эта хрень dataset.Parambyname('chamber_id') передает параметр chamber_id куда? Куда запрос писать? Refresh sql или select или еще куда?

Добавлено через 1 час 17 минут
Забил на это lookupcombobox. Решил делать с обычным. Добавил его, вбил номера камер.
Пишу

Delphi
1
2
3
4
5
6
7
8
9
procedure TMainForm.ComboBox1Change(Sender: TObject);
begin
  with tspris do begin
    Open;
    active;
    ParamByName('chamber_id').asinteger:=Strtoint(combobox1.Text);
    RefreshSQL;
    end;
end;

У Datasetа в SELECTSQL:

SQL
1
SELECT *FROM PRISONERS WHERE CHAMBER_ID= :CHAMBER_ID

в RefreshSQL:

SQL
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
SELECT 
  PRISONER_ID,
  NAME,
  CHAMBER_ID,
  SURNAME,
  SEX,
  AGE,
  GROWTH,
  WEIGHT,
  AGGRESION,
  PROPENSITY_TO_WORK,
  FOTO
FROM PRISONERS 
WHERE
CHAMBER_ID = :CHAMBER_ID

Реакции чет вообще никакой ). Что не так делаю?

Новые блоги и статьи Все статьи Все блоги /
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .

@Divers 0 / 0 / 0 Регистрация: 17.04.2010 Сообщений: 13

	Ibdataset и Lookupcombobox 12.05.2010, 20:10. Показов 3360. Ответов 4 Метки нет (Все метки) Требуется по выбору значения в Lookupcombobox, что бы выполнялся запрос Select from Prisoners where Chamber_Id= "ТО ЧТО ВЫБРАЛИ В Lookupcombobox". Не знаю как взять выбранное значение из Lookupcombobox. Как я себе представляю, в событии Onclick Lookupcombobox'а должно быть написано что то типа Ibdataset.ParambyName('chamber_id').asin teger:= выбранное значение Lookupcombobox, а в поле Dataset'а SelectSql(или RefreshSQL?) должен быть написан запрос Select from Prisoners where Chamber_Id= :chamber_id. Как на самом деле?) 0

@harmless 151 / 151 / 3 Регистрация: 05.05.2010 Сообщений: 570
	12.05.2010, 20:17
	DBLookuoComboBox после выбора значения позиционирует указатель на соответствующую запись источника данных. Т.е. можно напрямую использовать значение поля набора DBComboBox.ListSource.DataSet. 0

@Divers 0 / 0 / 0 Регистрация: 17.04.2010 Сообщений: 13
	12.05.2010, 20:22 [ТС]
	Можно пожалуйста прям строчкой кода? dataset.Parambyname('chamber_id').asinte ger:= lcbox.Listsource.Dataset.FieldValues['chamber_id']; это имелось в виду? 0

@harmless 151 / 151 / 3 Регистрация: 05.05.2010 Сообщений: 570
	12.05.2010, 20:26
	К компу с Delphi далеко идти, а по памяти не скажу точно. У тебя вприципе всё правильно, только я бы в OnChange скорее всего реализовывал бы и соответственно параметру передавать значение конкретного поля набора данных, источника для DBComboBox. 0