2ちゃんねるブラウザ「OpenJane」 @Windows Part 8

俺はATOK使いじゃないんだけど、もしかしてDelphiの最前面表示と相性が悪いとか？
全てのアプリの最前面は邪魔だったんで、Janeのみの最前面に改造してるんだけど、
それで解決する人とかいるかな？　一応ソース書いてみるけど、コンパイル環境が
ある人試してみて。もし関係なかったらスレ汚しゴメン。

(* 窓を最前面に *)
procedure TWriteForm.CheckBoxTopClick(Sender: TObject);
　(中略)
　Config.wrtFormStayOnTop := CheckBoxTop.Checked;
//改造▽ 修正 (書込みウィンドウの最前面をJane本体でのみの再前面に変更する) ━━
　if CheckBoxTop.Checked then begin
　　SetWindowLong(WriteForm.Handle,GWL_HWNDPARENT,MainWnd.Handle);
　end else begin
　　SetWindowLong(WriteForm.Handle,GWL_HWNDPARENT,0);
　end;
//オリジナル
//　if CheckBoxTop.Checked then
//　　FormStyle := fsStayOnTop
//　else
//　　FormStyle := fsNormal;
//改造△ 修正 (書込みウィンドウの最前面をJane本体でのみの再前面に変更する) ━━