개발 참고자료

/* Global External Functions에 아래 두개 등록한다. */


function boolean ImmSetConversionStatus( long himc, long mode, long sen) library "imm32.dll" Alias For "ImmSetConversionStatus"
function long ImmGetContext( long hWnd ) library "imm32.dll" Alias For "ImmGetContext"






/* 함수생성 */


global type lang from function_object
end type


forward prototypes
global subroutine lang (powerobject apo, string as_lang_choice)
end prototypes


global subroutine lang (powerobject apo, string as_lang_choice);choose case Upper(left(as_lang_choice, 1))
case 'K', '1', 'Y', '한'
ImmSetConversionStatus( ImmGetContext ( Handle ( apo) ), 1, 0 ) // 한글
case else
ImmSetconversionStatus( ImmGetcontext ( Handle ( apo) ), 0, 0 ) // 영문
end choose
end subroutine