掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
BitBtnのGryphにアイコンを描画 (ID：31846)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
BitBtnのGryphにアイコンを描画する方法を教えてください。 アイコンはXPタイプの、透過・半透過をサポートしているものです。 http://www.geocities.jp/asumaroyuumaro/program/tips/extracticon.html を参考にやってみましたが、 DrawIconでは BitBtn.GryphのCanvas にはうまく描画できません。 よろしくお願いします。 WinXP、Delphi2007 ※usesに shellapi追加 procedure TForm1.Button1Click(Sender: TObject); var HICO :HICON;//アイコンハンドル P :AnsiString; begin P:='C:\WINDOWS\explorer.exe'; HICO :=ExtractIcon(hInstance, PChar(P) ,0); if HICO <>0 then begin DrawIcon(BitBtn1.Glyph. Canvas.Handle, 2,2, HICO);//何も描画されない DrawIcon(Form1.Canvas.Handle, 5,5, HICO);//これはOK DestroyIcon(HICO); end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.