ab.com コミュニティ

ActiveBasicを通したコミュニケーション
現在時刻 - 2024年4月27日(土) 22:48

全ての表示時間は UTC+09:00 です




新しいトピックを投稿する  トピックへ返信する  [ 4 件の記事 ] 
作成者 メッセージ
投稿記事Posted: 2005年11月23日(水) 18:21 
ドラッグされた実行ファイルのアイコンを
コマンドボタン(CommandButton2)に描画したいのですが
どうも上手く行きません。
どこを直せばいいのでしょうか?教えてください
Ver 4.11.02
引用:
Sub MainWnd_DropFiles(hDrop As HDROP)
dim fp as String
dim hEdit2 as HANDLE
dim hCB as HWND

fp=ZeroString(256)
DragQueryFile(hDrop,0,fp,256)
ExtractIconEx(fp,0,hBigIcon,0,1)
hCB=GetDlgItem(hMainWnd,CommandButton2)

SendMessage(hCB,BM_SETIMAGE,IMAGE_ICON,hBigIcon)

End Sub
エラーなども起きないのですが
描画もされません;;
よろしくお願いします


通報する
ページトップ
   
 記事の件名:
投稿記事Posted: 2005年11月23日(水) 18:36 
オフライン

登録日時: 2005年5月31日(火) 20:14
記事: 203
お住まい: 兵庫県
http://www.program-lab.jp/blog/progmemo ... iesso.html
↑によると「アイコン」スタイルを追加する必要があるようです。
ActiveBasicのRADでもこのスタイルに対応していますので、チェックを入れてみて下さい。

_________________
[hira]
http://hira.hopto.org/


通報する
ページトップ
投稿記事Posted: 2005年11月23日(水) 19:00 
「アイコン」スタイルはRADできちんとチェックされている状態なのですが...
プログラムの間違いでしょうか?


通報する
ページトップ
   
 記事の件名:
投稿記事Posted: 2005年11月23日(水) 22:04 
オフライン

登録日時: 2005年7月19日(火) 19:47
記事: 98
お住まい: 山形県
コード:
ExtractIconEx(fp,0,hBigIcon,0,1)

ヘルプによると、第 3 引数は
引用:
phiconLarge
32ビット整数型配列へのポインタを指定します。この配列に、大きいアイコンのハンドルが格納されます。不要なときは、NULL を指定します。
だそうなので、hBigIcon へのポインタを渡す必要があります。なので、
コード:
ExtractIconEx(fp,0,VarPtr(hBigIcon),0,1)

としてポインタを渡す様にすれば正常に動作します。

_________________
Toshi's Recess Room
http://toshi.my.land.to/


通報する
ページトップ
期間内表示:  ソート  
新しいトピックを投稿する  トピックへ返信する  [ 4 件の記事 ] 

全ての表示時間は UTC+09:00 です


オンラインデータ

このフォーラムを閲覧中のユーザー: Ahrefs [Bot] & ゲスト[14人]


トピック投稿:  可
返信投稿:  可
記事編集: 不可
記事削除: 不可
ファイル添付: 不可

検索:
ページ移動:  
Powered by phpBB® Forum Software © phpBB Limited
Japanese translation principally by ocean