ab.com コミュニティ

ActiveBasicを通したコミュニケーション
現在時刻 - 2024年3月29日(金) 00:05

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




新しいトピックを投稿する  トピックへ返信する  [ 6 件の記事 ] 
作成者 メッセージ
投稿記事Posted: 2017年7月25日(火) 16:45 
質問させてください。

インストーラーを作っていて、
起動時に、OSのbit数を取得して、
チェックボックス等の制御をかけたいのですが、
OSのbit数は、どのように取得すればよろしいでしょうか。
※OSは、Windowsのみの想定で、7から10ぐらいまでを想定しています。

よろしくお願いいたします。


通報する
ページトップ
   
投稿記事Posted: 2017年7月26日(水) 00:23 
オフライン

登録日時: 2006年2月05日(日) 17:10
記事: 215
お住まい: 東京都
環境変数の値の判定結果で取得できます。
具体的には環境変数(PROCESSOR_ARCHITECTURE)が
●"x86"のときは32BIT版Windows
●"AMD64"または"IA64"のときは64BIT版Windowsと判定できます。
しかし64BIT版Windowsで32BITのプログラム(この場合はインストーラを示す)が起動されたとき、
環境変数(PROCESSOR_ARCHITECTURE)に"x86"が設定されて「32BIT版Windows」とみなされます。
以下に示す手順で行ってみてください。

●環境変数の取得
1 環境変数(PROCESSOR_ARCHITECTURE)の内容をWin32 API GetEnvironmentVariableで取得
2 環境変数(PROCESSOR_ARCHITEW6432)の内容をWin32 API GetEnvironmentVariableで取得
●32BIT版/64BIT版 Winsowsの判定
1 環境変数(PROCESSOR_ARCHITECTURE)が"x86"のとき
●環境変数(PROCESSOR_ARCHITEW6432)が"AMD64"のとき「64BIT版 Winsows」
●環境変数(PROCESSOR_ARCHITEW6432)が"AMD64"以外のとき「32BIT版 Winsows」
2 環境変数(PROCESSOR_ARCHITECTURE)が"x86"以外のとき「64BIT版 Winsows」

よろしくお願いします。


通報する
ページトップ
投稿記事Posted: 2017年7月26日(水) 13:05 
オフライン

登録日時: 2006年2月05日(日) 17:10
記事: 215
お住まい: 東京都
ネットで検索すると主にバッチファイルの例ですが参考になると思います。
ご確認願います。


通報する
ページトップ
投稿記事Posted: 2017年7月26日(水) 13:12 
早速の回答、ありがとうございます。
下記のように、プログラムを組んでみたんですが、
私の力不足により、いまだ、処理を作りきることができません。

度々で申し訳ありませんが、もう少し、教えていただけないでしょうか。
コード:
	Dim buffer[2047] 		As Byte
	Dim buffer2[2047] 		As Byte

	GetEnvironmentVariable("PROCESSOR_ARCHITECTURE",buffer,2048)

	If buffer = "x86" Then
		GetEnvironmentVariable("PROCESSOR_ARCHITEW6432",buffer2,2048)
 		If buffer2 = "AMD64" Then
			' 64bit
			(64bitの時の処理)
		Else
			' 32bit
			(32bitの時の処理)
		End If
	Else
		' 64bit
		(64bitの時の処理)
	End If

上記のプログラムを実行すると、bufferの内容が「x86」だったとしても、
最初の分岐で、Elseの方に流れてしまいます。

ためしに、
MessageBox(0,buffer, "確認", MB_OK)
と表示させると、「x86」と表示されるので、bufferの取得はできているようです。

if分の書き方か、変数の扱いが間違っているとは思うのですが、
どのように直せばよいか、教えていただけないでしょうか。

よろしくお願いいたします。


通報する
ページトップ
   
投稿記事Posted: 2017年7月26日(水) 15:33 
オフライン

登録日時: 2006年2月05日(日) 17:10
記事: 215
お住まい: 東京都
バイト型配列で「If buffer = "x86" Then」でコーディングすると
C/C++と同様にbufferの値が"x86"かどうかではなくbufferのポインタの値と"x86"のポインタの値が一致するかどうかという判定となります。
なので期待通りに動作しません。
そこで「If buffer = "x86" Then」を「If memcmp(buffer,"x86",3) = 0 Then」に変更すると期待通りに動作します。
なおmemcmpはabのヘルプにのってません。
詳細はネットで検索して確認してください。


最後に編集したユーザー たかせ [ 2017年7月29日(土) 23:04 ], 累計 1 回

通報する
ページトップ
投稿記事Posted: 2017年7月26日(水) 17:12 
教えていただいたようにif文の書き方を変えたところ、
想定通りの動きになりました。

ありがとうございました。


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

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


オンラインデータ

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


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

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