Выбор данных из бд Oracle
Добрый день.
Подскажите, можно ли организовать такую вот схему(прикрепленный файл). Нужно чтобы при нажатии на "Кнопку 1" открылась форма "Выбора товара 1"(это не справочник), после чего выбранный товар попал в EditControl.
Клиент написан на delphi, бд oracle.
К справочникам выбор получаю таким образом:
procedure SpeedButton1OnClick(Sender: TfrxComponent);
begin
CREATE_FORM_SELECT('TfmProduct', 'PRODUCT_NAME, VENDOR_NAME, PRODUCT_ID', TDataSet(vtProduct.Table));
if not vtProduct.IsEmpty then
eProductName.Text := vtProduct.FieldByName('PRODUCT_NAME').Value
else
eProductName.Text := '';
end;
TfmProduct - справочник товаров
PRODUCT_NAME .. - поля в таблице
vtProduct - виртуальная таблица
Форма "Выбор товара 1" на клиенте выполняется через вьюху, возможно ее либо селект прикрутить к кнопке procedure SpeedButton1OnClick(Sender: TfrxComponent)
Подскажите, можно ли организовать такую вот схему(прикрепленный файл). Нужно чтобы при нажатии на "Кнопку 1" открылась форма "Выбора товара 1"(это не справочник), после чего выбранный товар попал в EditControl.
Клиент написан на delphi, бд oracle.
К справочникам выбор получаю таким образом:
procedure SpeedButton1OnClick(Sender: TfrxComponent);
begin
CREATE_FORM_SELECT('TfmProduct', 'PRODUCT_NAME, VENDOR_NAME, PRODUCT_ID', TDataSet(vtProduct.Table));
if not vtProduct.IsEmpty then
eProductName.Text := vtProduct.FieldByName('PRODUCT_NAME').Value
else
eProductName.Text := '';
end;
TfmProduct - справочник товаров
PRODUCT_NAME .. - поля в таблице
vtProduct - виртуальная таблица
Форма "Выбор товара 1" на клиенте выполняется через вьюху, возможно ее либо селект прикрутить к кнопке procedure SpeedButton1OnClick(Sender: TfrxComponent)
Комментарии
https://yadi.sk/i/RM67VORtxEfvs