자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

본 게시판 사용시 당부 사항
* 이 게시판은 자유롭게 질문을 올리고 자발적으로 답변을 공유하는 게시판입니다.
* 어느 누구도 답변을 달아야만 하는 책임은 없습니다.
* 따라서 질문을 올리실 때에는 최대한 자세하고 정중하게 질문을 올려 주세요.
* 최대한 질문을 자세히 올려야 답변도 자세히 올라 옵니다.
* 본 질문에 답변을 주시는 여러 개발자님들께 미리 감사드립니다.
-----------------------------------------------------------------------------------------------

TCategoryButtons 의 동적생성 후 action의 문제

 

DB에서 TCategoryButtons.Categories 와

 

하위 Items를 끌고 와서 동적으로 생성을 하였는데

 

문제는 ActionList 에서 동적 생성이 문제가 된다는 점....

 

다른 방법으로 Click시 action을 하게 하는 방법이 있는지 궁금합니다.

 

동적생성을 하면 OnClick Event를 생성 시키지 못하는 단점이 있더군요.

 

아래는 TCategoryButtons 의 동적생성 코드 입니다.

 

catMenuItems = TCategoryButtons 입니다.

 

 

    // Menu Group

    DM.SysMenuGroupInfo.Open('T_SysMenuGroup');
    while not DM.SysMenuGroupInfo.eof do
    begin
      catMenuItems.Categories.Add();
      catMenuItems.Categories[DM.SysMenuGroupInfo.FieldByName('MenuTag').AsInteger - 1].Caption
        := DM.SysMenuGroupInfo.FieldByName('MenuGroupName').AsString;
      catMenuItems.Categories[DM.SysMenuGroupInfo.FieldByName('MenuTag').AsInteger - 1].Collapsed := true;
      DM.SysMenuGroupInfo.next;
    end;

 

    //Menu Item
      while not DM.Qry_Menupri.eof do
      begin
        catMenuItems.Categories[DM.Qry_Menupri.FieldByName('MenuGroupTag').AsInteger - 1].Items.Add();
        catMenuItems.Categories[FieldByName('MenuGroupTag').AsInteger - 1].Items[FieldByName('num').AsInteger - 1].caption
          := FieldByName('MenuName').AsString;
        catMenuItems.Categories[FieldByName('MenuGroupTag').AsInteger - 1].Items[FieldByName('num').AsInteger - 1].hint
          := FieldByName('MenuID').AsString;
        DM.Qry_Menupri.Next;
      end;

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 15884
공지 유용한 관련 사이트 관리자2 2014.03.20 54678
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 98135
2419 Oracle DB 연결시 무었이 문제인지 도움 부탁 드립니다. [3] file 늦바람 2015.06.09 1399
2418 [마이그레이션] 델파이 XE8에서 체크박스, 라디오버튼의 글자의 색상을 변경하고 싶어요. 험프리 2015.06.10 1242
2417 앱 ini(설정정보) 저장방법 문의 [1] 사랑남 2015.06.10 443
2416 IBConsole 에서 DB 생성시 문제? [4] 다콜 2015.06.11 585
2415 interbase 서비스 실행시 오류 [1] 파란바다 2015.06.11 679
2414 푸쉬메시지를 받을때 앱이 실행중인 경우와 스크린을 끈경우를 구분할 수 있을까요? [7] Humphery 2015.06.11 2858
2413 AES 암호화 관련 [1] 다콜 2015.06.12 770
2412 FD관련 에러, 이런 곤란을 겪어야만 사용가능하는지.. [1] file datare 2015.06.17 162
2411 하이브리드 앱 개발 관련 문의 [3] 사랑남 2015.06.17 557
2410 안드로이드 5에서 델파이로 만든 앱이 실행되지 않습니다. [1] 첨처럼 2015.06.17 695
2409 [XE8] 64bit 디버깅시 unable to start gdbserver on port '64311' port is already in use 메세지 ? [1] file 다콜 2015.06.18 611
2408 delphi2010에서 ODAC설치시 오류 발생합니다. [1] secret 시간사냥꾼 2015.06.18 7
2407 FireDAC에 FireBird DB 연결시 오류 [1] 빨리빨리 2015.06.18 950
2406 XE8 버그 [6] 다콜 2015.06.18 377
2405 Service 와 BroadcastReceiver(nativemethod) 사용시 lollipop 에서 작동 안됨. [1] file 김하나 2015.06.19 269
2404 delphi xe8 설치후 데이터연결에 관해 문의드립니다. [1] file 써니 2015.06.19 311
2403 TEdit 에 커서가 들어갈때 가상키보드 나타나지 않게 [2] 희망나라 2015.06.22 451
2402 애플앱 등록 방법문의 드립니다. [2] silkroad99 2015.06.24 596
2401 임베디드 안드로이드기기 디버깅 [9] hsson 2015.06.25 519
2400 XE8 update1 설치이후 Option 들어갈 때 오류발생 [5] 조용한아찌 2015.06.25 641