![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Может кто подскажет?
Jo © (2002-07-15 11:11:00)Подскажите, как можно реализовать панельку типа Tools как в Photoshop7. Я так понял - это отдельная форма в режиме bsNone. Но при этом ее можно перемещать. И не понятно как сделано, что когда на нее кликаешь, главное окно не теряет фокус.
Юрий Зотов (2002-07-15 22:23:00) [1]Это так называемый плаваюший тулбар. В Delphi делается просто мгновенно.
1. Кидаете на форму ControlBar.
2. Ставите ему Align=alTop.
3. На ControlBar кладете ToolBar.
4. На Toolbar"е создаете пару кнопок.
5. Ставите Toolbar"у DragKind=dkDock.
И все. Запустите программу и таскайте тулбар мышкой. Как только Вы вытащите его с ControlBar"а, он сам собой превратится в ту самую плавающую форму, о которой Вы говорили. Затащите обратно - он снова придочится к ControlBar"у.
Если на форму бросить еще 3 ControlBar"а (с alLeft, alRight и alBottom), то тулбар сможет дочиться к любой стороне формы.
Proton (2002-07-15 20:39:00) [2]Photoshop - это MDI приложение.
BorderStyle:=bsDialog
olookin (2002-07-15 14:22:00) [3]Если я не ошибаюсь, это свойство формы BorderStyle:=bsToolWindow. У меня, по крайней мере, это форма с заголовком и перемещаемая но не получает фокуса.
Andrey007 (2002-07-15 11:27:00) [4]Когда на неё кликаешь, то после клика надо вызвать SetFocus для главного окна. А вопрос "как реализовать" не понял.