名前
題名
▼ Mr.XRAYさん > ▼ takaさん > > >ストアアプリで課金方式や広告表示で入金してもらう際の注意 > >・登録する銀行は、海外からの「被仕向送金手数料 無料」 を必ず探すこと > >　なにも考えずに登録すると 数千円の手数料を取られて 悲惨な入金額になります > > なるほど． > > > > 説明 > > http://forest.watch.impress.co.jp/docs/news/1020266.html > > > > 動作環境 64bit > > 早く 64 ビットに移行しろ !! ということなのでしょうか． > > > UWP なんですが，Windows 10 の Microsoft Edge には EXE ファイルがありません． > UWP の登録名 (表示名ではない) か Shell コマンドでないと起動できません． > [ファイル名を指定して実行] の記事を書いている時に，ネット上で質問をみかけました． > 「Edge の実行ファイルはどこにあるのでしょうか」 > という内容でした． > > Windows 10 の IE 11 は，UWP と EXE の両方あります． > > > uses > ShellAPI; > > {$R *.dfm} > > //============================================================================= > // UWPアプリの起動 > // UWPの登録名で起動 > //============================================================================= > procedure TForm1.Button1Click(Sender: TObject); > var > LCmd : string; > LPara : string; > begin > LCmd := 'microsoft-edge:'; > LPara := 'http://mrxray.on.coocan.jp/index.htm'; > > ShellExecute(Handle, '', PChar(LCmd + LPara), nil, nil, SW_SHOW); > end; > > //============================================================================= > // UWPアプリの起動 > // shellコマンドで起動 > //============================================================================= > procedure TForm1.Button2Click(Sender: TObject); > var > LCmd : string; > LPara : string; > begin > LCmd := 'shell:AppsFolder\Microsoft.MicrosoftEdge_8wekyb3d8bbwe!MicrosoftEdge'; > LPara := 'http://mrxray.on.coocan.jp/index.htm'; > > ShellExecute(Handle, '', PChar(LCmd), PChar(LPara), nil, SW_SHOW); > end; >
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link