• Registered: 2014-07-23
  • Posts: 8

Topic: Вывод списка по клику и сохранение в разные таблицы.

Добрый вечер, вопрос таков:

1) Требуется сделать подобие дерева. Т.е. В 1 гриде отображается только имена, по клику на строчку в соседнем гриде отображается все что связано с этой строчкой. Как реализовать? Связи?

2) Как одной кнопкой сохранить разные едиты в разные таблицы? При установке экшена на "сохранить запись" дает выбрать только одну таблицу.

  • Hram
  • Hram
  • Member
  • Offline
  • Registered: 2014-07-08
  • Posts: 58

Re: Вывод списка по клику и сохранение в разные таблицы.

1. http://myvisualdatabase.com/forum/misc. … download=1

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Вывод списка по клику и сохранение в разные таблицы.

1. Сделал пример из проекта телефонного справочника, прикрепил к сообщению.
2. Такое возможно сделать только с помощью скрипта.

Post's attachments

Attachment icon 03 - Phone Book.zip 51.16 kb, 666 downloads since 2014-08-06 

Dmitry.

4 Reply by Hram (edited by Hram 2014-08-11 14:46:15)

  • Hram
  • Hram
  • Member
  • Offline
  • Registered: 2014-07-08
  • Posts: 58

Re: Вывод списка по клику и сохранение в разные таблицы.

А как быть, если гриды расположены на разных формах? Хочу сделать через SQL-запрос

....
WHERE ZapicNaPriem.id = Form2.{TableGrid1};

вот как правильно указать выбранную строку в гриде на другой форме?

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Вывод списка по клику и сохранение в разные таблицы.

Hram
в действии кнопки "SQL запрос" можно указать компонент только с текущей формы, поэтому в вашем случае нужно воспользоваться возможностями скрипта, выполнив SQL запрос через функцию SQLExecute

Dmitry.

6 Reply by Hram (edited by Hram 2014-08-12 00:53:32)

  • Hram
  • Hram
  • Member
  • Offline
  • Registered: 2014-07-08
  • Posts: 58

Re: Вывод списка по клику и сохранение в разные таблицы.

1. А как передать потом данный запрос

SQLExecute('SELECT Day, Time, id_Specializ, Last_Name, First_Name, Patronymic, id_Doctors, id_Price, id_Cena, Address, Phone, Kvit, id_Referal, id_Reforg, id_RefSpec, id_mkb10, Ishod FROM ZapicNaPriem WHERE ZapicNaPriem.id = EditPacient.{TableGrid1};')

гриду?
2. Пытался получить значение id в Edit.

Edit_Pacient.Edit2.Text:= VarToStr(SQLExecute('Select id FROM ZapicNaPriem WHERE ZapicNaPriem.id = {TableGrid1};'));

, но если форма вызвана через "Показать запись", а не через "Новая запись", то значение в Edit1 не отображается.
Тупик

  • Hram
  • Hram
  • Member
  • Offline
  • Registered: 2014-07-08
  • Posts: 58

Re: Вывод списка по клику и сохранение в разные таблицы.

Еще вопрос - данный синтаксис для запроса с другой формы правильный?

....
WHERE ZapicNaPriem.id = Form2.{TableGrid1};
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Вывод списка по клику и сохранение в разные таблицы.

К сожалению пока нет возможности используя скрипт передать результат запроса в TableGrid, в будущем это будет исправлено.


эта запись неверна при использовании в скриптах

WHERE ZapicNaPriem.id = Form2.{TableGrid1};

правильно будет так

Edit_Pacient.Edit2.Text:= VarToStr(SQLExecute('Select id FROM ZapicNaPriem WHERE ZapicNaPriem.id = ' + IntToStr(Form2.TableGrid1.dbItemID) +';'));
Dmitry.