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


HSPTV!掲示板


未解決 解決 停止 削除要請

2017
0402
Sellscreenについて2解決


Sell

リンク

2017/4/2(Sun) 17:43:38|NO.78817

最近、長い文字の名前の人流行っていますね。(笑)

今回は、起動時にウィンドウを最大化にしたいんですけど

screen 0,ginfo(20),ginfo(21),0,0,0
このスクリプトを実行すると、画面が右にほんの少しずれています。
ちなみに Windows10 です。他のHSPのバージョンでも実行すると、
やはり、画面が右にほんの少しずれています。
解決策はないのでしょうか?



この記事に返信する


沢渡

リンク

2017/4/2(Sun) 20:24:39|NO.78830

当方もwindows10ですが、確かに微妙に左に隙間ができますね。
windows10ではウィンドウの枠の幅が狭くなったから、その影響なのでしょうか?


screen 0,ginfo(20),ginfo(21),0
の後に、

sendmsg hwnd, $112, $F030
として最大化してやると左上ピッタリにはできましたが、ウィンドウが若干画面からはみ出して
しまいますし、タスクバーにも被ってしまいます。

そこで、apiを使って、タスクバーに被らないようにして最大化するコードを作ってみました。

#include "user32.as" fla=int((ginfo(10)-ginfo(12))/2) //枠部分の幅 tit=ginfo(11)-ginfo(13)-fla //タイトル部分の幅 dim u_zone,4 SystemParametersInfo $30,0,varptr(u_zone),0 // SPI_GETWORKAREA:0x30 //配列u_zoneの中に、タスクバーを除いた領域の左、上、右、下の座標が入る max_wid=u_zone(2)-u_zone(0) max_hei=u_zone(3)-u_zone(1)-tit screen 0,max_wid,max_hei,0 SetWindowPos hwnd,0,u_zone(0)-fla,u_zone(1),0,0,$5 //ウィンドウの枠幅の分だけ左にズラした位置に移動



Sell

リンク

2017/4/3(Mon) 11:42:59|NO.78842

沢渡さん
ありがとうございます!!



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