Input method calls and network status test procedure, pay! Interested contact. QQ46159206

CodePudding user response:

Input method invocation is not complicated, "state detection network" is a concept of what? What test? SQL connection or other what state?

QQ190814570

CodePudding user response:

Multiple servers, which shortest overtime?

CodePudding user response:

 
Var ImeName: string; 
Procedure TKeyFrame. OpenIme (imename: string); 
Var 
I: integer; 
Myhkl: HKL; 
The begin 
If ImeName<> "' then 
The begin 
If screen. Imes. Count>=0 then 
The begin 
I:=screen. Imes. Indexof (imename); 
Myhkl:=HKL (screen. Imes. Objects [I]); 
ActivateKeyboardLayout (myhkl KLF_ACTIVATE);//set the corresponding input method 
end; 
end; 
end; 
Procedure TKeyFrame. CloseIme; 
Var 
Myhkl: HKL; 
The begin 
Myhkl:=GetKeyBoardLayOut (0); 
If ImmIsIME (myhkl) then 
ImmSimulateHotKey (Application. Handle, IME_CHotKey_IME_NonIME_Toggle); 
end; 

CodePudding user response: