Q&A

  • [re] 답변]자체에서 해결하였습니다.
= 델파이 프로그램 내에서 *.hlp샐행 =

질문은 많은데 저한테는 맞는답이 없어서 저같이 고생하시는 분들을 위하여 소스를 공개 합니다.

한 프로그램 내에 도움말이 여러개가 있을때 메뉴에서 Shortcut 등록하여 사용하거나 메뉴에서
직접 호출할때 사용하는 소스코드 입니다.

Help소스는 MS 워드 *.Rtf를 사용 하였고 델파이 7폴더 Help\Tool의 Hcw.Cnt로 목록을 만들고
Hcrtf.Exe로컴파일 하였습니다.

Help file은 설치 디렉토리\Swfms\ENG_Help.hlp 에 위치해 있습니다.

Help문을 호출하는 프로그램 소스는 다음과 같습니다.

Application.HelpFile := 'ENG_HELP.hlp'; //Help 파일(잘못된 파일명 수정하였습니다.)
APPLICATION.HelpJump('ID_ENG_MAIN'); //*.Rtf 호출 ID


>안녕하십니까? 전봉수입니다.
>지금까지는 PROJECT DPR 에 HELP하나만 사용하여 잘 되었는데요 아래와같이 2개를 설치하니까
>첫번째 ENG_Help.hlp를 프로그램에서 열면 WOK_Help.hlp 파일이 뜨면서 찾지못하고 WOK_Help.hlp만
>열면 이상없이 잘 됩니다. CASE 던 IF 로 순차로 로드하여야 되는데요 어떻게해야 좋을지 몰라서 질문을 드립니다.
>고수님들 방법좀 부탁 드립니다.
>
>program SWFMS;
>
>uses
>  Forms,
>  USWFMS in 'USWFMS.pas' {SWFMS_F},
>  Logo in 'Logo.pas' {LOGOForm},
>  DataModule in 'DataModule.pas' {DM: TDataModule},
>  Abouts in 'Abouts.pas' {AboutBox},
>  Car in 'Car.pas' {CarForm},
>  Callu in 'Callu.pas' {CALLUForm},
>  FRM4012 in 'FRM4012.pas' {FRM4012_F},
>  FRM40121 in 'FRM40121.pas' {FRM40121_F},
>  FWK2021 in 'FWK2021.pas' {FWK2021_F},
>  FWK2022 in 'FWK2022.pas' {FWK2022_F},
>---------------------------------------- // 많아서 짤랐습니다.
>  FDW60111 in 'FDW60111.pas' {FDW60111_F};
>
>$R *.res}
>
>begin
>  Application.Initialize;
>  Application.HelpFile := 'ENG_Help.hlp';  // 도움말1
>  Application.HelpFile := 'WOK_Help.hlp';  // 도움말2
>  Application.CreateForm(TSWFMS_F, SWFMS_F);
>  Application.CreateForm(TDM, DM);
>  Application.Run;
>end.
>
0  COMMENTS