어린왕자 wrote:

> 안녕하세요..어린왕자입니당..

> 늦은 밤이네요..좋은 밤입니다..

> 질문은 다름이 아니라...이궁..1시간정두 해매다 이렇게 질문하는데요..

>

> 동적으로 메뉴아이템을 만들어서..

> 툴버튼에 넣어줬거든요?

> 근데..툴버튼에서 나오는 메뉴마다..이상한 단축키가 나오는 거예요..

> 이거 안나오게 하는 방법 있나요?

>



안녕하세요. ^^

프로퍼티중에.. AutoHotKeys를 maManual로 설정해주셔야 합니당.

그럼..20000.

어느 메뉴 아이템에 넣어야 할지 모르겠어요..

소스좀 봐주세요..

글자를 넣은 툴바는 잘되는데..

글자없는 툴바가 속을 썩여서..



procedure TReportForm.CreateMenuList;

var

bool:boolean;

sItem:String;

MenuItem1,subItem:TMenuItem;

TmpTool:TToolButton;

begin





MenuItem1:=TMenuItem.Create(self);

MenuItem1.autoHotkeys:=maManual;



SubItem:=TMenuItem.Create(Self);

SubItem.Action:=ReportCreate1;

MenuItem1.Add(subItem);

sItem:=algol(true,EditForm); // 첫번째 아이템

while sItem<>'' do

begin

subItem:=TMenuItem.Create(self);

subItem.autoHotkeys:=maManual;

SubItem.Caption:=sItem;

subItem.OnClick := PM_CodePopupItemClick; // OnClick 이벤트를 지정



MenuItem1.Add(subItem);

sItem:=algol(false,EditForm);

end;



TmpTool:=TToolButton(ToolBarMenu.Components[1]); //툴바에 메인메뉴를 만들었는데

//그중 2번째 항목



TmpTool.MenuItem.add(MenuItem1);

TmpTool.MenuItem[3].Caption:=PageControl1.ActivePage.Caption+' 리포트 (&C)';





ToolButton12.MenuItem:=MenuItem1; // 아이콘으로 나타내지는 툴버튼

ToolButton12.MenuItem.autoHotkeys:=maManual;

ToolButton12.ImageIndex:=22;





end;



음..서브아이템의 집합으로 이루어진 메뉴아이템을..

동적으로 툴바의 메인메뉴에 넣구...

그림으로된 툴버튼에 메뉴루 넣구 했거든요..



근데..메인메뉴의 버튼을 누르면 잘나와요..

근데 툴버튼을 누르면..이상한 단축키캡션이 나와요..



두개가 다르게 나온다는 거죠..

어디에다 almaManual를 써야 할지...

도와주세요