Связь ДБНавигатора с ДБГридом

@informatic92 · Регистрация: 23.09.2010

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

Помогите! Нужно сделать так, чтобы навигатор был привязан к той таблице, которая выводится в сетке ДБГрид, Если одна таблица, то к ней, если вывести другую, то к ней. Пытался записать примерно так, но Делфи ругается! Как правильно записать это?? И можно ли вообще сделать это подобным образом, или я совсем дибил??

Delphi

procedure TForm1.PageControl1Change(Sender: TObject);
begin
if Form1.DBGrid1.DataSource:=DataModule3.DataSource1 then begin
  Form1.DBNavigator1.DataSource:=DataModule3.DataSource1;
if Form1.DBGrid1.DataSource:=DataModule3.DataSource5 then begin
  Form1.DBNavigator1.DataSource:=DataModule3.DataSource5;
end;

@rdama · 25.12.2011, 05:56

Delphi

1	DBNavigator.DataSource := DBGrid.DataSource

@informatic92 · 25.12.2011, 14:25 **[ТС]**

Афигеть хДД Я в шоке! Спасибо

@informatic92 0 / 0 / 0 Регистрация: 23.09.2010 Сообщений: 23
	25.12.2011, 14:25 [ТС]	3
	Афигеть хДД Я в шоке! Спасибо 0