답변 감사합니다만..
팁을 넣고 실행을 시키면,,
function GetImeHanMode: boolean;  
var 
  Mode: HIMC;  
  Conversion, Sentence: dword;  
begin 
  Mode := ImmGetContext(Application.Handle);  
  ImmGetConversionStatus(Mode, Conversion, Sentence);  
  result := Conversion = IME_CMODE_HANGEUL;  
end; 

Mode:HIMC; 에서 선언되지 않은 부분이라고 걸립니다.
어떻게 해야합니까?