名前
題名
▼ Mr.XRAYさん > ▼ igyさん > > ># 実際、サイズ変更グリップを表示するコンポーネントを作りました。 > > おお，なるほど． > テストコードと実行結果です． > 例によって Windows 7 U64(SP1) + Delphi XE(UP1) Pro です． > > procedure TForm1.FormCreate(Sender: TObject); > begin > FResizeGrip := TIgySizingMark.Create(Self); > FResizeGrip.Parent := Panel1; > end; > > procedure TForm1.Panel1Resize(Sender: TObject); > begin > 　FResizeGrip.Left := Panel1.Width - FResizeGrip.Width ; > 　FResizeGrip.Top := Panel1.Height- FResizeGrip.Height; > end;
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link