O menu do Word2000 pode ser arrastado e encaixado (DOCK). Como é implementado?
Muitos controles Delphi possuem propriedades Dock, e aqui está a chave
Primeiro coloque um CoolBar no formulário
Coloque uma ToolBar em cima da CoolBar e adicione alguns botões
Defina a propriedade ShowCaption como True;
Crie um MainMenu e adicione alguns itens de menu
Defina a propriedade de menu do formulário como vazia
O botão AutoSize da ToolBar está definido como True
Defina o MenuItem do botão como o item MainMenu correspondente
Vamos ver se é interessante
A propósito, o menu não pode aparecer automaticamente, nem pode ser arrastado para fora do intervalo do CoolBar.
Isso é fácil de dizer
Que tal configurar a propriedade Group do botão? Ela pode aparecer automaticamente? Parece o menu da interface IDE do Delphi5?
Defina o atributo de arrastar e o atributo de encaixe da ToolBar (você não sabe qual é esses dois atributos:-()
Vamos compará-lo com o menu do Word200.