UNDOの実装

X-Finderの作者さんのメモ書きを参考に実装を試みた。
http://www.eonet.ne.jp/~gakana/memo/xfmemo1.html
 
※3のIShellView.CreateViewWindowを実行するためにはIShellBrowserを実装する必要があります。
IShellBrowserを実装しない場合は以下の方法があります。
 
IShellBrowserで躓き中。
以下のサイトが参考になりそう。
http://eternalwindows.jp/shell/shellname/shellname08.html
 
その他の方法もあるみたいだが
IWebBrowser2→Delphi6では定義未実装。
IFolderViewHost→Delphi6では定義未実装。
IExplorerBrowser→Delphi6では定義未実装。