DLLの「フォルダの参照」の・・・

ActiveBasicでのプログラミングでわからないこと、困ったことなどがあったら、ここで質問してみましょう(質問を行う場合は、過去ログやWeb上であらかじめ問題を整理するようにしましょう☆)。
返信する
メッセージ
作成者
えみゅ@初心者

DLLの「フォルダの参照」の・・・

#1 投稿記事 by えみゅ@初心者 »

ボタンで「参照」というボタンを作って「フォルダの参照」を出すところまでは
出来たのですが、選択してOKをクリックしたときにエディトボックスにフォルダのパスが出るようにしたいのですが分かりません。
でもヘルプセンターで探してみましたが、私の知識ではよく分からないので、皆様に出来たら教えていただきたいと思って書き込みました。

私はget~だろうと見当を付けて調べましたが・・・。

ダメな初心者ですが、どなたか教えていただければ幸いです。
7
記事: 473
登録日時: 2005年5月31日(火) 18:51
お住まい: 新潟県
連絡する:

Re: DLLの「フォルダの参照」の・・・

#2 投稿記事 by 7 »

> ボタンで「参照」というボタンを作って「フォルダの参照」を出すところまでは
> 出来たのですが、選択してOKをクリックしたときにエディトボックスにフォルダのパスが出るようにしたいのですが分かりません。
以下のコードを参考にしたんですよね? この関数はフォルダが選択された場合、1 が返り、フォルダのパスがBytePtr型変数lpFolderに格納されます。

エディットボックスに文字列を設定するにはSetWindowText()関数やSetDlgItemText()関数を使います。

コード: 全て選択

Dim lpFolder As BytePtr
Dim hEdit As HWND
	' エディットボックスのハンドルを取得
	hEdit=GetDlgItem(hMainWnd,EditBox1)

	' フォルダのパスを取得した場合、エディットボックスにパスを設定
	If GetFolderDlg(hMainWnd,lpFolder) Then
		' SetWindowText()関数を使う場合
		SetWindowText(hEdit,lpFolder)

		' SetDlgItemText()関数を場合
		SetDlgItemText(hMainWnd,EditBox1,lpFolder)
	End If
えみゅ

#3 投稿記事 by えみゅ »

出来ました。ありがとうございます。
返信する