掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
タイトルバー等を除いたフォームの左上座標を取得するには (ID:6664)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
フォームのキャプションバーを除いた部分の,左上の座標は 常に(0,0)です. もし,画面上(スクリーン)の座標を求めたいなら,ClientToScreen 使用します.Form1にButtonを1つ配置して以下のコードを実行して みて下さい. procedure TForm1.Button1Click(Sender: TObject); var P : TPoint; begin P.x:=0; P.y:=0; P:=Self.ClientToScreen(P); ShowMessage(IntToStr(P.x)+' '+IntToStr(P.y)); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.