Скачать: CL | DM;

Использование общей панели   Найти похожие ветки 

← →
Евгений Р.   (2007-12-06 21:46) [0]

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

---

← →
Юрий Зотов ©   (2007-12-06 21:51) [1]

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

---

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

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

---

← →
Юрий Зотов ©   (2007-12-06 22:04) [3]

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

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

---

← →
Amoeba ©   (2007-12-07 00:40) [4]

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

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

---

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

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

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

---

← →
Евгений Р.   (2007-12-07 02:07) [6]

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

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 04:47) [7]

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

---

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c