ウインドウサイズについて

返信する


答えを正確に入力してください。答えられるかどうかでスパムボットか否かを判定します。
BBCode: ON
[img]: ON
[url]: ON
スマイリー: OFF
トピックのレビュー
   

展開ビュー トピックのレビュー: ウインドウサイズについて

by シラフ » 2005年12月31日(土) 02:48

なるほど！そういうことでしたか。
よくわかりました。
ありがとうございました。

by イグトランス » 2005年12月30日(金) 23:54

> 最後の
> MoveWindow(hMainWnd, .left, .top, .right - .left, .bottom - .top)
> は
> MoveWindow(hMainWnd, .left, .top, .right - .left, .bottom - .top,TRUE)
> でしょうか･･･？
そのとおりですね。すみません。

> SetRectという関数の使い方がわかってないだけだと思うのですが、
SetRectは単にRECTの各メンバに値を設定していく関数です。
普通に書けば4つの代入になるところを1行で済ますことができるという楽をするために使いました。
> .top=50
> .left=50
> .right=690
> .bottom=530
たとえばこれはSetRect(rc, 50, 50, 690, 530)と書けるということです。

by シラフ » 2005年12月30日(金) 21:55

最後の
MoveWindow(hMainWnd, .left, .top, .right - .left, .bottom - .top)
は
MoveWindow(hMainWnd, .left, .top, .right - .left, .bottom - .top,TRUE)
でしょうか･･･？

SetRectという関数の使い方がわかってないだけだと思うのですが、
その部分がうまくいかなかったので、

コード: 全て選択


Sub MainWnd_Create(ByRef cs As CREATESTRUCT)
	Dim rc As RECT
	With rc
		.top=50
		.left=50
		.right=690
		.bottom=530
		AdjustWindowRectEx(rc,cs.style,TRUE,cs.dwExStyle)
		MoveWindow(hMainWnd, .left, .top, .right - .left, .bottom - .top,TRUE)
	End With
End Sub
というふうにすると出来ました。

by イグトランス » 2005年12月30日(金) 17:35

希望するクライアント領域の大きさからウィンドウ全体の大きさを計算するAdjustWindowRectEx関数があります。

コード: 全て選択

Declare Function AdjustWindowRectEx Lib "user32.dll"  (
	ByRef rc As RECT,
	ByVal dwStyle As DWord,
	bMenu As Long,
	dwExStyle As DWord) As Long
1番目の引数に希望するクライアント領域の大きさが入ったRECT型のデータを渡すと
関数内で計算して必要なウィンドウ全体の大きさをこの引数に返します。
2番目と4番目の引数はウィンドウスタイルと拡張スタイルです。
3番目はメニューがあるかどうかをTRUE/FALSEで指定します。

この関数をCreateイベント内で呼び、MoveWindowで動かせば良いです。
たとえばこんな感じです。

コード: 全て選択

Declare Function SetRect Lib "User32" (
    ByRef rc As RECT, xLeft As Long, yTop As Long, xRight As Long, yBottom As Long) As Long

Sub MainWnd_Create(ByRef cs As CREATESTRUCT)
	Dim rc As RECT
	With cs
		SetRect(rc, .x, .y, 400, 400)
		AdjustWindowRectEx(rc, .style, TRUE, .dwExStyle) ' 仮にメニューを持つウィンドウだとして
	End With
	With rc
		MoveWindow(hMainWnd, .left, .top, .right - .left, .bottom - .top)
	End With
End Sub

ウインドウサイズについて

by シラフ » 2005年12月30日(金) 16:02

ＲＡＤでウインドウの大きさを（400,400）としても、クライアント領域の大きさは（392,366）となってしまいます。
今作ってるソフトは、これでは困るので、クライアント領域の大きさを（400,400）にするにはどうすればいいのでしょうか？

ページトップ