Модуль "Настройки" (часть 8) - InspectorBar1Sections0Items3Click

Рубрика: Исходники
Среда, 21 апреля 2010 г.
Просмотров: 169
последняя версия: 3.0.9 build 961 beta
от 07 декабря 2007 г.
procedure TfrmOptions.InspectorBar1Sections0Items3Click(Sender: TObject);
begin
  HidePanels;
  //frmOptions_General.Visible:= true;
  //frmOptions_P2K.Visible:= true;
  //frmOptions_AT.Visible:= true;
  frmOptions_OBEX.Parent:= AdvPanel4;
  frmOptions_OBEX.Visible:= true;
  //frmOptions_Flash.Visible:= true;
  GradientLabel1.Caption:= InspectorBar1.Sections[0].Items[3].Text;
end;

Rambler's Top100