• Registered: 2016-03-10
  • Posts: 291

Topic: Дубликат TableGrid

Подскажите пож, как можно сделать дубликат TableGrid. На одно форме в TableGrid вносятся данные, нужно  чтобы на др форме эта таблица отображалась для просмотра. Заранее спс.

Игоревич's Website

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

Re: Дубликат TableGrid

Вам необходимо просто настроить TableGrid (свойство Settings) чтобы он отображал теже самые столбцы. Также в данных настройках не забудьте установить галочку в самом низу "Включить автовыполнение запроса"

Dmitry.
  • Registered: 2016-03-10
  • Posts: 291

Re: Дубликат TableGrid

Он показывает , но не так как надо. У меня к строчке главной таблицы привязана еще таблица. Одно запись в таблице может иметь еще много записей еще таблица с действиями . Как у вас в примере телеф справочника.. И мне нужен дубликат подчиненнй таблицы, который вызывается кнопкой.

Игоревич's Website

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

Re: Дубликат TableGrid

Сделать некий "дубликат" не получиться, к сожалению ваше описание слишком расплывчато, чтобы я смог дать конкретный совет. Сделайте проект с вашим примером, и опишите что в нем необходимо реализовать, постараюсь помочь.

Dmitry.
  • Registered: 2016-03-10
  • Posts: 291

Re: Дубликат TableGrid

Привел пример на вашем проекте
Ссылка https://www.dropbox.com/s/dsbs5zvncsdio … k.zip?dl=0
Кнопка выделена жирным текстом

Игоревич's Website

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

Re: Дубликат TableGrid

Игоревич wrote:

Привел пример на вашем проекте
Ссылка https://www.dropbox.com/s/dsbs5zvncsdio … k.zip?dl=0
Кнопка выделена жирным текстом

Создайте событие OnClick для кнопки "Дубликат табл phone"

procedure Form1_Button4_OnClick (Sender: string; var Cancel: boolean);
begin
    if Form1.GridSearch.dbItemID <> -1 then
    begin
        frmTabl.TableGrid1.dbFilter := 'id_person='+Form1.GridSearch.sqlValue;
        frmTabl.TableGrid1.dbUpdate;
    end else
    begin
        frmTabl.TableGrid1.dbFilter := '';
        frmTabl.TableGrid1.dbUpdate;
    end;
end;
Dmitry.