HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2019
0915
hirokiOSの制限2解決


hiroki

リンク

2019/9/15(Sun) 20:29:50|NO.88428

OSもどきを作っている者です。
windows 10 だと実行できて、
windows 7やwindows 8では
警告を表示するということはできないでしょうか。
SysinfoでOSを特定し、notesaveし、それを読み込んでそれでやろうとしたのですが、
仮想環境でやっても、無理でした。
だれか教えてください!



この記事に返信する


よっぴー

リンク

2019/9/16(Mon) 12:47:46|NO.88436


#uselib "NTDLL.dll" #func global RtlGetVersion "RtlGetVersion" sptr dim OSVERSIONINFO,37 OSVERSIONINFO=$94 RtlGetVersion varptr(OSVERSIONINFO) mes"WindowsNT "+OSVERSIONINFO(1)+"."+OSVERSIONINFO(2) if OSVERSIONINFO(1)==10&OSVERSIONINFO(2)==0 { //WindowsNT 10.0 (Windows10) mes"Windows10環境です" } else { mes"Windows10環境ではありません" }

http://hsp.tv/play/pforum.php?mode=pastwch&num=70416

このサイトの情報を基にして作りました。
Windows8環境を持っていないので確認はできていませんが、多分いけると思います。

別のWindowsバージョンを特定したい場合は以下のページを参考にして、if文の式を変えてみてください。

https://ja.wikipedia.org/wiki/Windows_NT系#バージョンの変遷



hiroki

リンク

2019/9/18(Wed) 05:51:07|NO.88451

仮想環境でやったらできました!ありがとうございます!



ONION software Copyright 1997-2021(c) All rights reserved.