掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
円形のフォームを作りたいのですが (ID:6942)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんな感じ procedure TForm1.FormCreate(Sender: TObject); var hR:HRGN; begin Width := 220; Height := 220; hR := CreateEllipticRgn(10,10,210,210); SetWindowRgn(Handle,hR,true); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.