名前 題名 ▼ Mr.XRAYさん > スレッドでの処理ですが,修正したplExplorerFolderTree.pasであれば, > > procedure TplExplorerFolderTreeThread.MessageLoop; > var > Amsg : Msg; > begin > while True do begin > if GetMessage(AMsg, 0, 0, 0) = False then begin > PostQuitMessage(0); > break; > end; > if Amsg.message = WM_MOUSEMOVE then begin > //処理 > end else begin > TranslateMessage(Amsg); > DispatchMessage(Amsg); > end; > end; > end; > > こんな感じですね. > > TranslateMessage(Amsg); > DispatchMessage(Amsg); > > はキー操作関係の場合は,実行しないと,表示も正常に行われないし, > Itemの名前変更もできなくなります. > マウスメッセージの場合は,この2行は実行する必要は特にありません. GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link