Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Использование общей панели [D2005, XP]


Евгений Р. ©   (2007-12-06 21:46:00) 

Панель с управляющими кнопками (toolBar+SpeedButton) необходимо использовать в нескольких различных формах. Как это проще реализовать?


Евгений Р.   (2007-12-07 09:49:00) [1]

Честно говоря с tFrame никогда не работал.
Наверное пришло время пробовать. Будут вопросы - не обессудьте.


Юрий Зотов   (2007-12-07 04:47:00) [2]

Боже... так Вы тулбар на табшит перекладываете... зачем же тогда аж целую форму для хранения тулбара держать? Тут действительно фрейма будет вполне достаточно, и перекладывать ничего не придется.


Евгений Р.   (2007-12-07 02:07:00) [3]

Кажется получилось то, что хотел. Если есть недостатки - поясните:

unit CommonPanels;
**************
type
 TfCommonPanels = class(TForm)
   ToolBar1: TToolBar;
   btBrnPoselit: TSpeedButton;
   btBrnVyselit: TSpeedButton;
   btPereselit: TSpeedButton;
   btZvkOtmenaBrn: TSpeedButton;
   SpeedButton1: TSpeedButton;
 private
   { Private declarations }
 public
   { Public declarations }
 end;
*************
unit viZayavkaMS;
****
type
 TfviZayavkaMS = class(TForm)
***
   tsPos: TTabSheet;
 end;
******

procedure TfviZayavkaMS.FormCreate(Sender: TObject);
begin
  fcp1:=TfCommonPanels.Create(self);
  fcp1.ToolBar1.Parent:=tsPos;

  fcp2:=TfCommonPanels.Create(self);
  fcp2.ToolBar1.Parent:=tsPos;
  fcp2.ToolBar1.Top:=100;
  fcp2.ToolBar1.Left:=100;
end;

На одном листе открыл две панельки (для проверки).
Но при этом приходится открывать 2 экземпляра формы. Не слишком ли это расточительно по ресурсам?


Евгений Р.   (2007-12-07 02:01:00) [4]


> А что делает SpeedButton на ToolBar? Есть же ведь ToolButton?

На SpeedButton картинки красивее цепляются (например 40х40бит) .
Если знаете как на ToolButton, то поясните


Amoeba   (2007-12-07 00:40:00) [5]


> Панель с управляющими кнопками (toolBar+SpeedButton)

А что делает SpeedButton на ToolBar? Есть же ведь ToolButton?


Юрий Зотов   (2007-12-06 22:04:00) [6]

> Правильный_ВАся   (06.12.07 22:01) [2]

Не всегда хорошо. Например, если тулбар должен быть плавающим.


Правильный_ВАся   (2007-12-06 22:01:00) [7]

или использовать TFrame


Юрий Зотов   (2007-12-06 21:51:00) [8]

Самое простое - сделать форму-предка и эту панель разместить на нем. А остальные формы наследовать от этой.


Наверх

Титульная страница Поиск, карта сайта Написать письмо