ResizeEdges
bsNoneのFormに移動とサイズ変更機能を実装するヘルパークラス
- Active · last change 7-10-2025
- ★ 1 on GitHub
README
ResizeEdgesSample
This is a sample application demonstrating how to use ResizeEdges.pas
to enable resizing and moving of visual controls on a borderless form (bsNone).
Features
- Move the form by dragging
Panel1 - Resize the form via
ListBox1(bottom and sides) - Click the button to close the application
日本語説明
このサンプルは、ResizeEdges.pas を使用して、枠なしフォーム(bsNone)に対して
視覚的なコントロール(パネルやリストボックス)を通じてリサイズ・移動操作を可能にする方法を示しています。
特徴
Panel1をドラッグするとフォームを移動できますListBox1の下端や左右でフォームのサイズ変更が可能です- ボタンを押すとアプリケーションが終了します
実行方法
- Delphi で
ResizeEdgesSample.dprを開く - 実行(F9)
Panel1をドラッグ、ListBox1でリサイズできることを確認- ボタンでアプリを終了
対応環境
- Delphi 10.x 以降を想定
- Windows 向け VCL アプリケーション
License
This example is provided as-is under the MIT License.
Feel free to use it as a reference for your own applications.

