掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
StringGrid上のセルをダブルクリックして、画面を出す方法 (ID:24038)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
OnDblClick内で orzさんの方法がスマートだと思います。 下記が例です。 procedure TForm1.StringGrid1DblClick(Sender: TObject); var sp, cp: TPoint; C, R: Integer; begin // マウスカーソルのスクリーン座標を取得 GetCursorPos(sp); // スクリーン座標をクライアント座標に変換 cp:= StringGrid1.ScreenToClient(sp); // セルの番地を取得 StringGrid1.MouseToCell(cp.x, cp.y, C, R); // 固定セル・余白以外の場所でダブルクリックが発生した場合は画面呼出 if (C >= StringGrid1.FixedCols) and (R >= StringGrid1.FixedRows) then MessageDlgPos('DblClick', mtInformation, [mbOk], 0, sp.x, sp.y); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.