dll、exeから取得したアイコンをフォームのアイコンにしたい

解決


ハナクソース  2004-04-09 20:10:21  No: 112759

VB6でDLLやEXEから取得したアイコンをフォームのアイコンに設定する
ということをやっています。
APIのExtractIconでアイコンのハンドルを取得はできるのですが、
formのIconプロパティに設定する方法がわかりません。
どうやればいいのでしょうか??

↓↓↓ちなみにアイコンハンドル取得はこんな感じでやっています↓↓↓
ExtractIcon(Me.hWnd, App.Path & "\EXCEL.EXE", CLng(0))


ぴろあき  2004-04-09 20:55:09  No: 112760

Me.Icon = LoadPicture("<ファイル名>")
でOK。


ぴろあき  2004-04-09 21:01:00  No: 112761

ああ、失礼。
ハンドルまでか・・・

http://kone.vis.ne.jp/program/#sample17
ここのSaveIconFile関数で保存して、
LoadPictureで問題ないでしょう。


ぴろあき  2004-04-10 02:15:41  No: 112762

失礼、何もファイルに落とす必要ないですね。。。
Call DrawIcon(Me.hDC, 0, 0, <アイコンハンドル>)


ハナクソース  2004-04-13 22:49:30  No: 112763

ぴろあきさん、ありがとうございました。
何とかできそうです☆
返事が遅くなりまことにすみませんm(_ _)m


ハナクソース  2004-04-14 19:02:23  No: 112764


※返信する前に利用規約をご確認ください。




  


  このエントリーをはてなブックマークに追加