Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
ВнизКак инициализировать объект? Найти похожие ветки
← →
SiDimka © (2012-04-08 04:37) [0]Есть процедура динамического создания ToolButton:
procedure TFMain.CreateTbOpenWin(Cap: string; Iko: Integer);
var
Tbt:TToolButton;
begin
Tbt:=TToolButton.Create(Self);
Tbt.Caption := Cap;
Tbt.ImageIndex := Iko;
Tbt.Style := tbsCheck;
Tbt.Grouped := True;
Tbt.Parent:=TbOpenWinows;
end;
Процедура вызова:
begin
if Assigned(FUsers) = False then
begin
Application.CreateForm(TFUsers, FUsers);
CreateTbOpenWin(FUsers.Caption, 2);
+++
Как здесь правильно присвоить - ToolButton.Down := True
+++
end
else
begin
FUsers.Focused;
+++
Как здесь правильно присвоить - ToolButton.Down := True
end;
← →
MBo © (2012-04-08 07:19) [1]У TToolBar есть свойство ToolButtons, Buttons, или что-то похожее?
← →
SiDimka © (2012-04-08 16:50) [2]>TToolBar есть свойство Buttons
Buttons[i]
Но вопрос то в чем, какой [i] у именно этой ToolButtons, если она создана динамически, а их несколько, и создаваться могут в различном порядке.
Или может кто-то подскажет каким образм ее можно инициализировать.
← →
MBo © (2012-04-08 19:00) [3]Пусть CreateTbOpenWin будет функцией и возвращает либо сам объект, либо индекс кнопки
← →
Cobalt © (2012-04-08 23:45) [4]передавать Down в CreateTbOpenWin, или вместо процедуры это будет функция, возвращающая кнопку.
← →
Плохиш © (2012-04-09 02:21) [5]У всех контролов есть свойство Tag, преднозначенное для нужд программиста, вот и присваивай ему нужное уникальное значение, а при необходимости ищи кнопку с требуемым tag-ом.
← →
Германн © (2012-04-09 02:53) [6]
> SiDimka © (08.04.12 04:37)
>
> Есть процедура динамического создания ToolButton
Вот ты мне объясни. На хрена нужно "динамически" создавать кнопку на ToolBar"е? Вопрос опять о "задаче".
← →
SiDimka © (2012-04-10 04:07) [7]>Германн
Если использоваться будет в определенный момент 5 -7 кнопок но не известно каких.
А, что, наплодить 105 прцедур, накидать 35 кнопок, и прятать их разве это будет правильно?
← →
SiDimka © (2012-04-10 04:18) [8]>Cobalt
>передавать Down в CreateTbOpenWin
Сразу так и сделал. Они плучаются все Down , прйдется создавать процедуру для отжатия кнопок. А если Down присвоить после создания, то по Grouped они сами переходят в нужное состояние.
← →
Германн © (2012-04-10 14:10) [9]
> SiDimka © (10.04.12 04:07) [7]
>
> >Германн
>
> Если использоваться будет в определенный момент 5 -7 кнопок
> но не известно каких.
> А, что, наплодить 105 прцедур, накидать 35 кнопок, и прятать
> их разве это будет правильно?
>
105 процедур так или иначе всё равно будут в коде программы. Процедуры ведь не создашь динамически. А прятать кнопки на тулбаре очень даже нормальный механизм.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.13 c