ふくぞーさん、こんにちは。

＞＞ll_icon = ExtractAssociatedIcon( Handle(Parent) ,Parent.Icon, ll_null)
＞＞にしてみてください。
＞＞（Parentはウィンドウ、Parent.Iconは実際のファイル名にしておきます）
＞
＞まず、Parent.Iconという書き方ができるとはしりませんでした。
＞ありがとうございます。
＞しかし・・・Parent.Iconに何も値が入ってこないのですが
＞ウインドウのアイコンの設定ってApplication!でいいんですよね？？？

あいや、「Parent.Iconは実際のファイル名に」って書いたじゃないですか。(^^;
つまり、\"Application!\"などの識別子ではなく、ファイル名そのもの文字列を与える
の意味です。
（Parent.Iconじゃなくても、文字列変数なら何でもいいです）

余談ですが・・・
アプリケーションオブジェクトに設定したアイコンファイル名って、どうやって拾うんでしょうね。
プロパティにないみたいです。