ソス@ソスソスIMEソスフ難ソスソスヘ値ソスソス謫セソスソスソスソスノゑソス
|
ソスEC/C++
ソスEDelphi
ソスEVisual BasicソスソスソスSソスソス
ソス@(VB2-VB6ソスソス.NETソスソスソスp)
ソスEVisual Basic(VB2-VB6)
ソスEVisual Basic .NET
ソスEVisual C++
ソスEpapy's softwarelibrary
ソスZソスソスソス^ソスソスoソス^ソスソスソスソスソスハで厄ソスソスOソスソスソスソスヘゑソスソスソスニ趣ソスソスソスソスIソスノ厄ソスソスOソスフゑソスンゑソスソスネゑソスメ集ソスソスソスソスソスソスソスB
IMEソスフ難ソスソスヘ値ソスソスソスニゑソスソスソス@ソスソスソスソスソス閧スソスソスソスB
ソスソスソスOソスFソスソスソスRソス@ソス@ソスソスソスOソスフふりがソスネ:ソスワつゑソスソス
Delphi6Pro
immソスソスソスjソスbソスgソスソスgソスソスソスワゑソスソスB
Form1ソスノ、Edit1ソスソスButton1ソスソスListBox1ソスソスソスソスソスソスAButton1ソスソスOnClickソスノ趣ソスソスフようソスネ抵ソス`ソスソスソスソスソスホ、ソスニゑソスソスソスヘわかソスソスニ思ソスソスソスワゑソスソスB
procedure TForm1.Button1Click(Sender: TObject);
var
ソス@i: integer;
ソス@imc: HIMC;
ソス@kl: HKL; // ソスLソス[ソス{ソス[ソスhソスソスソスCソスAソスEソスg
ソス@Dst: PCandidateList;
ソス@sz: integer; // ソスTソスCソスY
ソス@tmppchar: PChar;
begin
ソス@Edit1.SetFocus;
ソス@ListBox1.Clear;
ソス@imc := ImmGetContext(Handle);
ソス@kl := GetKeyboardLayout(0);
ソス@sz := ImmGetConversionList(kl, imc, PChar(Edit1.Text), nil, 0, GCL_REVERSECONVERSION);
ソス@GetMem(Dst, sz);
ソス@ImmGetConversionList(kl, imc, PChar(Edit1.Text), Dst, sz, GCL_REVERSECONVERSION);
ソス@for i := 0 to Dst.dwCount - 1 do
ソス@begin
ソス@ソス@tmppchar := PChar(DWORD(Dst) + Dst.dwOffset[i]);
ソス@ソス@ListBox1.Items.Add(String(tmppchar));
ソス@end;
ソス@FreeMem(Dst);
ソス@ImmReleaseContext(Handle, imc);
end;
ソスノゑソスソスフゑソスソスソス@ソスソスソスヤ趣ソスソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスB
ソスソスソスソスソスAソスソスソスソスソストみまゑソスソスソスソスソスソスソスソスワゑソスソスソスソスソスソスワゑソスソスソスBソスソスソスソスソストゑソスソスソスソスソスソスソスソスB
Edit1ソスソスButton1ソスソスListBox1ソスソスzソスuソスソスソスソス
ソスソスソスヤ趣ソスソスフコソス[ソスhソスソスButton1.OnClickソスノ貼ソスソスtソスソスソスナ趣ソスソスsソスソスソスワゑソスソスソスソスB
ソスGソスソスソス[ソスノなゑソスソスソスソスフゑソスUses ソスノ immソスソスヌ会ソスソスソスソスト趣ソスソスsソスソスソスワゑソスソスソスソスB
ソスソスソスソスナ難ソスソスソスヘゑソスソスソスフでゑソスソスソスListBoxソスノはなにゑソス¥ソスソスソスソスソスソスネゑソスソスソスソスソスソスソス
ソスSソス‾ソスフようソスネゑソスフゑソスソスoソスソスソスソスナゑソスソスB
ソスソスソスソスソスEDIT1ソスノ擾ソスソスRソスiソスワつゑソスワで変奇ソスソスソスソスト確ソスソスソスjソスニ難ソスソスヘゑソスソスソス
Button1ソスソスNソスソスソスbソスNソスソスソストゑソスソスワゑソスソスB
ソスソスソスソスEDIT1ソスノなにゑソスソスソスヘゑソスソスネゑソスソスニゑソスソスヘ異擾ソスフようソスナゑソスソスB
ソスソスソスソスDelphi4ソスナゑソスソスソスソスAソスワゑソスソスソスソスナゑソスソスソスソスH
ソスソスしソスソスソスソスソス閧「ソスソスソスワゑソスソスB
ソスソスソスソスソスフ環具ソスソスソスDelphi5ソスナゑソスソスB
ソス¥ソスzソスナゑソスソスソスソスAHandleソスソスApplication.HandleソスノゑソスソストはどゑソスソスナゑソスソスソスソスH
ソスlソスソスAソスナ擾ソスソスソスソスソスソスソスソスニゑソスソスソスEdit1.SetFocusソスソスソスネゑソスソスソスIMEソスRソスソスソスeソスLソスXソスgソスソス謫セソスソスソスソスソスソスGソスソスソス[ソスノなゑソスワゑソスソスソスソスソスソスソスB
ソスソスソスネみに、ソス闌ウソスフ趣ソスソスソス(Windows98 APIソスoソスCソスuソスソス)ソスナは、Editソスソスソス辜ソスbソスZソス[ソスWソスソスソスホゑソスソスト、ソスソスソスフソスソスbソスZソス[ソスWソスフ擾ソスソスソスソスソスナ取得ソスソスソストゑソスソスソス謔、ソスナゑソスソスB
imc(IMEソスRソスソスソスeソスLソスXソスg)ソスソスソスソスソスソスソスソスニ取得ソスナゑソスソストゑソスソス驍ゥソスAkl(ソスLソス[ソス{ソス[ソスhソスソスソスCソスAソスEソスg)ソスソスソス謫セソスナゑソスソストゑソスソス驍ゥソスAImmGetConversionListソスフ戻ゑソスl(CandidateListソスフサソスCソスY)ソスソスソスソスソスかソスAソスmソスソスソス゚てみてゑソスソスソスソスソスソスソスソスB
ソスヤ違えソストまゑソスソスソスソスB
dwOffsetソスヘ、[1..1]ソスニ抵ソス`ソスソスソスソストゑソスソスソスフで、[0]ソスソス[2]ソスネ降ソスソスQソスニゑソスソストゑソスモ厄ソスソスソスソスソスソスソスワゑソスソスソスB
# [2]ソスネ降ソスヘ意厄ソスソスソスソスソスソス驍ゥソスソスソスソスソスワゑソスソスが、ソスヌゑソスソスソス#0ソスソスリゑソスフ包ソスソスソスソスソスネので。
ソスソスソスソスニ、DstソスヘポソスCソスソスソス^ソスナ、ソスソスソスソスソスQソスニゑソスソスソスノは逆ソスQソスニゑソスソスネゑソスソスソスホなゑソスネゑソスソスナゑソスソスヒ。
# Delphi5ソスナはゑソスソスソスソスソスソスソスソスソス迴滂ソスソスノゑソスソスソストゑソスソスソストゑソスソスフゑソスソスソス
ソスネので、var ソスソス offset:DWORD;ソスニ、idx: integer;ソスソスpソスモゑソスソスト、forソスソスソスネ会ソスソスソス
ソス@tmppchar := PChar(DWORD(Dst) + Dst^.dwOffset[1]);
ソス@offset := 0;
ソス@for i := 0 to Dst^.dwCount - 1 do
ソス@begin
ソス@ソス@tmppchar := PChar(DWORD(tmppchar) + offset);
ソス@ソス@idx := ListBox1.Items.Add(String(tmppchar));
ソス@ソス@offset := Length(ListBox1.Items[idx]) + 1;
ソス@end;
ソス@FreeMem(Dst);
ソスフようソスノ変ゑソスソストゑソスソスソスソスソスソスソスソスB
ソスノゑソスソスフゑソスソスお返趣ソスソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスB
ソスwソスソスソスニゑソスソスソスAソスCソスソスソスソスソスソスソスフでゑソスソスソスソスkソスhソスrソスsソスaソスnソスwソスノは意厄ソスソスsソスソスソスフ包ソスソスソスソスソス
ソス¥ソスソスソスソスソスソスワゑソスソスB
ソスRソス[ソスfソスBソスソスソスOソスヘ以会ソスソスフとゑソスソスソスBソスiDelphi4.0jソス@Proソスj
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
imc: HIMC;
kl: HKL; // ソスLソス[ソス{ソス[ソスhソスソスソスCソスAソスEソスg
Dst: PCandidateList;
sz: integer; // ソスTソスCソスY
tmppchar: PChar;
offset:DWORD;
idx: integer;
begin
Edit1.SetFocus;
ListBox1.Clear;
imc := ImmGetContext(Handle);
kl := GetKeyboardLayout(0);
sz := ImmGetConversionList(kl, imc, PChar(Edit1.Text), nil, 0, GCL_REVERSECONVERSION);
GetMem(Dst, sz);
ImmGetConversionList(kl, imc, PChar(Edit1.Text), Dst, sz, GCL_REVERSECONVERSION);
// showmessage(inttostr(Dst.dwCount));
tmppchar := PChar(DWORD(Dst) + Dst^.dwOffset[1]);
offset := 0;
for i := 0 to Dst^.dwCount - 1 do
begin
tmppchar := PChar(DWORD(tmppchar) + offset);
idx := ListBox1.Items.Add(String(tmppchar));
offset := Length(ListBox1.Items[idx]) + 1;
end;
FreeMem(Dst);
ImmReleaseContext(Handle, imc);
end;
ソスソスソスフ環具ソスソスソスDelphiソスソスソスネゑソスソスソスソス゚、ソスmソスソスソス゚ゑソスソスワゑソスソスソスB
ソスニに帰ソスソスソスソスソスソスmソスソスソス゚まゑソスソスヒ。
ソス皷橸ソスOソスフゑソスソス゚、OSソスソスIMEソスヘ会ソスソスソスソスソスgソスソスソスナゑソスソスソスソスH
ソスソスソスソスソスヘ、WindowsXP Pro+IME2002ソスナゑソスソスB
ソスソスソスソスニ、HandleソスソスEdit1.HandleソスソスソスソスソスソスソスワゑソスソスソスB
ソスソスソスソスソスソスソスニ、HandleソスナゑソスEdit1.HandleソスナゑソスソスソスワゑソスソスソスソスソスソスワゑソスソスソスソスB
# SetFocusソスソスソスネゑソスソスニエソスソスソス[ソスノなゑソスワゑソスソスソス
ソスソスソスソスソスワゑソスソスソスソスソスB
ソスソスヘゑソスAOSソスAIMEソスフ組ソスン搾ソスソスせソスナゑソスソス蛯、ソスソスソスB
ソスソスソスソスニゑソスD4ソスソスD5ソスフ違いソスナゑソスソス蛯、ソスソスソスB
ソスソスソスソスネ擾ソスヘゑソスソスソスソスソスニわかソスソスワゑソスソスソスB
Delphi6ソスAWin98ソスAIME98 ソスナは、
Edit1ソスソスソスuソスソスソスRソスvソスナ、
ListBox1ソスフ表ソスソスソスソス
ソスu"gqソスソスソスvソスフ1ソスsソスナゑソスソスB
Edit1ソスソスソスu1ソスv(ソスソスソスp)ソスフ場合ソスA
ListBox1ソスフ表ソスソスソスヘ、
ソスP
ソスソスソスソス
ソスミゑソス
ソスフ3ソスsソスナゑソスソスB
WindowsXP Pro+IME2002ソスナは、
Edit1ソスソスソスuソスソスソスRソスvソスフ場合ソスAListBox1ソスフ表ソスソスソスソス
ソスソスソスニ表ソスソスソスソスソスソスソスソスナゑソスソス蛯、ソスソスソスH
Delphi5,WindowsXP Pro+IME2002ソスナは、
ListBox1ソスフ表ソスソスソスソス
ソスワつゑソスソス
ソスソスソスWソスsソス¥ソスソスソスソスソスソスワゑソスソスB
ソスソスソスpソスソス1ソスフ場合ソスA
ListBox1ソスフ表ソスソスソスソス
1
ソスソスソスソスソスナゑソスソスB
ソス欄ではエソスソスソス[ソスソスソスソスソスソスソスソスソスワゑソスソスB
ListBox1ソスノは「ソス`gq¥ソスvソスニ表ソスソスソスソスソスソスワゑソスソスB
ソスソスソスフ環具ソスソスソスWinMeソス{IME2000ソス{Delphi6.0ProソスナゑソスソスB
IMEソスソスソスソスナ参ソスlソスノなゑソス{ソスソスソスソスソスソスmソスネら教ソスソスソストゑソスソスソスソスソスソスソスソスB
IMEソスフ違いソスナはなゑソスソスト、OS(Win9XソスソスNTソスnソスソス)ソスフ違いソスソス
ソスeソスソスソスソスソスソスソスナゑソスソスソスソスヒ〜(@_@)
AnsistringソスソスUnicodeソスフ厄ソス閧ゥソスネ〜ソスナゑソスA
ImmGetConversionListA()
ImmGetConversionListW()
ソスナゑソスソスソストゑソスソスソスワゑソスソスソスソスソスソスネゑソスソスソスソスc
ソスQソスlソスノなるかソスヌゑソスソスソスソスかソスソスワゑソスソスが、
Windows98 APIソスoソスCソスuソスソス
ソスVソスFソスソス/ソスVソスFソスソスソスソスソス[ソスeソスBソスソスソスeソスB/ソスソスソス/IME/ソスヌ会ソスソスヨ撰ソス ソスソス
ソスLソスソスソスソスミガソスソスソスoソス[ソスソス
ソスソスソスJソス勝ソスK ソスト修
ソスフ費ソスソスソス ソスト泳ソスソス
ISBN4-88135-734-4
ソス濶ソソスTソスWソスOソスOソス‾ソス{ソスソス
ソスソスソスソスノ、IMEソスヨ連ソスフ関撰ソスソスソス關(ソスlソスヘ出ソストゑソスソスワゑソスソスソス)ソスAソス¥ソスソスソスフなどゑソスソスoソストゑソスソスワゑソスソスB
ソスTソスソスソスvソスソスソスソスVisualC++ソスナ擾ソスソスソスソスソストゑソスソスワゑソスソスB
UnicodeソスソスSJISソスソスソスナゑソスソスソスソスAソスソスソスノ記ソスqソスヘゑソスソスソスワゑソスソスソスナゑソスソスソスソスB
ソスソスソスソスソスノ会ソスソスソスソスソスソスソスワゑソスソスソスソスB
ソスiソスソスソスgIME98ソスAIME2000ソスフバソスOソスソスソスソスソスソスソスニゑソス(-_-;)
ソスソスソスワゑソスソスソスソスソスソスソスフようソスナゑソスソスヒ。ソスソスソスソスソスソスソスソスだ。(-_-ソスソス)
http://www.microsoft.com/japan/support/kb/articles/J059/3/78.asp
http://hp.vector.co.jp/authors/VA009883/
ソスフ、Yomiソスニゑソスソスソスソスcソス[ソスソスソスソスソスニゑソスソスワゑソスソスマ奇ソスソスナゑソスソスワゑソスソスソスヒ?
# ソスホ会ソスソスソスIME98ソスネ降ソスニなゑソスソストゑソスソスソスフゑソス
ソスソスソスソスノゑソスDLLソスソスソスワまゑソストゑソスソスト、.htaソスtソス@ソスCソスソス(WSHソスソスソスユゑソスユゑソス)ソスナ読み搾ソスソスソスソスDLLソスソストび出ソスソスソストゑソスソスソスフで、ソスソスソスソスDLLソスフ使ソスpソスソスソスツゑソスソスoソスソスホ読み会ソスソスソスソス謫セソスソスソスネ単ソスノでゑソスソスソスソスソスソスナゑソスソスB
ソスソスソスソスソスソスソスAIME97ソスネ降ソスノは、ソスハの包ソスソス@ソスナ読み会ソスソスソスソスソス謫セソスソスソスソスソスソス@ソスソスソスソスソスソスソスソスソスヘゑソスソスネゑソスナゑソスソスソスソスAソスvソスソスソスoソスソスソスワゑソスソスソスB
ソスuYomiソスvソスニゑソスソスソスソスcソス[ソスソスソスナは確ソスソスソスソスIME98ソスナゑソスソスソスソスソスフ読みゑソスソス¥ソスソスソスソスソスソスワゑソスソスヒ。
ソスソスソス`ソスソスAソスヌゑソスソスソスソスソストゑソスソスソスだろうソスB
ソスソスソスノ難ソスソスソスソストゑソスソスソス'comuni.Yomi.dll'ソスソス
ソスソスソスフようソスノ呼び出ソスソスソストみまゑソスソスソスソスソスソスA
ソスuソスソスソスラエソスNソスXソス|ソス[ソスgソスノソスソスソスソスNソスソスソスソストゑソスソスワゑソスソスvソスニゑソスソスソス
ソスGソスソスソス[ソスソスソスoソストゑソスソスワゑソスソスワゑソスソスB
ソスソスソスソスDLLソスソス Delphiソスナは使ソスソスソスネゑソスソスソスナゑソスソス蛯、ソスソスソスB(T_T)
const comuniYomi = 'comuni.Yomi.dll';
function getYomi(inStr: LPSTR): LPSTR; stdcall;
external comuniYomi name 'getYomi';
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := getYomi('ソスソスソスソス');
end;
TLIBIMPソスナ、
tlibimp comuni.Yomi.dll
ソスニゑソスソスソスニ、
YOMILib_TLB.pas
YOMILib_TLB.dcr
ソスソスソスfソスソスソスソスワゑソスソスB
ソスソスソスソスソスgソスソスソスホゑソスソスヤゑソスナゑソスソスソスニ思ソスソスソスワゑソスソスB
# ソスvソスソスCOMソスIソスuソスWソスFソスNソスgソスナゑソス
ソスソスソスソスナ、usesソス゚ゑソスYOMILib_TLBソスソスソスソスソスソスト、ソスソスソスフようソスノゑソスソスソスホ趣ソスソスワゑソスソスB
procedure TForm1.Button3Click(Sender: TObject);
var
yomi: IYomiImpl;
tmpstr : string;
begin
yomi := CoYomiImpl.Create;
tmpstr := yomi.getYomi(WideString(Edit1.Text));
ListBox1.Items.Clear;
ListBox1.Items.Add(tmpstr);
end;
CreateComObjectソスソスソスソスソスIソスuソスWソスFソスNソスgソスフ廃ソスソスソスフ仕ソスソスソスヘわかソスソスワゑソスソスソスナゑソスソスソスソスB
ソスwソスソスソスvソスソスソスソスソスニ、ソスソスソスソスソスソスソスニゑソスソスヘクソスソスソスXソスtソス@ソスNソスgソスソスソスソスgソスpソスソスソスソスソスルゑソスソスソスソス謔「ソスニ擾ソスソストゑソスソスソスフで、ソスソスソスロには、ソスPソスソスフオソスuソスWソスFソスNソスgソスノゑソスソス驍ゥソスNソスソスソスXソスtソス@ソスNソスgソスソスソスソスgソスソスソスニよいソスナゑソスソスB
ソスソスソスソスソスソスソスソスソスソスソスソスソスソスソスeソスXソスgソスソスソスワゑソスソスB
ソスンなゑソスソスワ、ソスソスソスソスソスヘゑソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスソスソスB
Delphi6Personal ソスノゑソス TLIBIMP.exe ソスソスソスソスソスソスワゑソスソスソスB(T_T)
ソスソスソスソスヘゑソスソスソス繧ーソスナゑソスソスヒ。
tlibimpソスAソスソスソスソスワゑソスソスか。
ソスソスソスソスナ難ソスソスソスソスワゑソスソスか?
Delphi5ソスナ通ゑソスワゑソスソスB
http://www.geocities.co.jp/AnimalPark/1770/YOMILib_TLB.lzh
ソスヌゑソスソスナゑソスソス蛯、ソスソスソスB
.dcrソスヘゑソスソスソスネゑソスソスニ思ソスソスソスワゑソスソスソスソスB
ソスRソスソスソス|ソス[ソスlソスソスソスgソスニ難ソスソスソスソス謔、ソスノ、ソスpソスbソスPソス[ソスWソスソス成ソスソスソストイソスソスソスXソスgソス[ソスソスソスソスソストみてゑソスソスソスソスソスソスソスソスB
ソス凍ゑソスソスソスYOMILib_TLB.pasソスソスvソスソスソスWソスFソスNソスgソスフフソスHソスソスソス_ソスノ難ソスソスソスト、
usesソス゚ゑソスYOMILib_TLBソスソスソスソスソスソスソスニ難ソスソスソスソスワゑソスソスソスソスBソス_(^ソスソス^)ソス^
WideStringソスフキソスソスソスXソスgソスヘ厄ソスソスソスソストゑソスソスソスネゑソスソス謔、ソスナゑソスソスB
ソスFソスXソスネ人ソスソスソスフ読みテソスXソスgソスソスソストみゑソスニ、ソスソスソスネ変奇ソスソスソスソスソスソスソスワゑソスソスソスソスソスソスA
IMEソスフプソスソスソスpソスeソスBソスナ擾ソスソスソスソスマ奇ソスソスソスソス[ソスhソスソスuソスlソスソス/ソスnソスソスソスvソスノゑソスソス驍アソスニゑソス
ソスルぼ的ソスmソスネ読み変奇ソスソスソスソスoソストゑソスソスワゑソスソスソスソスB
ソスソスソス閧ェソスニゑソスソスソスソスソスソスソスソスワゑソスソスソスソスBm(__)m