Использование общей панели

← →
Евгений Р. (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 09:49) [8]

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

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