投稿日 | : 2004/06/29(Tue) 18:24 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re: トグルボタンのXP風表示 |
> Windows XP風な角が丸くなったボタン(トグルボタン)を作成する方法
角を丸くしたボタンを作成したいなら、APIのCreateRoundRectRgn と SetWindowRgn を
使用すれば一応角の丸いボタンを作成することも色んな形のボタンを作成する事も可能です
要領としてはここの円形・多角形のフォーム・コントロールを作成するを参考にして下さい。
Private Sub Form_Resize()
Result = CreateRoundRectRgn(0, 0, Check1.Width / Screen.TwipsPerPixelX, _
Check1.Height / Screen.TwipsPerPixelY, 20, 20)
SetWindowRgn Check1.hWnd, Result, True
End Sub