掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Windows10でフォームのサイズ、位置が思い通りにならない (ID：48626)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
>左右に 7dot ほど隙間ができます。 Windows Vista 以降では，フォームのキャプション部分とフレームの部分は， DWM (Desktop Window Manager) が描画を実行しています． したがって，これは Delphi の問題というわけではありません． 実際のウィンドウの幅 (フォームの幅ではなく) は，例えば以下のようにして取得できます． procedure TForm1.Button1Click(Sender: TObject); var LRect : TRect; LWidth : Integer; begin //DwmXXXの使用にはusesにDWMAPIが必要 DwmGetWindowAttribute(Handle, DWMWA_EXTENDED_FRAME_BOUNDS, @LRect, SizeOf(LRect)); LWidth := LRect.Right - LRect.Left; ShowMessage(IntToStr(LWidth)); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.