나는 프로그래밍 방식으로 델파이에서 작업 관리자에 작업을 추가하려면 어떻게 2010

Question

나는 동적으로 actionitems를 추가하려고 나는이 할 때이 항목을 추가 할 수 있으며 작동 : 그러나

HostActionItem := ActionManager.ActionBars[0].Items[0].Items[2]; 
    NewItem := HostAction.Items.Add; 
    NewItem.Action := MyActionToPerform; 
    NewItem.Caption := Description; 
    NewItem.ImageIndex := 1; 
    NewItem.Tag := 13; 

을 작업이 실행되면, 메서드 화재 Sender 개체에서 다음과 같이 ActionComponent를 가져 오려고 시도합니다.

if (Sender is TAction) then 
    tag := (Sender As TAction).ActionComponent.Tag; 

그러나 ActionComponent는 항상 nil입니다. ActionComponent가 초기화되지 않는 이유는 무엇입니까?

Answer 1

짧은 대답 :

당신은 TAction의 ActionComponent으로 표시하는 TActionClientItem를 기대하고 있습니다. TActionClientItem은 TComponent에서 나옵니다.

이상 답 :

나는 당신이 메뉴 표시 줄에 항목을 추가하고 생각합니다. 디자인에 따라 메뉴 항목에 연결된 TAction은 ActionComponent을 지원하지 않습니다. 메뉴 표시 줄의 항목은 TActionClientItem입니다. 이것은 '수집 항목'이지 '구성 요소'가 아닙니다. 따라서 메뉴는 선택한 항목의 조치 링크 Execute 메소드를 호출 할 때 메뉴 항목으로 ActionComponent 매개 변수를 채울 수 없습니다. 이 혼란 들린다면, 나는 VCL 소스에서 아래에 따옴표를 분명히 할 것 같아요

TBasicActionLink.Execute 방법이 실행되기 전에

function Execute(AComponent: TComponent = nil): Boolean; virtual; 

가 전달 된 구성 요소가 FAction.ActionComponent에 할당됩니다. 이 TCustomActionMenuBar.ExecAction에서라고 어떻게

:

제목에 질문에 대한

FSelectedItem.ActionLink.Execute; 

, 나는 당신이 TActionClientItem의 Caption 및 ImageIndex 설정에서 떨어져, 뭔가 잘못을하고 있다고 생각하지 않는다 같이, 불필요 그것은 TAction의 제목과 이미지입니다.