как связать два PageControl между собой

[xxbesoxx]

Сообщение от northener

Ты за меня не бойся. Я "переживать" давно уже перестал.

НУ, НУ рассказывайте Я "не перестал" ещё переживаю много чего , Но за тебя нет .!

[Dvoishnik]

проблема решена первым же постом

//первый рабочий
procedure TForm1.PageControl1Change(Sender: TObject);
begin
PageControl2.ActivePageIndex:= PageControl1.ActivePageIndex;
end;
//второй рабочий
procedure TForm1.PageControl1Change(Sender: TObject);
begin
  PageControl2.Pages[PageControl1.TabIndex].Show;
end;

всем спасибо, просьба расходиться
Аватар, Нет скины не использую, Delphi6

[Аватар]

Delphi6

О-о. А тут еще про рудимент говорят

PS Этот рудимент нормально что в Д7, что в XE ведет себя